sbuild (Debian sbuild) 0.85.10 (30 May 2024) on carme.larted.org.uk +==============================================================================+ | libmath-bigint-perl 2.003003-1 (amd64) Sun, 15 Sep 2024 20:30:32 +0000 | +==============================================================================+ Package: libmath-bigint-perl Version: 2.003003-1 Source Version: 2.003003-1 Distribution: perl-5.40-throwaway Machine Architecture: amd64 Host Architecture: amd64 Build Architecture: amd64 Build Type: full I: NOTICE: Log filtering will replace 'var/run/schroot/mount/perl-5.40-amd64-debomatic-b83450a5-6f33-4af7-a0f9-cea636893c29' with '<>' +------------------------------------------------------------------------------+ | Chroot Setup Commands | +------------------------------------------------------------------------------+ /usr/share/debomatic/sbuildcommands/chroot-setup-commands/dpkg-speedup libmath-bigint-perl_2.003003-1 perl-5.40-throwaway amd64 ------------------------------------------------------------------------------------------------------------------------------- I: Finished running '/usr/share/debomatic/sbuildcommands/chroot-setup-commands/dpkg-speedup libmath-bigint-perl_2.003003-1 perl-5.40-throwaway amd64'. Finished processing commands. -------------------------------------------------------------------------------- I: NOTICE: Log filtering will replace 'build/libmath-bigint-perl-7587ZK/resolver-d2t24g' with '<>' +------------------------------------------------------------------------------+ | Update chroot | +------------------------------------------------------------------------------+ Get:1 file:/srv/reprepro perl-5.40 InRelease [3042 B] Hit:2 http://deb.debian.org/debian unstable InRelease Hit:3 http://localhost:3142/debian sid InRelease Get:1 file:/srv/reprepro perl-5.40 InRelease [3042 B] Reading package lists... Reading package lists... Building dependency tree... Reading state information... Calculating upgrade... 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. +------------------------------------------------------------------------------+ | Fetch source files | +------------------------------------------------------------------------------+ Local sources ------------- /srv/debomatic/incoming/libmath-bigint-perl_2.003003-1.dsc exists in /srv/debomatic/incoming; copying to chroot I: NOTICE: Log filtering will replace 'build/libmath-bigint-perl-7587ZK/libmath-bigint-perl-2.003003' with '<>' I: NOTICE: Log filtering will replace 'build/libmath-bigint-perl-7587ZK' with '<>' +------------------------------------------------------------------------------+ | Install package build dependencies | +------------------------------------------------------------------------------+ Setup apt archive ----------------- Merged Build-Depends: debhelper-compat (= 13), build-essential, fakeroot, libscalar-list-utils-perl, perl Filtered Build-Depends: debhelper-compat (= 13), build-essential, fakeroot, libscalar-list-utils-perl, perl dpkg-deb: building package 'sbuild-build-depends-main-dummy' in '/<>/apt_archive/sbuild-build-depends-main-dummy.deb'. Ign:1 copy:/<>/apt_archive ./ InRelease Get:2 copy:/<>/apt_archive ./ Release [609 B] Ign:3 copy:/<>/apt_archive ./ Release.gpg Get:4 copy:/<>/apt_archive ./ Sources [681 B] Get:5 copy:/<>/apt_archive ./ Packages [682 B] Fetched 1972 B in 0s (0 B/s) Reading package lists... Reading package lists... Install main build dependencies (apt-based resolver) ---------------------------------------------------- Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following additional packages will be installed: autoconf automake autopoint autotools-dev bsdextrautils debhelper dh-autoreconf dh-strip-nondeterminism dwz fakeroot file gettext gettext-base groff-base intltool-debian libarchive-zip-perl libdebhelper-perl libelf1t64 libfakeroot libfile-stripnondeterminism-perl libicu72 libmagic-mgc libmagic1t64 libpipeline1 libtool libuchardet0 libxml2 m4 man-db po-debconf sensible-utils Suggested packages: autoconf-archive gnu-standards autoconf-doc dh-make gettext-doc libasprintf-dev libgettextpo-dev groff libtool-doc gfortran | fortran95-compiler gcj-jdk m4-doc apparmor less www-browser libmail-box-perl Recommended packages: curl | wget | lynx libarchive-cpio-perl libltdl-dev libmail-sendmail-perl The following NEW packages will be installed: autoconf automake autopoint autotools-dev bsdextrautils debhelper dh-autoreconf dh-strip-nondeterminism dwz fakeroot file gettext gettext-base groff-base intltool-debian libarchive-zip-perl libdebhelper-perl libelf1t64 libfakeroot libfile-stripnondeterminism-perl libicu72 libmagic-mgc libmagic1t64 libpipeline1 libtool libuchardet0 libxml2 m4 man-db po-debconf sbuild-build-depends-main-dummy sensible-utils 0 upgraded, 32 newly installed, 0 to remove and 0 not upgraded. Need to get 19.9 MB of archives. After this operation, 75.7 MB of additional disk space will be used. Get:1 copy:/<>/apt_archive ./ sbuild-build-depends-main-dummy 0.invalid.0 [900 B] Get:2 http://deb.debian.org/debian unstable/main amd64 sensible-utils all 0.0.24 [24.8 kB] Get:3 http://deb.debian.org/debian unstable/main amd64 libmagic-mgc amd64 1:5.45-3 [314 kB] Get:4 http://deb.debian.org/debian unstable/main amd64 libmagic1t64 amd64 1:5.45-3 [105 kB] Get:5 http://deb.debian.org/debian unstable/main amd64 file amd64 1:5.45-3 [42.9 kB] Get:6 http://deb.debian.org/debian unstable/main amd64 gettext-base amd64 0.22.5-2 [200 kB] Get:7 http://deb.debian.org/debian unstable/main amd64 libuchardet0 amd64 0.0.8-1+b1 [68.8 kB] Get:8 http://deb.debian.org/debian unstable/main amd64 groff-base amd64 1.23.0-5 [1181 kB] Get:9 http://deb.debian.org/debian unstable/main amd64 bsdextrautils amd64 2.40.2-8 [97.3 kB] Get:10 http://deb.debian.org/debian unstable/main amd64 libpipeline1 amd64 1.5.8-1 [42.0 kB] Get:11 http://deb.debian.org/debian unstable/main amd64 man-db amd64 2.13.0-1 [1420 kB] Get:12 http://deb.debian.org/debian unstable/main amd64 m4 amd64 1.4.19-4 [287 kB] Get:13 http://deb.debian.org/debian unstable/main amd64 autoconf all 2.72-3 [493 kB] Get:14 http://deb.debian.org/debian unstable/main amd64 autotools-dev all 20220109.1 [51.6 kB] Get:15 http://deb.debian.org/debian unstable/main amd64 automake all 1:1.16.5-1.3 [823 kB] Get:16 http://deb.debian.org/debian unstable/main amd64 autopoint all 0.22.5-2 [723 kB] Get:17 http://deb.debian.org/debian unstable/main amd64 libdebhelper-perl all 13.20 [89.7 kB] Get:18 http://deb.debian.org/debian unstable/main amd64 libtool all 2.4.7-7 [517 kB] Get:19 http://deb.debian.org/debian unstable/main amd64 dh-autoreconf all 20 [17.1 kB] Get:20 http://deb.debian.org/debian unstable/main amd64 libarchive-zip-perl all 1.68-1 [104 kB] Get:21 http://deb.debian.org/debian unstable/main amd64 libfile-stripnondeterminism-perl all 1.14.0-1 [19.5 kB] Get:22 http://deb.debian.org/debian unstable/main amd64 dh-strip-nondeterminism all 1.14.0-1 [8448 B] Get:23 http://deb.debian.org/debian unstable/main amd64 libelf1t64 amd64 0.191-2 [188 kB] Get:24 http://deb.debian.org/debian unstable/main amd64 dwz amd64 0.15-1+b1 [110 kB] Get:25 http://deb.debian.org/debian unstable/main amd64 libicu72 amd64 72.1-5 [9396 kB] Get:26 http://deb.debian.org/debian unstable/main amd64 libxml2 amd64 2.12.7+dfsg-3+b1 [671 kB] Get:27 http://deb.debian.org/debian unstable/main amd64 gettext amd64 0.22.5-2 [1601 kB] Get:28 http://deb.debian.org/debian unstable/main amd64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get:29 http://deb.debian.org/debian unstable/main amd64 po-debconf all 1.0.21+nmu1 [248 kB] Get:30 http://deb.debian.org/debian unstable/main amd64 debhelper all 13.20 [915 kB] Get:31 http://deb.debian.org/debian unstable/main amd64 libfakeroot amd64 1.36-1 [29.1 kB] Get:32 http://deb.debian.org/debian unstable/main amd64 fakeroot amd64 1.36-1 [75.1 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 19.9 MB in 0s (132 MB/s) Selecting previously unselected package sensible-utils. (Reading database ... 22986 files and directories currently installed.) Preparing to unpack .../00-sensible-utils_0.0.24_all.deb ... Unpacking sensible-utils (0.0.24) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../01-libmagic-mgc_1%3a5.45-3_amd64.deb ... Unpacking libmagic-mgc (1:5.45-3) ... Selecting previously unselected package libmagic1t64:amd64. Preparing to unpack .../02-libmagic1t64_1%3a5.45-3_amd64.deb ... Unpacking libmagic1t64:amd64 (1:5.45-3) ... Selecting previously unselected package file. Preparing to unpack .../03-file_1%3a5.45-3_amd64.deb ... Unpacking file (1:5.45-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../04-gettext-base_0.22.5-2_amd64.deb ... Unpacking gettext-base (0.22.5-2) ... Selecting previously unselected package libuchardet0:amd64. Preparing to unpack .../05-libuchardet0_0.0.8-1+b1_amd64.deb ... Unpacking libuchardet0:amd64 (0.0.8-1+b1) ... Selecting previously unselected package groff-base. Preparing to unpack .../06-groff-base_1.23.0-5_amd64.deb ... Unpacking groff-base (1.23.0-5) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../07-bsdextrautils_2.40.2-8_amd64.deb ... Unpacking bsdextrautils (2.40.2-8) ... Selecting previously unselected package libpipeline1:amd64. Preparing to unpack .../08-libpipeline1_1.5.8-1_amd64.deb ... Unpacking libpipeline1:amd64 (1.5.8-1) ... Selecting previously unselected package man-db. Preparing to unpack .../09-man-db_2.13.0-1_amd64.deb ... Unpacking man-db (2.13.0-1) ... Selecting previously unselected package m4. Preparing to unpack .../10-m4_1.4.19-4_amd64.deb ... Unpacking m4 (1.4.19-4) ... Selecting previously unselected package autoconf. Preparing to unpack .../11-autoconf_2.72-3_all.deb ... Unpacking autoconf (2.72-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../12-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../13-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../14-autopoint_0.22.5-2_all.deb ... Unpacking autopoint (0.22.5-2) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../15-libdebhelper-perl_13.20_all.deb ... Unpacking libdebhelper-perl (13.20) ... Selecting previously unselected package libtool. Preparing to unpack .../16-libtool_2.4.7-7_all.deb ... Unpacking libtool (2.4.7-7) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../17-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../18-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../19-libfile-stripnondeterminism-perl_1.14.0-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.14.0-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../20-dh-strip-nondeterminism_1.14.0-1_all.deb ... Unpacking dh-strip-nondeterminism (1.14.0-1) ... Selecting previously unselected package libelf1t64:amd64. Preparing to unpack .../21-libelf1t64_0.191-2_amd64.deb ... Unpacking libelf1t64:amd64 (0.191-2) ... Selecting previously unselected package dwz. Preparing to unpack .../22-dwz_0.15-1+b1_amd64.deb ... Unpacking dwz (0.15-1+b1) ... Selecting previously unselected package libicu72:amd64. Preparing to unpack .../23-libicu72_72.1-5_amd64.deb ... Unpacking libicu72:amd64 (72.1-5) ... Selecting previously unselected package libxml2:amd64. Preparing to unpack .../24-libxml2_2.12.7+dfsg-3+b1_amd64.deb ... Unpacking libxml2:amd64 (2.12.7+dfsg-3+b1) ... Selecting previously unselected package gettext. Preparing to unpack .../25-gettext_0.22.5-2_amd64.deb ... Unpacking gettext (0.22.5-2) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../26-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../27-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../28-debhelper_13.20_all.deb ... Unpacking debhelper (13.20) ... Selecting previously unselected package libfakeroot:amd64. Preparing to unpack .../29-libfakeroot_1.36-1_amd64.deb ... Unpacking libfakeroot:amd64 (1.36-1) ... Selecting previously unselected package fakeroot. Preparing to unpack .../30-fakeroot_1.36-1_amd64.deb ... Unpacking fakeroot (1.36-1) ... Selecting previously unselected package sbuild-build-depends-main-dummy. Preparing to unpack .../31-sbuild-build-depends-main-dummy_0.invalid.0_amd64.deb ... Unpacking sbuild-build-depends-main-dummy (0.invalid.0) ... Setting up libpipeline1:amd64 (1.5.8-1) ... Setting up libicu72:amd64 (72.1-5) ... Setting up bsdextrautils (2.40.2-8) ... Setting up libmagic-mgc (1:5.45-3) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.20) ... Setting up libmagic1t64:amd64 (1:5.45-3) ... Setting up gettext-base (0.22.5-2) ... Setting up m4 (1.4.19-4) ... Setting up file (1:5.45-3) ... Setting up libfakeroot:amd64 (1.36-1) ... Setting up libelf1t64:amd64 (0.191-2) ... Setting up fakeroot (1.36-1) ... update-alternatives: using /usr/bin/fakeroot-sysv to provide /usr/bin/fakeroot (fakeroot) in auto mode Setting up autotools-dev (20220109.1) ... Setting up autopoint (0.22.5-2) ... Setting up autoconf (2.72-3) ... Setting up dwz (0.15-1+b1) ... Setting up sensible-utils (0.0.24) ... Setting up libuchardet0:amd64 (0.0.8-1+b1) ... Setting up libxml2:amd64 (2.12.7+dfsg-3+b1) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up libfile-stripnondeterminism-perl (1.14.0-1) ... Setting up gettext (0.22.5-2) ... Setting up libtool (2.4.7-7) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up dh-autoreconf (20) ... Setting up dh-strip-nondeterminism (1.14.0-1) ... Setting up groff-base (1.23.0-5) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up man-db (2.13.0-1) ... Not building database; man-db/auto-update is not 'true'. Setting up debhelper (13.20) ... Setting up sbuild-build-depends-main-dummy (0.invalid.0) ... Processing triggers for libc-bin (2.40-2) ... +------------------------------------------------------------------------------+ | Check architectures | +------------------------------------------------------------------------------+ Arch check ok (amd64 included in all) +------------------------------------------------------------------------------+ | Build environment | +------------------------------------------------------------------------------+ Kernel: Linux 6.9.7-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.9.7-1 (2024-06-27) amd64 (x86_64) Toolchain package versions: binutils_2.43.1-4 dpkg-dev_1.22.11 g++-13_13.3.0-6 g++-14_14.2.0-4 gcc-13_13.3.0-6 gcc-14_14.2.0-4 libc6-dev_2.40-2 libstdc++-13-dev_13.3.0-6 libstdc++-14-dev_14.2.0-4 libstdc++6_14.2.0-4 linux-libc-dev_6.10.9-1 Package versions: adduser_3.137 apt_2.9.8 autoconf_2.72-3 automake_1:1.16.5-1.3 autopoint_0.22.5-2 autotools-dev_20220109.1 base-files_13.5 base-passwd_3.6.4 bash_5.2.32-1+b1 binutils_2.43.1-4 binutils-common_2.43.1-4 binutils-x86-64-linux-gnu_2.43.1-4 bsdextrautils_2.40.2-8 bsdutils_1:2.40.2-8 build-essential_12.10 bzip2_1.0.8-6 coreutils_9.4-3.1 cpp_4:14.1.0-2 cpp-13_13.3.0-6 cpp-13-x86-64-linux-gnu_13.3.0-6 cpp-14_14.2.0-4 cpp-14-x86-64-linux-gnu_14.2.0-4 cpp-x86-64-linux-gnu_4:14.1.0-2 dash_0.5.12-9 debconf_1.5.87 debhelper_13.20 debian-archive-keyring_2023.4 debianutils_5.20 dh-autoreconf_20 dh-strip-nondeterminism_1.14.0-1 diffutils_1:3.10-1 dirmngr_2.2.43-8+b1 dpkg_1.22.11 dpkg-dev_1.22.11 dwz_0.15-1+b1 eatmydata_131-2 fakeroot_1.36-1 file_1:5.45-3 findutils_4.10.0-3 g++_4:14.1.0-2 g++-13_13.3.0-6 g++-13-x86-64-linux-gnu_13.3.0-6 g++-14_14.2.0-4 g++-14-x86-64-linux-gnu_14.2.0-4 g++-x86-64-linux-gnu_4:14.1.0-2 gcc_4:14.1.0-2 gcc-13_13.3.0-6 gcc-13-base_13.3.0-6 gcc-13-x86-64-linux-gnu_13.3.0-6 gcc-14_14.2.0-4 gcc-14-base_14.2.0-4 gcc-14-x86-64-linux-gnu_14.2.0-4 gcc-x86-64-linux-gnu_4:14.1.0-2 gettext_0.22.5-2 gettext-base_0.22.5-2 gnupg_2.2.43-8 gnupg-l10n_2.2.43-8 gnupg-utils_2.2.43-8+b1 gpg_2.2.43-8+b1 gpg-agent_2.2.43-8+b1 gpg-wks-client_2.2.43-8+b1 gpgconf_2.2.43-8+b1 gpgsm_2.2.43-8+b1 gpgv_2.2.43-8+b1 grep_3.11-4 groff-base_1.23.0-5 gzip_1.12-1.1 hostname_3.23+nmu2 init-system-helpers_1.66 intltool-debian_0.35.0+20060710.6 libacl1_2.3.2-2 libapt-pkg6.0t64_2.9.8 libarchive-zip-perl_1.68-1 libasan8_14.2.0-4 libassuan0_2.5.6-1+b1 libassuan9_3.0.1-2 libatomic1_14.2.0-4 libattr1_1:2.5.2-1 libaudit-common_1:4.0.1-1 libaudit1_1:4.0.1-1 libbinutils_2.43.1-4 libblkid1_2.40.2-8 libbsd0_0.12.2-1 libbz2-1.0_1.0.8-6 libc-bin_2.40-2 libc-dev-bin_2.40-2 libc-l10n_2.40-2 libc6_2.40-2 libc6-dev_2.40-2 libcap-ng0_0.8.5-2 libcap2_1:2.66-5 libcc1-0_14.2.0-4 libcrypt-dev_1:4.4.36-5 libcrypt1_1:4.4.36-5 libctf-nobfd0_2.43.1-4 libctf0_2.43.1-4 libdb5.3t64_5.3.28+dfsg2-7 libdebconfclient0_0.272 libdebhelper-perl_13.20 libdpkg-perl_1.22.11 libeatmydata1_131-2 libelf1t64_0.191-2 libfakeroot_1.36-1 libffi8_3.4.6-1 libfile-stripnondeterminism-perl_1.14.0-1 libgcc-13-dev_13.3.0-6 libgcc-14-dev_14.2.0-4 libgcc-s1_14.2.0-4 libgcrypt20_1.11.0-6 libgdbm-compat4t64_1.24-2 libgdbm6t64_1.24-2 libgmp10_2:6.3.0+dfsg-2+b1 libgnutls30t64_3.8.6-2 libgomp1_14.2.0-4 libgpg-error0_1.50-3 libgprofng0_2.43.1-4 libhogweed6t64_3.10-1 libhwasan0_14.2.0-4 libicu72_72.1-5 libidn2-0_2.3.7-2 libisl23_0.27-1 libitm1_14.2.0-4 libjansson4_2.14-2+b2 libksba8_1.6.7-2 libldap-2.5-0_2.5.18+dfsg-3+b1 liblsan0_14.2.0-4 liblz4-1_1.9.4-3 liblzma5_5.6.2-2 libmagic-mgc_1:5.45-3 libmagic1t64_1:5.45-3 libmd0_1.1.0-2 libmount1_2.40.2-8 libmpc3_1.3.1-1+b2 libmpfr6_4.2.1-1+b1 libncursesw6_6.5-2 libnettle8t64_3.10-1 libnpth0t64_1.6-3.1 libp11-kit0_0.25.5-2 libpam-modules_1.5.3-7 libpam-modules-bin_1.5.3-7 libpam-runtime_1.5.3-7 libpam0g_1.5.3-7 libpcre2-8-0_10.42-4+b1 libperl5.38t64_5.38.2-5 libperl5.40_5.40.0-5 libpipeline1_1.5.8-1 libquadmath0_14.2.0-4 libreadline8t64_8.2-5 libsasl2-2_2.1.28+dfsg1-8 libsasl2-modules-db_2.1.28+dfsg1-8 libseccomp2_2.5.5-1+b1 libselinux1_3.7-3 libsemanage-common_3.7-2 libsemanage2_3.7-2 libsepol2_3.7-1 libsframe1_2.43.1-4 libsmartcols1_2.40.2-8 libsqlite3-0_3.46.1-1 libssl3t64_3.3.2-1 libstdc++-13-dev_13.3.0-6 libstdc++-14-dev_14.2.0-4 libstdc++6_14.2.0-4 libsystemd0_256.6-1 libtasn1-6_4.19.0-3+b2 libtinfo6_6.5-2 libtool_2.4.7-7 libtsan2_14.2.0-4 libubsan1_14.2.0-4 libuchardet0_0.0.8-1+b1 libudev1_256.6-1 libunistring5_1.2-1 libuuid1_2.40.2-8 libxml2_2.12.7+dfsg-3+b1 libxxhash0_0.8.2-2+b1 libzstd1_1.5.6+dfsg-1 linux-libc-dev_6.10.9-1 locales-all_2.40-2 login_1:4.16.0-2+really2.40.2-8 login.defs_1:4.16.0-4 m4_1.4.19-4 make_4.3-4.1 man-db_2.13.0-1 mawk_1.3.4.20240905-1 ncurses-base_6.5-2 ncurses-bin_6.5-2 openssl-provider-legacy_3.3.2-1 passwd_1:4.16.0-4 patch_2.7.6-7 perl_5.40.0-5 perl-base_5.40.0-5 perl-modules-5.38_5.38.2-5 perl-modules-5.40_5.40.0-5 pinentry-curses_1.2.1-4+b1 po-debconf_1.0.21+nmu1 readline-common_8.2-5 rpcsvc-proto_1.4.3-1 sbuild-build-depends-main-dummy_0.invalid.0 sed_4.9-2 sensible-utils_0.0.24 sysvinit-utils_3.10-2 tar_1.35+dfsg-3 usr-is-merged_39 util-linux_2.40.2-8 xz-utils_5.6.2-2 zlib1g_1:1.3.dfsg+really1.3.1-1 +------------------------------------------------------------------------------+ | Build | +------------------------------------------------------------------------------+ Unpack source ------------- -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA512 Format: 3.0 (quilt) Source: libmath-bigint-perl Binary: libmath-bigint-perl Architecture: all Version: 2.003003-1 Maintainer: Debian Perl Group Uploaders: gregor herrmann , Roland Rosenfeld Homepage: https://metacpan.org/release/Math-BigInt Standards-Version: 4.7.0 Vcs-Browser: https://salsa.debian.org/perl-team/modules/packages/libmath-bigint-perl Vcs-Git: https://salsa.debian.org/perl-team/modules/packages/libmath-bigint-perl.git Testsuite: autopkgtest-pkg-perl Build-Depends: debhelper-compat (= 13) Build-Depends-Indep: libscalar-list-utils-perl , perl Package-List: libmath-bigint-perl deb perl optional arch=all Checksums-Sha1: ad80f5c45719d6857e807fe103ffffc42d12f231 2978556 libmath-bigint-perl_2.003003.orig.tar.gz f7420399c4d662961773e45d9389bae56b6148b7 4408 libmath-bigint-perl_2.003003-1.debian.tar.xz Checksums-Sha256: f24804a58265b7b3d00dc3f71dc575aebcf9e0230a291028b65e7a2c41abcb1c 2978556 libmath-bigint-perl_2.003003.orig.tar.gz 1d9eb97dfb37e8351547fa72d551502c236c43c9198d89cbac2c50c494cd0218 4408 libmath-bigint-perl_2.003003-1.debian.tar.xz Files: a32af6bad7718f4ae84f25cf981f0b25 2978556 libmath-bigint-perl_2.003003.orig.tar.gz 12eb7e5d90a047723b9c7dff05f9e22d 4408 libmath-bigint-perl_2.003003-1.debian.tar.xz Dgit: a2079c4f4269b6fbaf76aa93d2e2ccdc916a39d7 debian archive/debian/2.003003-1 https://git.dgit.debian.org/libmath-bigint-perl -----BEGIN PGP SIGNATURE----- iQKTBAEBCgB9FiEE0eExbpOnYKgQTYX6uzpoAYZJqgYFAmZYq+1fFIAAAAAALgAo aXNzdWVyLWZwckBub3RhdGlvbnMub3BlbnBncC5maWZ0aGhvcnNlbWFuLm5ldEQx RTEzMTZFOTNBNzYwQTgxMDREODVGQUJCM0E2ODAxODY0OUFBMDYACgkQuzpoAYZJ qgbVEhAAnN8afwsmhzzPGEmQlvmOZ+yG9fSk1IBdFhhbH4JbL3gZpARTmOqleWQs AHx0XqAoSxjSD2FdgrKGGh/LzlmJDllI0iKmLlJ2+kQdSOK9uEIa5NNb8mFlA6S+ BAY6DvCESD1/+4Co05vuiyCAOdoSHd0P5Sc0VlUhJm//xok0CYESCssipyppiW56 t8UW2vkLVJj02HTGkFN2kqzjhhRP5OVUxIlI5rHTm+4/4vLEKYOqW8lJWForkkeu C76hOiuewa7lZL7QMZg+Uahmxo7xD4Y/TvNMXosNw3IiuzjNCvREm3X6QBLXkVij XkRCo8KEXcL7lDtTEuTiTDGH35AWrVUAgB3UgJ9OG50Lu+RMUU5l9sQ2P7vOYPf5 bWbfINFoNAB/ZFbNVuKjBnVdnfp+xoaeRhF9qDHyU/I52i/1KmO4hnfHTB4DwjfI Sh1RokXnmBu1d3OJkdRCi9QpoRw6YIbAbjq4fOEX7Lngc1UNgzff8EdJCRqq9WuO NMx2MKtp61Ww3S2KXYgxJ+h43abfczJel5haxnNBwJMAaK1WUTiDkaylPwB2Ru/h wWV31m3DmAEGsjhQ7UJ1FN1xuVDrPeCm1lyFUlxLyt5g8ag6YKPmLeNatG9eHGOF dBq4nwJZuv73Z3qmzzB04ksQ1FE9M+tb5YlpIgAorfdHJmq/Yc8= =1AIa -----END PGP SIGNATURE----- gpgv: Signature made Thu May 30 16:40:13 2024 UTC gpgv: using RSA key D1E1316E93A760A8104D85FABB3A68018649AA06 gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./libmath-bigint-perl_2.003003-1.dsc: no acceptable signature found dpkg-source: info: extracting libmath-bigint-perl in /<> dpkg-source: info: unpacking libmath-bigint-perl_2.003003.orig.tar.gz dpkg-source: info: unpacking libmath-bigint-perl_2.003003-1.debian.tar.xz Check disk space ---------------- Sufficient free space for build +------------------------------------------------------------------------------+ | Starting Timed Build Commands | +------------------------------------------------------------------------------+ /usr/share/debomatic/sbuildcommands/starting-build-commands/no-network libmath-bigint-perl_2.003003-1 perl-5.40-throwaway amd64 ------------------------------------------------------------------------------------------------------------------------------- I: Finished running '/usr/share/debomatic/sbuildcommands/starting-build-commands/no-network libmath-bigint-perl_2.003003-1 perl-5.40-throwaway amd64'. Finished processing commands. -------------------------------------------------------------------------------- User Environment ---------------- APT_CONFIG=/var/lib/sbuild/apt.conf HOME=/sbuild-nonexistent LANG=en_GB.UTF-8 LANGUAGE=en_GB:en LC_ALL=C.UTF-8 LD_LIBRARY_PATH=/usr/lib/libeatmydata LD_PRELOAD=libeatmydata.so LOGNAME=debomatic PATH=/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games PWD=/<> SCHROOT_ALIAS_NAME=perl-5.40-throwaway-amd64-debomatic SCHROOT_CHROOT_NAME=perl-5.40-amd64-debomatic SCHROOT_COMMAND=env SCHROOT_GID=110 SCHROOT_GROUP=sbuild SCHROOT_SESSION_ID=perl-5.40-amd64-debomatic-b83450a5-6f33-4af7-a0f9-cea636893c29 SCHROOT_UID=1002 SCHROOT_USER=debomatic SHELL=/bin/sh USER=debomatic dpkg-buildpackage ----------------- Command: dpkg-buildpackage --sanitize-env -us -uc -rfakeroot -Zxz dpkg-buildpackage: info: source package libmath-bigint-perl dpkg-buildpackage: info: source version 2.003003-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by gregor herrmann dpkg-source -Zxz --before-build . dpkg-buildpackage: info: host architecture amd64 debian/rules clean dh clean dh_clean dpkg-source -Zxz -b . dpkg-source: info: using source format '3.0 (quilt)' dpkg-source: info: building libmath-bigint-perl using existing ./libmath-bigint-perl_2.003003.orig.tar.gz dpkg-source: info: building libmath-bigint-perl in libmath-bigint-perl_2.003003-1.debian.tar.xz dpkg-source: info: building libmath-bigint-perl in libmath-bigint-perl_2.003003-1.dsc debian/rules binary dh binary dh_update_autotools_config dh_autoreconf dh_auto_configure /usr/bin/perl Makefile.PL INSTALLDIRS=vendor "OPTIMIZE=-g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wdate-time -D_FORTIFY_SOURCE=2" "LD=x86_64-linux-gnu-gcc -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wl,-z,relro" Checking if your kit is complete... Looks good Generating a Unix-style Makefile Writing Makefile for Math::BigInt Writing MYMETA.yml and MYMETA.json dh_auto_build make -j2 make[1]: Entering directory '/<>' cp lib/Math/BigFloat.pm blib/lib/Math/BigFloat.pm cp lib/Math/BigRat.pm blib/lib/Math/BigRat.pm cp lib/Math/BigInt.pm blib/lib/Math/BigInt.pm cp lib/Math/BigInt/Lib.pm blib/lib/Math/BigInt/Lib.pm cp lib/Math/BigInt/Calc.pm blib/lib/Math/BigInt/Calc.pm Manifying 5 pod documents make[1]: Leaving directory '/<>' dh_auto_test make -j2 test TEST_VERBOSE=1 make[1]: Entering directory '/<>' PERL_DL_NONLAZY=1 "/usr/bin/perl" "-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.040000, /usr/bin/perl # # Version Module # ------- ------ # 2.003003 Math::BigInt # 2.003003 Math::BigFloat # 2.003003 Math::BigRat # 2.003003 Math::BigInt::Lib # 2.003003 Math::BigInt::Calc # t/01load.t .................... 1..3 ok 1 - use Math::BigInt; ok 2 - use Math::BigFloat; ok 3 - use Math::BigRat; ok t/bare_mbf.t .................. 1..3070 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v2.003003 ok 1 - Math::BigFloat->config('lib') ok 2 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 3 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 4 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 5 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 6 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 7 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 15 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 16 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 17 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 37 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 38 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 43 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 44 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 51 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 55 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 56 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 57 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 58 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 59 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 60 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 61 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 62 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 70 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 71 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 73 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 74 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 75 - $x = Math::BigFloat->new("-inf"); $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("1.2"); $y = Math::BigFloat->new("10"); $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("2.4"); $y = Math::BigFloat->new("12"); $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("10"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 83 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $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("10"); $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("12"); $x->bcos($y); ok 88 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 89 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 97 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 98 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 99 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 100 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 101 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 102 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 103 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 104 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 105 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 106 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 107 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 108 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 109 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 136 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 137 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 140 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 141 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 142 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 143 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 144 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 145 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 146 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 147 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $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("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $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("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $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("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $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("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $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("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 224 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 225 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 226 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 227 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 228 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 229 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 230 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 231 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 232 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 233 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 234 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 235 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 236 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 237 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 238 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 239 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 241 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 242 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 243 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 257 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 258 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 259 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 260 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 261 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 262 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 263 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 264 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 265 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 266 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 267 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 268 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 269 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 271 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 272 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 273 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 274 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 275 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 276 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 277 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 278 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 279 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 280 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 281 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 282 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 283 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 284 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 285 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 286 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 287 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 288 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 289 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 290 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 291 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 292 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 298 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 299 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 300 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 301 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 302 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 303 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 304 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 305 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 306 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 307 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 308 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 309 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 310 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 311 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 312 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 313 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 314 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 315 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 316 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 317 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 318 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 319 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 320 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 321 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 322 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 323 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 324 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 325 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 326 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 327 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 328 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 329 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 330 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 331 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 332 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 333 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 334 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 335 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 336 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 337 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 338 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 339 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 340 - $x = Math::BigFloat->new("1"); $x; ok 341 - $x = Math::BigFloat->new("1"); $x; ok 342 - $x = Math::BigFloat->new("-0"); $x; ok 343 - $x = Math::BigFloat->new("-0"); $x; ok 344 - $x = Math::BigFloat->new("invalid"); $x; ok 345 - $x = Math::BigFloat->new("invalid"); $x; ok 346 - $x = Math::BigFloat->new("+inf"); $x; ok 347 - $x = Math::BigFloat->new("+inf"); $x; ok 348 - $x = Math::BigFloat->new("-inf"); $x; ok 349 - $x = Math::BigFloat->new("-inf"); $x; ok 350 - $x = Math::BigFloat->new("123"); $x; ok 351 - $x = Math::BigFloat->new("123"); $x; ok 352 - $x = Math::BigFloat->new("-123.4567"); $x; ok 353 - $x = Math::BigFloat->new("-123.4567"); $x; ok 354 - $x = Math::BigFloat->new(".2E-3."); $x; ok 355 - $x = Math::BigFloat->new(".2E-3."); $x; ok 356 - $x = Math::BigFloat->new("1e3e4"); $x; ok 357 - $x = Math::BigFloat->new("1e3e4"); $x; ok 358 - $x = Math::BigFloat->new(".2E2"); $x; ok 359 - $x = Math::BigFloat->new(".2E2"); $x; ok 360 - $x = Math::BigFloat->new("1.E3"); $x; ok 361 - $x = Math::BigFloat->new("1.E3"); $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("+0e0"); $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("+0e-0"); $x; ok 376 - $x = Math::BigFloat->new("000"); $x; ok 377 - $x = Math::BigFloat->new("000"); $x; ok 378 - $x = Math::BigFloat->new("00e2"); $x; ok 379 - $x = Math::BigFloat->new("00e2"); $x; ok 380 - $x = Math::BigFloat->new("00e02"); $x; ok 381 - $x = Math::BigFloat->new("00e02"); $x; ok 382 - $x = Math::BigFloat->new("000e002"); $x; ok 383 - $x = Math::BigFloat->new("000e002"); $x; ok 384 - $x = Math::BigFloat->new("000e1230"); $x; ok 385 - $x = Math::BigFloat->new("000e1230"); $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+3"); $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("00e+03"); $x; ok 394 - $x = Math::BigFloat->new("-000"); $x; ok 395 - $x = Math::BigFloat->new("-000"); $x; ok 396 - $x = Math::BigFloat->new("-00e2"); $x; ok 397 - $x = Math::BigFloat->new("-00e2"); $x; ok 398 - $x = Math::BigFloat->new("-00e02"); $x; ok 399 - $x = Math::BigFloat->new("-00e02"); $x; ok 400 - $x = Math::BigFloat->new("-000e002"); $x; ok 401 - $x = Math::BigFloat->new("-000e002"); $x; ok 402 - $x = Math::BigFloat->new("-000e1230"); $x; ok 403 - $x = Math::BigFloat->new("-000e1230"); $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+3"); $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("-00e+03"); $x; ok 412 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 413 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 444 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 445 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 446 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 447 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 448 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 449 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 450 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 451 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 452 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 453 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 454 - $x = Math::BigFloat->new("128"); $x->as_hex(); ok 455 - $x = Math::BigFloat->new("-128"); $x->as_hex(); ok 456 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 457 - $x = Math::BigFloat->new("-0"); $x->as_hex(); ok 458 - $x = Math::BigFloat->new("1"); $x->as_hex(); ok 459 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_hex(); ok 460 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 461 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 462 - $x = Math::BigFloat->new("invalid"); $x->as_hex(); ok 463 - $x = Math::BigFloat->new("128"); $x->as_bin(); ok 464 - $x = Math::BigFloat->new("-128"); $x->as_bin(); ok 465 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 466 - $x = Math::BigFloat->new("-0"); $x->as_bin(); ok 467 - $x = Math::BigFloat->new("1"); $x->as_bin(); ok 468 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 469 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_bin(); ok 470 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 471 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 472 - $x = Math::BigFloat->new("invalid"); $x->as_bin(); ok 473 - $x = Math::BigFloat->new("128"); $x->as_oct(); ok 474 - $x = Math::BigFloat->new("-128"); $x->as_oct(); ok 475 - $x = Math::BigFloat->new("0"); $x->as_oct(); ok 476 - $x = Math::BigFloat->new("-0"); $x->as_oct(); ok 477 - $x = Math::BigFloat->new("1"); $x->as_oct(); ok 478 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 479 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_oct(); ok 480 - $x = Math::BigFloat->new("+inf"); $x->as_oct(); ok 481 - $x = Math::BigFloat->new("-inf"); $x->as_oct(); ok 482 - $x = Math::BigFloat->new("invalid"); $x->as_oct(); ok 483 - $x = Math::BigFloat->new("128"); $x->to_hex(); ok 484 - $x = Math::BigFloat->new("-128"); $x->to_hex(); ok 485 - $x = Math::BigFloat->new("0"); $x->to_hex(); ok 486 - $x = Math::BigFloat->new("-0"); $x->to_hex(); ok 487 - $x = Math::BigFloat->new("1"); $x->to_hex(); ok 488 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_hex(); ok 489 - $x = Math::BigFloat->new("+inf"); $x->to_hex(); ok 490 - $x = Math::BigFloat->new("-inf"); $x->to_hex(); ok 491 - $x = Math::BigFloat->new("invalid"); $x->to_hex(); ok 492 - $x = Math::BigFloat->new("128"); $x->to_bin(); ok 493 - $x = Math::BigFloat->new("-128"); $x->to_bin(); ok 494 - $x = Math::BigFloat->new("0"); $x->to_bin(); ok 495 - $x = Math::BigFloat->new("-0"); $x->to_bin(); ok 496 - $x = Math::BigFloat->new("1"); $x->to_bin(); ok 497 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 498 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_bin(); ok 499 - $x = Math::BigFloat->new("+inf"); $x->to_bin(); ok 500 - $x = Math::BigFloat->new("-inf"); $x->to_bin(); ok 501 - $x = Math::BigFloat->new("invalid"); $x->to_bin(); ok 502 - $x = Math::BigFloat->new("128"); $x->to_oct(); ok 503 - $x = Math::BigFloat->new("-128"); $x->to_oct(); ok 504 - $x = Math::BigFloat->new("0"); $x->to_oct(); ok 505 - $x = Math::BigFloat->new("-0"); $x->to_oct(); ok 506 - $x = Math::BigFloat->new("1"); $x->to_oct(); ok 507 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 508 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_oct(); ok 509 - $x = Math::BigFloat->new("+inf"); $x->to_oct(); ok 510 - $x = Math::BigFloat->new("-inf"); $x->to_oct(); ok 511 - $x = Math::BigFloat->new("invalid"); $x->to_oct(); ok 512 - $x = Math::BigFloat->new("0"); $x->numify(); ok 513 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 514 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 515 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 516 - $x = Math::BigFloat->new("100"); $x->numify(); ok 517 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 518 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 519 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 520 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 521 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 522 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 523 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 524 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 525 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 526 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 527 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 528 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 529 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 530 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 531 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 532 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 533 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 534 - $x = Math::BigFloat->new("0"); $x->bone(); ok 535 - $x = Math::BigFloat->new("0"); $x->bone(); ok 536 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 537 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 538 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 539 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 540 - $x = Math::BigFloat->new("2"); $x->bone(); ok 541 - $x = Math::BigFloat->new("2"); $x->bone(); ok 542 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 543 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 544 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 545 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 546 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 547 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 548 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 549 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 550 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 551 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 552 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 553 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 554 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 555 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 556 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 557 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 558 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 559 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 560 - $x = Math::BigFloat->new("inf"); $x; ok 561 - $x = Math::BigFloat->new("inf"); $x; ok 562 - $x = Math::BigFloat->new("+inf"); $x; ok 563 - $x = Math::BigFloat->new("+inf"); $x; ok 564 - $x = Math::BigFloat->new("-inf"); $x; ok 565 - $x = Math::BigFloat->new("-inf"); $x; ok 566 - $x = Math::BigFloat->new("+infinity"); $x; ok 567 - $x = Math::BigFloat->new("+infinity"); $x; ok 568 - $x = Math::BigFloat->new("+-inf"); $x; ok 569 - $x = Math::BigFloat->new("+-inf"); $x; ok 570 - $x = Math::BigFloat->new("abc"); $x; ok 571 - $x = Math::BigFloat->new("abc"); $x; ok 572 - $x = Math::BigFloat->new(" 1 a"); $x; ok 573 - $x = Math::BigFloat->new(" 1 a"); $x; ok 574 - $x = Math::BigFloat->new("1bcd2"); $x; ok 575 - $x = Math::BigFloat->new("1bcd2"); $x; ok 576 - $x = Math::BigFloat->new("11111b"); $x; ok 577 - $x = Math::BigFloat->new("11111b"); $x; ok 578 - $x = Math::BigFloat->new("+1z"); $x; ok 579 - $x = Math::BigFloat->new("+1z"); $x; ok 580 - $x = Math::BigFloat->new("-1z"); $x; ok 581 - $x = Math::BigFloat->new("-1z"); $x; ok 582 - $x = Math::BigFloat->new("0e999"); $x; ok 583 - $x = Math::BigFloat->new("0e999"); $x; ok 584 - $x = Math::BigFloat->new("0e-999"); $x; ok 585 - $x = Math::BigFloat->new("0e-999"); $x; ok 586 - $x = Math::BigFloat->new("-0e999"); $x; ok 587 - $x = Math::BigFloat->new("-0e999"); $x; ok 588 - $x = Math::BigFloat->new("-0e-999"); $x; ok 589 - $x = Math::BigFloat->new("-0e-999"); $x; ok 590 - $x = Math::BigFloat->new("0"); $x; ok 591 - $x = Math::BigFloat->new("0"); $x; ok 592 - $x = Math::BigFloat->new("+0"); $x; ok 593 - $x = Math::BigFloat->new("+0"); $x; ok 594 - $x = Math::BigFloat->new("+00"); $x; ok 595 - $x = Math::BigFloat->new("+00"); $x; ok 596 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 597 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 598 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 599 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 600 - $x = Math::BigFloat->new("-0"); $x; ok 601 - $x = Math::BigFloat->new("-0"); $x; ok 602 - $x = Math::BigFloat->new("-0000"); $x; ok 603 - $x = Math::BigFloat->new("-0000"); $x; ok 604 - $x = Math::BigFloat->new("+1"); $x; ok 605 - $x = Math::BigFloat->new("+1"); $x; ok 606 - $x = Math::BigFloat->new("+01"); $x; ok 607 - $x = Math::BigFloat->new("+01"); $x; ok 608 - $x = Math::BigFloat->new("+001"); $x; ok 609 - $x = Math::BigFloat->new("+001"); $x; ok 610 - $x = Math::BigFloat->new("+00000100000"); $x; ok 611 - $x = Math::BigFloat->new("+00000100000"); $x; ok 612 - $x = Math::BigFloat->new("123456789"); $x; ok 613 - $x = Math::BigFloat->new("123456789"); $x; ok 614 - $x = Math::BigFloat->new("-1"); $x; ok 615 - $x = Math::BigFloat->new("-1"); $x; ok 616 - $x = Math::BigFloat->new("-01"); $x; ok 617 - $x = Math::BigFloat->new("-01"); $x; ok 618 - $x = Math::BigFloat->new("-001"); $x; ok 619 - $x = Math::BigFloat->new("-001"); $x; ok 620 - $x = Math::BigFloat->new("-123456789"); $x; ok 621 - $x = Math::BigFloat->new("-123456789"); $x; ok 622 - $x = Math::BigFloat->new("-00000100000"); $x; ok 623 - $x = Math::BigFloat->new("-00000100000"); $x; ok 624 - $x = Math::BigFloat->new("123.456a"); $x; ok 625 - $x = Math::BigFloat->new("123.456a"); $x; ok 626 - $x = Math::BigFloat->new("123.456"); $x; ok 627 - $x = Math::BigFloat->new("123.456"); $x; ok 628 - $x = Math::BigFloat->new("0.01"); $x; ok 629 - $x = Math::BigFloat->new("0.01"); $x; ok 630 - $x = Math::BigFloat->new(".002"); $x; ok 631 - $x = Math::BigFloat->new(".002"); $x; ok 632 - $x = Math::BigFloat->new("+.2"); $x; ok 633 - $x = Math::BigFloat->new("+.2"); $x; ok 634 - $x = Math::BigFloat->new("-0.0003"); $x; ok 635 - $x = Math::BigFloat->new("-0.0003"); $x; ok 636 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 637 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 638 - $x = Math::BigFloat->new("123456E2"); $x; ok 639 - $x = Math::BigFloat->new("123456E2"); $x; ok 640 - $x = Math::BigFloat->new("123456E-2"); $x; ok 641 - $x = Math::BigFloat->new("123456E-2"); $x; ok 642 - $x = Math::BigFloat->new("-123456E2"); $x; ok 643 - $x = Math::BigFloat->new("-123456E2"); $x; ok 644 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 645 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 646 - $x = Math::BigFloat->new("1e1"); $x; ok 647 - $x = Math::BigFloat->new("1e1"); $x; ok 648 - $x = Math::BigFloat->new("2e-11"); $x; ok 649 - $x = Math::BigFloat->new("2e-11"); $x; ok 650 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 651 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 652 - $x = Math::BigFloat->new(" 000001"); $x; ok 653 - $x = Math::BigFloat->new(" 000001"); $x; ok 654 - $x = Math::BigFloat->new(" -00001"); $x; ok 655 - $x = Math::BigFloat->new(" -00001"); $x; ok 656 - $x = Math::BigFloat->new(" -1"); $x; ok 657 - $x = Math::BigFloat->new(" -1"); $x; ok 658 - $x = Math::BigFloat->new(" 000.01"); $x; ok 659 - $x = Math::BigFloat->new(" 000.01"); $x; ok 660 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 661 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 662 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 663 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 664 - $x = Math::BigFloat->new("-3e111"); $x; ok 665 - $x = Math::BigFloat->new("-3e111"); $x; ok 666 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 667 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 668 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 669 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 670 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 671 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 672 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 673 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 674 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 675 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 676 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 677 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 678 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 679 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 680 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 681 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 682 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 683 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 684 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 685 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 686 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 687 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 688 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 689 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 690 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 691 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 692 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 693 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 694 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 695 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 696 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 697 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 698 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 699 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 700 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 701 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 702 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 703 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 704 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 705 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 706 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 707 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 708 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 709 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 710 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 711 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 712 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 713 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 714 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 715 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 716 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 717 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 718 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 719 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 720 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 721 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 722 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 723 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 724 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 725 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 726 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 727 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 728 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 729 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 730 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 731 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 732 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 733 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 734 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 735 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 736 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 737 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 738 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 739 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 740 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 741 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 742 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 743 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 744 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 745 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 746 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 747 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 748 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 749 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 750 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 751 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 752 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 753 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 754 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 755 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 756 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 757 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 758 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 759 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 760 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 761 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 763 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 764 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 765 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 766 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 767 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 768 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 769 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 770 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 771 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 772 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 773 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 774 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 775 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 776 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 777 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 778 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 779 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 780 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 781 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 782 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 783 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 784 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 785 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 786 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 787 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 788 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 789 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 790 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 791 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 792 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 793 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 794 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 795 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 796 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 797 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 798 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 799 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 800 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 801 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 802 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 803 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 804 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 805 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 806 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 807 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 808 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 809 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 810 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 811 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 812 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 813 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 814 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 815 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 816 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 817 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 818 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 819 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 820 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 821 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 822 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 823 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 824 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 825 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 826 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 827 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 828 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 829 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 830 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 831 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 832 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 833 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 834 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 835 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 836 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 837 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 838 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 839 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 840 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 841 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 842 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 843 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 844 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 845 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 846 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 847 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 848 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 849 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 850 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 851 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 852 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 853 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 854 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 855 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 857 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 858 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 859 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 860 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 861 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 862 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 863 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 865 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 866 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 867 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 868 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 869 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 870 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 871 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 872 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 873 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 874 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 875 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 876 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 877 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 878 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 879 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 880 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 881 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 882 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 883 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 884 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 885 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 886 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 887 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 888 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 889 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 890 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 891 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 892 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 893 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 894 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 895 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 896 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 897 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 898 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 899 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 900 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 901 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 902 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 903 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 904 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 905 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 906 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 907 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 908 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 909 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 910 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 911 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 912 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 913 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 914 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 915 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 916 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 917 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 918 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 919 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 920 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 921 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 922 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 923 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 924 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 925 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 926 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 927 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 928 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 929 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 930 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 931 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 932 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 933 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 934 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 935 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 936 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 937 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 938 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 939 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 940 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 941 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 942 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 943 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 944 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 945 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 946 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 947 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 948 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 949 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 950 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 951 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 952 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 953 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 954 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 955 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 956 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 957 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 958 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 959 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 960 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 961 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 962 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 963 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 964 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 965 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 966 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 967 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 968 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 969 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 970 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 971 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 972 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 973 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 974 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 975 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 976 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 977 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 978 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 979 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 980 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 981 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 982 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 983 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 984 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 985 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 986 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 987 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 988 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 989 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 990 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 991 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 992 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 993 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 994 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 995 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 996 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 997 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 998 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 999 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1000 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1001 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1002 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1003 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1004 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1005 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1006 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1007 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1008 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1009 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1010 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1011 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1012 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1013 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1014 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1015 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1016 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1017 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1018 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1019 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1020 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1021 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1022 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1023 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1024 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1025 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1026 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1027 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1028 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1029 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1030 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1031 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1032 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1033 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1034 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1035 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1036 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1037 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1038 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1039 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1040 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1041 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1042 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1043 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1044 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1045 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1046 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1047 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1048 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1049 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1050 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1051 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1052 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1053 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1054 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1055 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1060 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1061 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1062 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1063 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1064 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1065 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1066 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1067 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1068 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1069 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1070 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1071 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1072 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1073 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1074 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1075 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1076 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1077 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1078 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1079 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1080 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1081 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1082 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1083 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1084 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1085 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1086 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1087 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1088 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1089 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1090 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1091 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1092 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1093 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1094 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1095 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1096 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1097 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1098 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1099 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1100 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1101 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1102 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1103 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1104 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1105 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1106 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1107 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1108 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1109 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1110 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1111 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1112 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1113 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1114 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1115 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1116 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1117 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1118 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1119 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1120 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1121 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1122 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1123 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1124 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1125 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1126 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1127 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1128 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1129 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1130 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1131 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1132 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1133 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1134 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1135 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1136 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1137 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1138 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1139 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1140 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1141 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1142 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1143 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1144 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1145 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1146 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1147 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1148 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1149 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1150 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1151 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1152 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1153 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1154 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1155 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1156 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1157 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1158 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1159 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1160 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1161 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1162 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1163 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1164 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1165 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1166 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1167 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1168 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1169 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1170 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1171 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1172 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1173 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1174 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1175 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1176 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1177 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1178 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1179 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1180 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1181 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1182 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1183 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1184 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1185 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1186 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1187 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1188 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1189 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1190 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1191 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1192 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1193 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1194 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1195 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1196 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1197 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1198 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1199 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1200 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1201 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1202 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1203 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1204 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1205 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1206 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1207 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1208 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1209 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1210 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1211 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1212 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1213 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1214 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1215 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1216 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1217 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1218 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1219 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1220 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1221 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1222 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1223 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1224 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1225 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1226 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1227 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1228 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1229 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1230 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1231 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1232 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1233 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1234 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1235 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1236 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1237 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1238 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1239 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1240 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1241 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1242 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1243 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1244 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1245 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1246 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1247 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1248 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1249 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1250 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1251 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1252 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1253 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1254 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1255 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1256 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1257 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1258 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1259 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1260 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1261 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1262 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1263 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1264 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1265 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1266 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1267 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1268 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1269 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1270 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1271 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1272 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1273 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1274 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1275 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1276 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1277 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1278 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1279 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1280 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1281 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1282 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1283 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1284 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1285 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1286 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1287 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1288 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1289 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1290 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1291 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1292 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1293 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1294 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1295 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1296 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1297 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1298 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1299 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1300 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1301 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1302 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1303 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1304 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1305 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1306 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1307 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 1308 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 1309 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1310 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1311 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1312 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1313 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1314 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1315 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1316 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1317 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1318 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1319 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1320 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1321 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1322 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1323 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1324 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1325 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1326 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1327 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 1328 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 1329 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 1330 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 1331 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1332 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1333 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1334 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1335 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1336 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1337 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1338 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1339 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1340 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1341 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1342 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1343 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1344 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1345 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1346 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1347 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1348 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1349 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 1350 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 1351 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 1352 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 1353 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1354 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1355 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1356 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1357 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1358 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1359 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1360 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1361 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1362 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1363 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1364 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1365 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1366 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1367 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1368 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1369 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1370 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1371 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 1372 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 1373 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 1374 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 1375 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1376 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1377 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1378 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1379 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1380 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1381 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1382 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1383 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1384 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1385 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1386 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1387 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1388 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1389 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1390 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1391 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1392 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1393 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1394 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1395 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1396 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1397 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1398 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1399 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1400 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1401 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1402 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1403 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1404 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1405 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1406 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1407 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1408 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1409 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1410 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1411 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1412 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1413 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1414 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1415 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1416 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1417 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1418 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1419 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1420 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1421 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1422 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1423 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1424 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1425 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1426 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1427 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1428 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1429 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1430 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1431 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1432 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1433 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1434 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1435 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1436 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1437 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1438 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1439 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1440 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1441 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1442 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1443 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1444 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1445 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1446 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1447 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1448 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1449 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1450 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1451 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1452 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1453 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1454 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1455 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1456 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1457 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1458 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1459 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1460 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1461 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1462 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1463 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1464 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1465 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1466 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1467 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1468 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1469 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1470 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1471 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1472 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1473 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1474 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1475 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1476 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1477 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1478 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1479 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1480 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1481 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1482 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1483 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1484 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1485 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1486 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1487 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1488 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1489 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1490 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1491 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1492 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1493 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1494 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1495 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1496 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1497 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1498 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1499 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1500 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1501 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1502 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1503 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1504 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1505 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1506 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1507 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1508 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1509 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1510 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1511 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1512 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1513 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1514 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1515 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1516 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1517 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1518 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1519 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1520 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1521 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1522 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1523 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1524 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1525 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1526 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1527 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1528 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1529 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1530 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1531 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1532 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1533 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1534 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1535 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1536 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1537 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1538 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1539 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1540 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1541 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1542 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1543 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1544 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1545 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1546 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1547 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1548 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1549 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1550 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1551 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1552 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1553 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1554 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1555 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1556 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1557 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1558 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1559 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1560 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1561 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1562 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1563 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1564 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1565 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1566 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1567 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1568 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1569 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1570 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1571 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1572 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1573 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1574 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1575 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1576 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1577 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1578 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1579 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1580 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1581 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1582 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1583 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1584 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1585 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1586 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1587 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1588 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1589 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1590 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1591 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1592 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1593 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1594 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1595 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1596 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1597 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1598 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1599 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1600 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1601 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1602 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1603 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1604 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1605 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1606 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1607 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1608 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1609 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1610 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1611 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1612 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1613 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1614 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1615 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1616 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1617 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1618 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1619 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1620 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1621 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1622 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1623 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1624 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1625 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1626 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1627 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1628 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1629 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1630 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1631 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1632 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1633 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1634 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1635 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1636 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1637 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1638 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1639 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1640 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1641 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1642 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1643 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1644 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1645 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1646 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1647 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1648 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1649 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1650 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1651 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1652 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1653 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1654 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1655 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1656 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1657 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1658 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1659 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1660 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1661 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1662 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1663 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1664 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1665 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1666 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1667 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1668 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1669 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1670 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1671 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1672 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1673 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1674 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1675 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1676 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1677 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1678 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1679 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1680 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1681 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1682 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1683 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1684 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1685 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1686 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1687 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1688 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1689 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1690 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1691 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1692 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1693 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1694 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1695 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1696 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1697 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1698 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1699 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1700 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1701 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1702 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1703 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1704 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1705 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1706 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1707 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1708 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1709 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1710 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1711 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1712 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1713 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1714 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1715 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1716 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1717 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1718 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1719 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1720 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1721 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1722 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1723 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1724 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1725 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1726 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1727 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1728 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1729 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1730 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1731 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1732 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1733 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1734 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1735 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1736 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1737 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1738 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1739 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1740 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1741 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1742 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1743 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1744 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1745 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1746 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1747 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1748 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1749 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1750 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1751 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1752 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1753 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1754 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1755 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1756 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1757 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1758 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1759 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1760 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1761 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1762 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1763 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1764 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1765 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1766 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1767 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1768 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1769 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1770 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1771 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1772 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1773 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1774 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1775 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1776 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1777 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1778 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1779 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1780 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1781 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1782 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1783 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1784 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1785 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1786 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1787 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1788 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1789 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1790 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1791 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1792 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1793 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1794 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1795 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1796 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1797 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1798 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1799 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1800 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1801 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1802 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1803 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1804 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1805 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1806 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1807 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1808 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1809 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1810 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1811 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1812 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1813 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1814 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1815 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1816 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1817 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1818 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1819 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1820 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1821 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1822 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1823 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1824 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1825 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1826 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1827 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1828 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1829 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1830 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1831 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1832 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1833 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1834 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1835 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1836 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1837 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1838 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1839 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1840 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1841 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1842 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1843 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1844 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1845 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1846 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1847 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1848 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1849 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1850 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1851 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1852 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1853 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1854 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1855 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1857 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1858 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1859 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1860 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1861 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1862 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1863 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1864 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1865 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1866 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1867 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1868 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1869 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1870 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1871 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1872 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1873 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1874 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1875 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1876 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1877 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1878 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1879 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1880 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1881 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1882 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1883 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1884 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1885 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1886 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1887 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1888 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1889 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1890 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1891 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1892 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1893 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1894 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1895 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1896 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1897 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1898 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1899 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1900 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1901 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1902 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1903 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1904 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1905 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1906 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1907 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1908 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1909 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1910 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1911 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1912 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1913 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1914 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1915 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1916 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1917 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1918 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1919 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1920 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1921 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1922 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1923 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1924 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1925 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1926 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1927 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1928 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1929 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1930 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1931 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1932 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1933 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1934 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1935 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1936 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1937 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1938 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1939 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1940 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1941 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1942 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1943 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1944 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1945 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1946 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1947 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1948 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1949 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1950 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1951 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1952 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1953 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1954 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1955 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1956 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1957 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1958 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1959 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1960 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1961 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1962 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1963 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1964 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1965 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1966 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1967 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1968 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1969 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1970 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1971 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1972 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1973 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1974 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1975 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1976 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1977 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1978 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1979 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1980 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1981 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1982 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1983 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1984 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1985 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1986 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1987 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1988 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1989 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 1990 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 1991 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1992 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1993 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 1994 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 1995 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1996 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1997 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1998 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1999 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2000 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2001 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2002 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2003 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2004 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2005 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2006 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2007 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2008 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2009 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2010 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2011 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2012 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2013 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2014 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2015 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2016 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2017 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2018 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2019 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2020 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2021 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2022 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2023 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2024 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2025 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2026 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2027 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2028 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2029 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2030 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2031 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2032 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2033 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2034 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2035 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2036 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2037 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2038 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2039 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2040 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2041 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2042 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2043 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2044 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2045 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2046 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2047 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2048 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2049 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2050 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2051 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2052 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2053 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2054 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2055 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2056 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2057 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2058 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2059 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2060 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2061 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2062 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2063 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2064 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2065 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2066 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2067 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2068 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2069 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2070 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2071 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2072 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2073 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2074 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2075 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2076 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2077 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2078 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2079 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2080 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2081 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2082 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2083 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2084 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2085 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2086 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2087 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2088 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2089 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2090 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2091 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2092 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2093 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2094 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2095 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2096 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2097 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2098 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2099 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2100 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2101 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2102 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2103 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2104 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2105 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2106 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2107 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2108 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2109 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2110 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2111 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2112 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2113 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2114 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2115 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2116 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2117 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2118 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2119 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2120 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2121 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2122 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2123 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2124 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2125 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2126 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2127 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2128 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2129 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2130 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2131 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2132 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2133 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2134 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2135 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2136 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2137 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2138 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2139 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2140 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2141 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2142 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2143 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2144 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2145 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2146 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2147 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2148 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2149 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2150 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2151 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2152 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2153 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2154 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2155 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2156 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2157 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2158 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2159 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2160 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2161 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2162 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2163 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2164 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2165 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2166 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2167 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2168 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2169 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2170 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2171 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2172 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2173 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2174 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2175 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2176 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2177 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2178 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2179 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2180 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2181 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2182 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2183 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2184 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2185 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2186 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2187 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2188 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2189 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2190 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2191 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2192 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2193 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2194 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2195 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2196 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2197 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2198 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2199 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2200 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2201 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2202 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2203 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2204 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2205 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2206 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2207 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2208 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2209 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2210 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2211 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2212 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2213 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2214 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2215 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2216 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2217 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2218 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2219 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2220 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2221 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2222 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2223 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2224 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2225 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2226 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2227 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2228 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2229 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2230 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2231 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2232 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2233 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2234 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2235 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2236 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2237 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2238 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2239 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2240 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2241 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2242 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2243 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2244 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2245 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2247 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2248 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2249 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2250 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2251 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2252 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2253 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2254 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2255 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2256 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2257 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2258 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2259 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2260 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2261 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2262 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2263 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2264 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2265 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2266 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2267 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2268 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2269 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2270 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2271 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2272 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2273 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2274 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2275 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2276 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2277 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2278 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2279 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2280 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2281 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2282 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2283 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2284 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2285 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2286 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2287 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2288 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2289 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2290 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2291 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2292 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2293 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2294 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2295 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2296 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2297 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2298 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2299 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2300 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2301 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2302 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2303 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2304 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2305 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2306 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2307 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2308 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2309 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2310 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2311 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2312 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2313 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2314 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2315 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2316 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2317 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2318 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2319 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2320 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2321 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2322 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2323 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2324 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2325 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2326 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2327 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2328 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2329 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2330 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2331 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2332 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2333 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2334 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2335 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2336 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2337 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2338 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2339 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2340 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2341 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2342 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2343 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2344 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2345 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2346 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2347 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2348 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2349 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2350 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2351 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2352 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2353 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2354 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2355 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2356 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2357 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2358 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2359 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2360 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2361 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2362 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2363 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2364 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2365 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2366 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2367 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2368 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2369 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2370 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2371 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2372 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2373 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2374 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2375 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2376 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2377 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2378 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2379 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2380 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2381 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2382 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2383 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2384 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2385 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2386 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2387 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2388 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2389 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2390 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2391 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2392 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2393 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2394 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2395 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2396 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2397 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2398 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2399 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2400 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2401 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2402 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2403 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2404 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2405 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2406 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2407 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2408 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2409 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2410 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2411 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2412 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2413 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2414 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2415 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2416 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2417 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2418 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2419 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2420 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2421 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2422 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2423 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2424 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2425 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2426 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2427 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2428 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2429 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2430 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2431 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2432 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2433 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2434 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2435 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2436 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2437 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2438 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2439 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2440 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2441 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2442 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2443 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2444 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2445 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2446 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2447 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2448 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2449 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2450 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2451 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2452 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2453 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2454 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2455 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2456 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2457 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2458 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2459 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2460 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2461 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2462 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2463 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2464 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2465 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2466 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2467 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2468 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2469 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2470 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2471 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2472 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2473 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2474 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2475 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2476 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2477 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2478 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2479 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2480 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2481 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2482 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2483 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2484 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2485 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2486 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2487 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2488 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2489 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2490 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2491 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2492 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2493 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2494 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2495 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2496 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2497 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2498 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2499 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2500 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2501 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2502 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2503 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2504 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2505 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2506 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2507 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2508 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2509 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2510 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2511 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2512 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2513 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2514 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2515 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2516 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2517 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2518 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2519 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2520 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2521 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2522 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2523 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2524 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2525 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2526 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2527 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2528 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2529 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2530 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2531 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2532 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2533 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2534 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2535 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2536 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2537 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2538 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2539 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2540 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2541 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2542 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2543 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2544 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2545 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2546 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2547 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2548 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2549 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2550 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2551 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2552 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2553 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2554 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2555 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2556 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2557 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2558 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2559 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2560 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2561 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2562 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2563 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2564 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2565 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2566 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2567 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2568 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2569 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2570 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2571 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2572 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2573 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2574 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2575 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2576 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2577 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2578 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2579 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2580 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2581 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2582 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2583 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2584 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2585 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2586 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2587 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2588 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2589 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2590 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2591 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2592 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2593 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2594 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2595 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2596 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2597 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2598 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2599 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2600 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2601 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2602 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2603 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2604 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2605 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2606 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2607 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2608 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2609 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2610 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2611 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2612 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2613 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2614 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2615 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2616 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2617 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2618 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2619 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2620 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2621 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2622 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2623 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2624 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2625 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2626 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2627 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2628 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2629 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2630 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2631 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2632 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2633 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2634 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2635 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2636 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2637 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2638 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2639 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2640 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2641 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2642 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2643 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2644 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2645 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2646 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2647 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2648 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2649 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2650 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2651 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2652 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2653 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2654 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2655 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2656 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2657 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2658 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2659 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2660 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2661 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2662 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2663 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2664 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2665 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2666 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2667 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2668 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2669 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2670 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2671 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2672 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2673 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2674 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2675 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2677 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2678 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2679 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2680 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2681 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2682 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2683 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2684 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2685 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2686 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2687 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2688 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2689 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2690 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2691 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2692 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2693 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2694 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2695 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2696 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2697 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2698 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2699 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2700 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2701 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2702 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2703 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2704 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2705 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2706 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2707 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2708 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2709 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2710 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2711 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2712 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2713 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2714 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2715 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2716 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2717 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2718 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2719 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2720 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2721 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2722 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2723 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2724 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2725 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2726 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2727 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2728 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2729 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2730 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2731 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2732 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2733 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2734 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2735 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2736 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2737 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2738 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2739 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2740 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2741 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2742 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2743 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2744 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2745 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2746 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2747 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2748 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2749 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2750 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2751 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2752 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2753 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2754 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2755 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2756 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2757 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2758 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2759 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2760 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2761 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2762 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2763 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2764 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2765 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2766 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2767 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2768 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2769 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2770 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2771 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2772 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2773 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2774 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2775 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2776 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2777 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2778 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2779 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2780 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2781 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2782 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2783 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2784 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2785 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2786 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2787 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2788 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2789 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2790 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2791 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2792 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2793 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2794 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2795 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2796 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2797 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2798 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2799 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2800 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2801 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2802 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2803 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2804 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2805 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2806 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2807 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2808 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2809 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2810 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2811 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2812 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2813 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2814 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2815 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2816 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2817 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2818 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2819 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2820 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2821 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2822 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2823 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2824 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2825 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2826 - $x = Math::BigFloat->new("invalid"); $x->is_int(); ok 2827 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2828 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2829 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2830 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2831 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2832 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2833 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2834 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2835 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2836 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2837 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2838 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2839 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2840 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2841 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2842 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2843 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2844 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2845 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2846 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2847 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2848 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2849 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2850 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2851 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2852 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2853 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2854 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2855 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2856 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2857 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2858 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2859 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2860 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2861 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2862 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2863 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2864 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2865 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2866 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2867 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2868 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2869 - $x = Math::BigFloat->new("0"); $x->is_non_positive(); ok 2870 - $x = Math::BigFloat->new("1"); $x->is_non_positive(); ok 2871 - $x = Math::BigFloat->new("-1"); $x->is_non_positive(); ok 2872 - $x = Math::BigFloat->new("NaN"); $x->is_non_positive(); ok 2873 - $x = Math::BigFloat->new("-inf"); $x->is_non_positive(); ok 2874 - $x = Math::BigFloat->new("+inf"); $x->is_non_positive(); ok 2875 - $x = Math::BigFloat->new("0"); $x->is_non_negative(); ok 2876 - $x = Math::BigFloat->new("1"); $x->is_non_negative(); ok 2877 - $x = Math::BigFloat->new("-1"); $x->is_non_negative(); ok 2878 - $x = Math::BigFloat->new("NaN"); $x->is_non_negative(); ok 2879 - $x = Math::BigFloat->new("-inf"); $x->is_non_negative(); ok 2880 - $x = Math::BigFloat->new("+inf"); $x->is_non_negative(); ok 2881 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2882 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2883 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2884 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2885 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2886 - $x = Math::BigFloat->new("invalid"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2887 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2888 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2889 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2890 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2891 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2892 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2893 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2894 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2895 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2896 - $x = Math::BigFloat->new("invalid"); $x->exponent()->bstr(); ok 2897 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2898 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2899 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2900 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2901 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2902 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2903 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2904 - $x = Math::BigFloat->new("invalid"); $x->mantissa()->bstr(); ok 2905 - $x = Math::BigFloat->new("123"); $x->length(); ok 2906 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2907 - $x = Math::BigFloat->new("0"); $x->length(); ok 2908 - $x = Math::BigFloat->new("1"); $x->length(); ok 2909 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2910 - $x = Math::BigFloat->new("invalid"); $x->is_zero(); ok 2911 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2912 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2913 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2914 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2915 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2916 - $x = Math::BigFloat->new("invalid"); $x->is_one(); ok 2917 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2918 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2919 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2920 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2921 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2922 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2923 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2924 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2925 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2926 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2927 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2928 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2929 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2930 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2931 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2932 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2933 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2934 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2935 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2936 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2937 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2938 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2939 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2940 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2941 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2942 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2943 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2944 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2945 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2946 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2947 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2948 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2949 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2950 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2951 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2952 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2953 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2954 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2955 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2956 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2957 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2958 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2959 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2960 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2961 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2962 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2963 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2964 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2965 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2966 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2967 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2968 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2969 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2970 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2971 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2972 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2973 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2974 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2975 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2976 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2977 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2978 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2979 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2980 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2981 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2982 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2983 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2984 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2985 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2986 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2987 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2988 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2989 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2990 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2991 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2992 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2993 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2994 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2995 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2996 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2997 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2998 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 2999 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 3000 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3001 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3002 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3003 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3004 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3005 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3006 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $y ok 3007 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $x ok 3008 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 3009 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 3010 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 3011 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 3012 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 3013 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 3014 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{accuracy} ok 3015 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{precision} ok 3016 - $x = Math::BigFloat->new(2); $x->binf(); $x->{accuracy} ok 3017 - $x = Math::BigFloat->new(2); $x->binf(); $x->{precision} ok 3018 - $x = Math::BigFloat->new(2); $x->bone(); $x->{accuracy} ok 3019 - $x = Math::BigFloat->new(2); $x->bone(); $x->{precision} ok 3020 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{accuracy} ok 3021 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{precision} ok 3022 - Math::BigFloat->bzero() ok 3023 - Math::BigFloat->bone() ok 3024 - Math::BigFloat->bone("+") ok 3025 - Math::BigFloat->bone("-") ok 3026 - Math::BigFloat->bnan() ok 3027 - Math::BigFloat->binf() ok 3028 - Math::BigFloat->binf("+") ok 3029 - Math::BigFloat->binf("-") ok 3030 - Math::BigFloat->binf("-inf") ok 3031 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 3032 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 3033 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 3034 - A and P set => NaN ok 3035 - supplied arg overrides set global ok 3036 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 3037 - Math::BigFloat->new(-1)->is_one() ok 3038 - Math::BigFloat->new(-1)->is_one("-") ok 3039 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 3040 - $x = Math::BigFloat->new(3); $x -= $x; ok 3041 - $x = Math::BigFloat->new(-3); $x -= $x; ok 3042 - $x = Math::BigFloat->new(3); $x += $x; ok 3043 - $x = Math::BigFloat->new(-3); $x += $x; ok 3044 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 3045 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 3046 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 3047 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 3048 - $x = Math::BigFloat->new("inf"); $x += $x; ok 3049 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 3050 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 3051 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 3052 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 3053 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 3054 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 3055 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 3056 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 3057 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 3058 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 3059 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 3060 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 3061 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 3062 - value of ((2**148)+1)/17 ok 3063 - number of digits in ((2**148)+1)/17 ok 3064 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 3065 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 3066 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 3067 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 3068 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y ok 3069 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y ok 3070 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y; $x ok t/bare_mbi.t .................. 1..4278 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v2.003003 # Math::BigInt::BareCalc ok 1 - Math::BigInt->config('lib') ok 2 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 3 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 4 - is a valid object ok 5 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 6 - is a valid object ok 7 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x -= $y; ok 8 - is a valid object ok 9 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x -= $y; ok 10 - is a valid object ok 11 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $x %= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x %= $y; ok 20 - is a valid object ok 21 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x /= $y; ok 22 - is a valid object ok 23 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("2"); $x /= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("2"); $x->blog($y); ok 32 - is a valid object ok 33 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("invalid"); $x->blog($y); ok 34 - is a valid object ok 35 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->blog($y); ok 36 - is a valid object ok 37 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt->new("-21"); $y = Math::BigInt->new("4"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt->new("21"); $y = Math::BigInt->new("-21"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("4"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt->new("1024"); $y = Math::BigInt->new("2"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("3"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt->new("82"); $y = Math::BigInt->new("3"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt->new("80"); $y = Math::BigInt->new("3"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("2"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt->new("15625"); $y = Math::BigInt->new("5"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt->new("15626"); $y = Math::BigInt->new("5"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt->new("15624"); $y = Math::BigInt->new("5"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt->new("1000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt->new("10000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt->new("100000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt->new("8916100448256"); $y = Math::BigInt->new("12"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt->new("8916100448257"); $y = Math::BigInt->new("12"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt->new("8916100448255"); $y = Math::BigInt->new("12"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt->new("2251799813685248"); $y = Math::BigInt->new("8"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt->new("72057594037927936"); $y = Math::BigInt->new("2"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt->new("144115188075855872"); $y = Math::BigInt->new("2"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt->new("288230376151711744"); $y = Math::BigInt->new("2"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt->new("576460752303423488"); $y = Math::BigInt->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt->new("1329227995784915872903807060280344576"); $y = Math::BigInt->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt->new("0"); $x->is_negative() || 0; ok 140 - $x = Math::BigInt->new("-1"); $x->is_negative() || 0; ok 141 - $x = Math::BigInt->new("1"); $x->is_negative() || 0; ok 142 - $x = Math::BigInt->new("+inf"); $x->is_negative() || 0; ok 143 - $x = Math::BigInt->new("-inf"); $x->is_negative() || 0; ok 144 - $x = Math::BigInt->new("invalid"); $x->is_negative() || 0; ok 145 - $x = Math::BigInt->new("0"); $x->is_positive() || 0; ok 146 - $x = Math::BigInt->new("-1"); $x->is_positive() || 0; ok 147 - $x = Math::BigInt->new("1"); $x->is_positive() || 0; ok 148 - $x = Math::BigInt->new("+inf"); $x->is_positive() || 0; ok 149 - $x = Math::BigInt->new("-inf"); $x->is_positive() || 0; ok 150 - $x = Math::BigInt->new("invalid"); $x->is_positive() || 0; ok 151 - $x = Math::BigInt->new("0"); $x->is_non_negative() || 0; ok 152 - $x = Math::BigInt->new("-1"); $x->is_non_negative() || 0; ok 153 - $x = Math::BigInt->new("1"); $x->is_non_negative() || 0; ok 154 - $x = Math::BigInt->new("+inf"); $x->is_non_negative() || 0; ok 155 - $x = Math::BigInt->new("-inf"); $x->is_non_negative() || 0; ok 156 - $x = Math::BigInt->new("NaN"); $x->is_non_negative() || 0; ok 157 - $x = Math::BigInt->new("0"); $x->is_non_positive() || 0; ok 158 - $x = Math::BigInt->new("-1"); $x->is_non_positive() || 0; ok 159 - $x = Math::BigInt->new("1"); $x->is_non_positive() || 0; ok 160 - $x = Math::BigInt->new("+inf"); $x->is_non_positive() || 0; ok 161 - $x = Math::BigInt->new("-inf"); $x->is_non_positive() || 0; ok 162 - $x = Math::BigInt->new("NaN"); $x->is_non_positive() || 0; ok 163 - $x = Math::BigInt->new("-inf"); $x->is_int() || 0; ok 164 - $x = Math::BigInt->new("+inf"); $x->is_int() || 0; ok 165 - $x = Math::BigInt->new("invalid"); $x->is_int() || 0; ok 166 - $x = Math::BigInt->new("1"); $x->is_int() || 0; ok 167 - $x = Math::BigInt->new("0"); $x->is_int() || 0; ok 168 - $x = Math::BigInt->new("123e12"); $x->is_int() || 0; ok 169 - $x = Math::BigInt->new("abc"); $x->is_odd() || 0; ok 170 - $x = Math::BigInt->new("0"); $x->is_odd() || 0; ok 171 - $x = Math::BigInt->new("1"); $x->is_odd() || 0; ok 172 - $x = Math::BigInt->new("3"); $x->is_odd() || 0; ok 173 - $x = Math::BigInt->new("-1"); $x->is_odd() || 0; ok 174 - $x = Math::BigInt->new("-3"); $x->is_odd() || 0; ok 175 - $x = Math::BigInt->new("10000001"); $x->is_odd() || 0; ok 176 - $x = Math::BigInt->new("10000002"); $x->is_odd() || 0; ok 177 - $x = Math::BigInt->new("2"); $x->is_odd() || 0; ok 178 - $x = Math::BigInt->new("120"); $x->is_odd() || 0; ok 179 - $x = Math::BigInt->new("121"); $x->is_odd() || 0; ok 180 - $x = Math::BigInt->new("abc"); $x->is_even() || 0; ok 181 - $x = Math::BigInt->new("0"); $x->is_even() || 0; ok 182 - $x = Math::BigInt->new("1"); $x->is_even() || 0; ok 183 - $x = Math::BigInt->new("3"); $x->is_even() || 0; ok 184 - $x = Math::BigInt->new("-1"); $x->is_even() || 0; ok 185 - $x = Math::BigInt->new("-3"); $x->is_even() || 0; ok 186 - $x = Math::BigInt->new("10000001"); $x->is_even() || 0; ok 187 - $x = Math::BigInt->new("10000002"); $x->is_even() || 0; ok 188 - $x = Math::BigInt->new("2"); $x->is_even() || 0; ok 189 - $x = Math::BigInt->new("120"); $x->is_even() || 0; ok 190 - $x = Math::BigInt->new("121"); $x->is_even() || 0; ok 191 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 192 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 193 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 194 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 195 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 196 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 197 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 198 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 199 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 200 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 201 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 202 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 203 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("invalid"); $x->bacmp($y); ok 204 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->bacmp($y); ok 205 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 206 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 207 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 208 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 210 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 211 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 212 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 213 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 214 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 215 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 216 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 217 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 218 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 219 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 220 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 221 - $x = Math::BigInt->bnorm("0e999"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("0e-999"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("-0e999"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("-0e-999"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("123"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("123.000"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("123e0"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("123e+0"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("123e-0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("123.000e0"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("123.000e+0"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("123.000e-0"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("0babc"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("0b123"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0b0"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("-0b0"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("-0b1"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0b0001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0b001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0b011"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0b101"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0b1001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0b10001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0b100001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0b1000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0b10000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0b100000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0b1000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0b10000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0b100000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 330 - is a valid object ok 331 - $x = Math::BigInt->bnorm("-0x0"); ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 334 - is a valid object ok 335 - $x = Math::BigInt->bnorm("0x1234"); ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("0xabcdef"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("-0x1234"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("0x12345678"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0x9"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("0x11"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("0x21"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0x41"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0x81"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("0x101"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("0x201"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0x401"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("0x801"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0x1001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("0x2001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0x4001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("0x8001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("0x10001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("0x20001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("0x40001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("0x80001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("0x100001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("0x200001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("0x400001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("0x800001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("0x1000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("0x2000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("0x4000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("0x8000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("0x10000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("0x20000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("0x40000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("0x80000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("0x100000001"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("0x200000001"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("0x400000001"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("0x800000001"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); 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("-inf"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm("0inf"); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm(""); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm("abc"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm(" 1 a"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("1bcd2"); ok 432 - is a valid object ok 433 - $x = Math::BigInt->bnorm("11111b"); 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("-1z"); 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("1E_12"); ok 444 - is a valid object ok 445 - $x = Math::BigInt->bnorm("1_E_12"); ok 446 - is a valid object ok 447 - $x = Math::BigInt->bnorm("+_1E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt->bnorm("+0_1E2"); ok 450 - is a valid object ok 451 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 452 - is a valid object ok 453 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 454 - is a valid object ok 455 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt->bnorm("E1"); ok 458 - is a valid object ok 459 - $x = Math::BigInt->bnorm("E23"); ok 460 - is a valid object ok 461 - $x = Math::BigInt->bnorm("1.23E1"); ok 462 - is a valid object ok 463 - $x = Math::BigInt->bnorm("1.23E-1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt->bnorm("1e2e3"); ok 466 - is a valid object ok 467 - $x = Math::BigInt->bnorm("1e2r"); ok 468 - is a valid object ok 469 - $x = Math::BigInt->bnorm("1e2.0"); ok 470 - is a valid object ok 471 - $x = Math::BigInt->bnorm("1.2.2"); ok 472 - is a valid object ok 473 - $x = Math::BigInt->bnorm("1.2.3e1"); ok 474 - is a valid object ok 475 - $x = Math::BigInt->bnorm("-1.2.3"); ok 476 - is a valid object ok 477 - $x = Math::BigInt->bnorm("-1.2.3e-4"); ok 478 - is a valid object ok 479 - $x = Math::BigInt->bnorm("1.2e3.4"); ok 480 - is a valid object ok 481 - $x = Math::BigInt->bnorm("1.2e-3.4"); ok 482 - is a valid object ok 483 - $x = Math::BigInt->bnorm("1.2.3.4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt->bnorm("1.2.t"); ok 486 - is a valid object ok 487 - $x = Math::BigInt->bnorm("1..2"); ok 488 - is a valid object ok 489 - $x = Math::BigInt->bnorm("1..2e1"); ok 490 - is a valid object ok 491 - $x = Math::BigInt->bnorm("1..2e1..1"); ok 492 - is a valid object ok 493 - $x = Math::BigInt->bnorm("12e1..1"); ok 494 - is a valid object ok 495 - $x = Math::BigInt->bnorm("..2"); ok 496 - is a valid object ok 497 - $x = Math::BigInt->bnorm(".-2"); ok 498 - is a valid object ok 499 - $x = Math::BigInt->bnorm("012"); ok 500 - is a valid object ok 501 - $x = Math::BigInt->bnorm("0123"); ok 502 - is a valid object ok 503 - $x = Math::BigInt->bnorm("01234"); ok 504 - is a valid object ok 505 - $x = Math::BigInt->bnorm("012345"); ok 506 - is a valid object ok 507 - $x = Math::BigInt->bnorm("0123456"); ok 508 - is a valid object ok 509 - $x = Math::BigInt->bnorm("01234567"); ok 510 - is a valid object ok 511 - $x = Math::BigInt->bnorm("012345678"); ok 512 - is a valid object ok 513 - $x = Math::BigInt->bnorm("0123456789"); ok 514 - is a valid object ok 515 - $x = Math::BigInt->bnorm("01234567891"); ok 516 - is a valid object ok 517 - $x = Math::BigInt->bnorm("012345678912"); ok 518 - is a valid object ok 519 - $x = Math::BigInt->bnorm("0123456789123"); ok 520 - is a valid object ok 521 - $x = Math::BigInt->bnorm("01234567891234"); ok 522 - is a valid object ok 523 - $x = Math::BigInt->bnorm("0e0"); ok 524 - is a valid object ok 525 - $x = Math::BigInt->bnorm("+0e0"); ok 526 - is a valid object ok 527 - $x = Math::BigInt->bnorm("+0e+0"); ok 528 - is a valid object ok 529 - $x = Math::BigInt->bnorm("-0e+0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt->bnorm("0e-0"); ok 532 - is a valid object ok 533 - $x = Math::BigInt->bnorm("-0e-0"); ok 534 - is a valid object ok 535 - $x = Math::BigInt->bnorm("+0e-0"); ok 536 - is a valid object ok 537 - $x = Math::BigInt->bnorm("000"); ok 538 - is a valid object ok 539 - $x = Math::BigInt->bnorm("00e2"); ok 540 - is a valid object ok 541 - $x = Math::BigInt->bnorm("00e02"); ok 542 - is a valid object ok 543 - $x = Math::BigInt->bnorm("000e002"); ok 544 - is a valid object ok 545 - $x = Math::BigInt->bnorm("000e1230"); ok 546 - is a valid object ok 547 - $x = Math::BigInt->bnorm("00e-3"); ok 548 - is a valid object ok 549 - $x = Math::BigInt->bnorm("00e+3"); ok 550 - is a valid object ok 551 - $x = Math::BigInt->bnorm("00e-03"); ok 552 - is a valid object ok 553 - $x = Math::BigInt->bnorm("00e+03"); ok 554 - is a valid object ok 555 - $x = Math::BigInt->bnorm("-000"); ok 556 - is a valid object ok 557 - $x = Math::BigInt->bnorm("-00e2"); ok 558 - is a valid object ok 559 - $x = Math::BigInt->bnorm("-00e02"); ok 560 - is a valid object ok 561 - $x = Math::BigInt->bnorm("-000e002"); ok 562 - is a valid object ok 563 - $x = Math::BigInt->bnorm("-000e1230"); ok 564 - is a valid object ok 565 - $x = Math::BigInt->bnorm("-00e-3"); ok 566 - is a valid object ok 567 - $x = Math::BigInt->bnorm("-00e+3"); ok 568 - is a valid object ok 569 - $x = Math::BigInt->bnorm("-00e-03"); ok 570 - is a valid object ok 571 - $x = Math::BigInt->bnorm("-00e+03"); ok 572 - is a valid object ok 573 - $x = Math::BigInt->bnorm("0"); ok 574 - is a valid object ok 575 - $x = Math::BigInt->bnorm("+0"); ok 576 - is a valid object ok 577 - $x = Math::BigInt->bnorm("+00"); ok 578 - is a valid object ok 579 - $x = Math::BigInt->bnorm("+000"); ok 580 - is a valid object ok 581 - $x = Math::BigInt->bnorm("000000000000000000"); ok 582 - is a valid object ok 583 - $x = Math::BigInt->bnorm("-0"); ok 584 - is a valid object ok 585 - $x = Math::BigInt->bnorm("-0000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt->bnorm("+1"); ok 588 - is a valid object ok 589 - $x = Math::BigInt->bnorm("+01"); ok 590 - is a valid object ok 591 - $x = Math::BigInt->bnorm("+001"); ok 592 - is a valid object ok 593 - $x = Math::BigInt->bnorm("+00000100000"); ok 594 - is a valid object ok 595 - $x = Math::BigInt->bnorm("123456789"); ok 596 - is a valid object ok 597 - $x = Math::BigInt->bnorm("-1"); ok 598 - is a valid object ok 599 - $x = Math::BigInt->bnorm("-01"); ok 600 - is a valid object ok 601 - $x = Math::BigInt->bnorm("-001"); ok 602 - is a valid object ok 603 - $x = Math::BigInt->bnorm("-123456789"); ok 604 - is a valid object ok 605 - $x = Math::BigInt->bnorm("-00000100000"); ok 606 - is a valid object ok 607 - $x = Math::BigInt->bnorm("1_2_3"); ok 608 - is a valid object ok 609 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 610 - is a valid object ok 611 - $x = Math::BigInt->bnorm("1E2"); ok 612 - is a valid object ok 613 - $x = Math::BigInt->bnorm("1E1"); ok 614 - is a valid object ok 615 - $x = Math::BigInt->bnorm("1E0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt->bnorm("1.23E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt->bnorm("100E-1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt->bnorm("1.E3"); ok 622 - is a valid object ok 623 - $x = Math::BigInt->bnorm("1.01E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt->bnorm("1010E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt->bnorm("-1010E0"); ok 628 - is a valid object ok 629 - $x = Math::BigInt->bnorm("-1010E1"); ok 630 - is a valid object ok 631 - $x = Math::BigInt->bnorm("1234.00"); ok 632 - is a valid object ok 633 - $x = Math::BigInt->bnorm("-1010E-2"); ok 634 - is a valid object ok 635 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 638 - is a valid object ok 639 - $x = Math::BigInt->bnorm("1E-999999"); ok 640 - is a valid object ok 641 - $x = Math::BigInt->bnorm("0.5"); ok 642 - is a valid object ok 643 - $x = Math::BigInt->new("1"); $x->bnan(); ok 644 - is a valid object ok 645 - $x = Math::BigInt->new("2"); $x->bnan(); ok 646 - is a valid object ok 647 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("2"); $x->bone("+"); ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("2"); $x->bone("-"); ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("invalid"); $x->bone("-"); ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("invalid"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("3"); $x->bone(""); ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("1"); $x->binf("+"); ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("2"); $x->binf("-"); ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("3"); $x->binf("+inf"); ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("123"); $x->is_nan() || 0; ok 666 - $x = Math::BigInt->new("abc"); $x->is_nan() || 0; ok 667 - $x = Math::BigInt->new("NaN"); $x->is_nan() || 0; ok 668 - $x = Math::BigInt->new("-123"); $x->is_nan() || 0; ok 669 - $x = Math::BigInt->new("+inf"); $x->is_inf(""); ok 670 - $x = Math::BigInt->new("-inf"); $x->is_inf(""); ok 671 - $x = Math::BigInt->new("abc"); $x->is_inf(""); ok 672 - $x = Math::BigInt->new("1"); $x->is_inf(""); ok 673 - $x = Math::BigInt->new("NaN"); $x->is_inf(""); ok 674 - $x = Math::BigInt->new("-1"); $x->is_inf(""); ok 675 - $x = Math::BigInt->new("+inf"); $x->is_inf("-"); ok 676 - $x = Math::BigInt->new("+inf"); $x->is_inf("+"); ok 677 - $x = Math::BigInt->new("-inf"); $x->is_inf("-"); ok 678 - $x = Math::BigInt->new("-inf"); $x->is_inf("+"); ok 679 - $x = Math::BigInt->new("-inf"); $x->is_inf("-inf"); ok 680 - $x = Math::BigInt->new("-inf"); $x->is_inf("+inf"); ok 681 - $x = Math::BigInt->new("+inf"); $x->is_inf("-inf"); ok 682 - $x = Math::BigInt->new("+inf"); $x->is_inf("+inf"); ok 683 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(""); ok 684 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(""); ok 685 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 686 - is a valid object ok 687 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("-102533203"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 734 - is a valid object ok 735 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("-15"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("-13"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("-10"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("2"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("-820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("-205066405"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("+inf"); $x->bsstr(); ok 790 - $x = Math::BigInt->new("-inf"); $x->bsstr(); ok 791 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 792 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 793 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 794 - $x = Math::BigInt->new("bsstrabc"); $x->bsstr(); ok 795 - $x = Math::BigInt->new("-5"); $x->bsstr(); ok 796 - $x = Math::BigInt->new("-100"); $x->bsstr(); ok 797 - $x = Math::BigInt->new("5"); $x->numify(); ok 798 - $x = Math::BigInt->new("-5"); $x->numify(); ok 799 - $x = Math::BigInt->new("100"); $x->numify(); ok 800 - $x = Math::BigInt->new("-100"); $x->numify(); ok 801 - $x = Math::BigInt->new("invalid"); $x->bneg(); ok 802 - is a valid object ok 803 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 804 - is a valid object ok 805 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 806 - is a valid object ok 807 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 808 - is a valid object ok 809 - $x = Math::BigInt->new("0"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("1"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("invalid"); $x->babs(); ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("0"); $x->babs(); ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("1"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("-1"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("NaN"); $x->bsgn(); ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("+inf"); $x->bsgn(); ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("-inf"); $x->bsgn(); ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("0"); $x->bsgn(); ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("+123456789"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("-123456789"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->bcmp($y); ok 848 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 849 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("invalid"); $x->bcmp($y); ok 850 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 851 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 852 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 853 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 854 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 855 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 856 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 857 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 858 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 859 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 860 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 861 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 862 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 863 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 864 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 865 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 866 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 867 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 868 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 869 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 870 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 871 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 872 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 873 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 874 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 875 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 876 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 877 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 878 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 879 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 880 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 881 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 882 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 883 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 884 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 885 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 886 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 888 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt->new("abc"); $x->binc(); ok 890 - is a valid object ok 891 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 892 - is a valid object ok 893 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 894 - is a valid object ok 895 - $x = Math::BigInt->new("+0"); $x->binc(); ok 896 - is a valid object ok 897 - $x = Math::BigInt->new("+1"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("-1"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x->badd($y); ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("invalid"); $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("invalid"); $x->badd($y); ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("invalid"); $x->badd($y); ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->badd($y); ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->badd($y); ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->badd($y); ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("-1"); $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("-1"); $x->badd($y); ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x->badd($y); ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x->badd($y); ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x->badd($y); ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x->badd($y); ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x->badd($y); ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x->badd($y); ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x->badd($y); ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x->badd($y); ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x->badd($y); ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x->badd($y); ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x->badd($y); ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x->badd($y); ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x->badd($y); ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x->badd($y); ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x->badd($y); ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x->badd($y); ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x->badd($y); ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x->badd($y); ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x->badd($y); ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x->badd($y); ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("-1"); $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("-1"); $x->bsub($y); ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("abc"); $x->bmuladd($y, $z); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("invalid"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("invalid"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1196 - is a valid object ok 1197 - $x = Math::BigInt->new("-1"); $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("123456789123456789"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("-1"); $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("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1212 - is a valid object ok 1213 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("55555555555"); $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("66666666666"); $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("77777777777"); $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("88888888888"); $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("99999999999"); $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("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("55555555555"); $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("66666666666"); $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("77777777777"); $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("88888888888"); $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("99999999999"); $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("-3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1274 - is a valid object ok 1275 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $z = Math::BigInt->new("1234567890"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("invalid"); $x->bmul($y); ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("invalid"); $x->bmul($y); ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("+inf"); $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("+inf"); $x->bmul($y); ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x->bmul($y); ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x->bmul($y); ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("-1"); $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("+1"); $x->bmul($y); ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x->bmul($y); ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x->bmul($y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x->bmul($y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x->bmul($y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x->bmul($y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x->bmul($y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x->bmul($y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x->bmul($y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x->bmul($y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x->bmul($y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x->bmul($y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x->bmul($y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x->bmul($y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x->bmul($y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x->bmul($y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x->bmul($y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x->bmul($y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x->bmul($y); ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x->bmul($y); ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x->bmul($y); ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x->bmul($y); ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x->bmul($y); ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x->bmul($y); ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x->bmul($y); ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1402 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1403 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1404 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1405 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1406 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1407 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1408 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1409 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join(",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join(",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join(",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join(",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join(",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join(",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join(",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join(",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join(",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join(",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join(",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join(",", $x->bdiv($y)); ok 1474 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join(",", $x->bdiv($y)); ok 1475 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join(",", $x->bdiv($y)); ok 1476 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join(",", $x->bdiv($y)); ok 1477 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join(",", $x->bdiv($y)); ok 1478 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join(",", $x->bdiv($y)); ok 1479 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join(",", $x->bdiv($y)); ok 1480 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join(",", $x->bdiv($y)); ok 1481 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join(",", $x->bdiv($y)); ok 1482 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1483 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1484 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1485 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1486 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1487 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1488 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1489 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1490 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1491 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1492 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1493 - is a valid object ok 1494 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1495 - is a valid object ok 1496 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1497 - is a valid object ok 1498 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1499 - is a valid object 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("inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1503 - is a valid object ok 1504 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1505 - is a valid object ok 1506 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1507 - is a valid object ok 1508 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $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("-5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1519 - is a valid object ok 1520 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1521 - is a valid object ok 1522 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1523 - is a valid object ok 1524 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1525 - is a valid object ok 1526 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1527 - is a valid object ok 1528 - $x = Math::BigInt->new("5"); $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("5"); $x->bdiv($y); ok 1531 - is a valid object ok 1532 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1533 - is a valid object ok 1534 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1535 - is a valid object ok 1536 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1537 - is a valid object ok 1538 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1539 - is a valid object ok 1540 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1541 - is a valid object ok 1542 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1543 - is a valid object ok 1544 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1545 - is a valid object ok 1546 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1547 - is a valid object ok 1548 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1549 - is a valid object ok 1550 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1551 - is a valid object ok 1552 - $x = Math::BigInt->new("-1"); $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("2"); $x->bdiv($y); ok 1555 - is a valid object ok 1556 - $x = Math::BigInt->new("2"); $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("26"); $x->bdiv($y); ok 1559 - is a valid object ok 1560 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1561 - is a valid object ok 1562 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1563 - is a valid object ok 1564 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1565 - is a valid object ok 1566 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1567 - is a valid object ok 1568 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1569 - is a valid object ok 1570 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1571 - is a valid object ok 1572 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1573 - is a valid object ok 1574 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1575 - is a valid object ok 1576 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1577 - is a valid object ok 1578 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x->bdiv($y); ok 1579 - is a valid object ok 1580 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x->bdiv($y); ok 1581 - is a valid object ok 1582 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x->bdiv($y); ok 1583 - is a valid object ok 1584 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1585 - is a valid object ok 1586 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x->bdiv($y); ok 1587 - is a valid object ok 1588 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x->bdiv($y); ok 1589 - is a valid object ok 1590 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x->bdiv($y); ok 1591 - is a valid object ok 1592 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x->bdiv($y); ok 1593 - is a valid object ok 1594 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1595 - is a valid object ok 1596 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x->bdiv($y); ok 1597 - is a valid object ok 1598 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x->bdiv($y); ok 1599 - is a valid object ok 1600 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x->bdiv($y); ok 1601 - is a valid object ok 1602 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1603 - is a valid object ok 1604 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1605 - is a valid object ok 1606 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1607 - is a valid object ok 1608 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1609 - is a valid object ok 1610 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1611 - is a valid object ok 1612 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1613 - is a valid object ok 1614 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1615 - is a valid object ok 1616 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1617 - is a valid object ok 1618 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1619 - is a valid object ok 1620 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1621 - is a valid object ok 1622 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1623 - is a valid object ok 1624 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1625 - is a valid object ok 1626 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1627 - is a valid object ok 1628 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1629 - is a valid object ok 1630 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1631 - is a valid object ok 1632 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1633 - is a valid object ok 1634 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x->bdiv($y); ok 1635 - is a valid object ok 1636 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x->bdiv($y); ok 1637 - is a valid object ok 1638 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x->bdiv($y); ok 1639 - is a valid object ok 1640 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x->bdiv($y); ok 1641 - is a valid object ok 1642 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x->bdiv($y); ok 1643 - is a valid object ok 1644 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1645 - is a valid object ok 1646 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1647 - is a valid object ok 1648 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1649 - is a valid object ok 1650 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1651 - is a valid object ok 1652 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x->bdiv($y); ok 1653 - is a valid object ok 1654 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1655 - is a valid object ok 1656 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1657 - is a valid object ok 1658 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1659 - is a valid object ok 1660 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1661 - is a valid object ok 1662 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x->bdiv($y); ok 1663 - is a valid object ok 1664 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x->bdiv($y); ok 1665 - is a valid object ok 1666 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x->bdiv($y); ok 1667 - is a valid object ok 1668 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x->bdiv($y); ok 1669 - is a valid object ok 1670 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x->bdiv($y); ok 1671 - is a valid object ok 1672 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x->bdiv($y); ok 1673 - is a valid object ok 1674 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x->bdiv($y); ok 1675 - is a valid object ok 1676 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x->bdiv($y); ok 1677 - is a valid object ok 1678 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x->bdiv($y); ok 1679 - is a valid object ok 1680 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x->bdiv($y); ok 1681 - is a valid object ok 1682 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); $x->bdiv($y); ok 1683 - is a valid object ok 1684 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_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("10000_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("1000_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("100_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("10_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("1_0000000_0000000_0000000"); $x->bdiv($y); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x->bdiv($y); ok 1703 - is a valid object ok 1704 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1705 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1706 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1707 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1708 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1709 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1710 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1711 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1712 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1713 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1714 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1715 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1716 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1717 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1718 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1719 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1720 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1721 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1722 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1723 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1724 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1725 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1726 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1727 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1728 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1729 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1730 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1731 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1732 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1733 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1734 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1735 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1736 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1737 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1738 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1739 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1740 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1741 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1742 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1743 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1744 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1745 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1746 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1747 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1748 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1749 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1750 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1751 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1752 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1753 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1754 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1755 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1756 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1757 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1758 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1759 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1760 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1761 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1762 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1763 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1764 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1765 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1766 - is a valid object ok 1767 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1768 - is a valid object ok 1769 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1770 - is a valid object ok 1771 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1772 - is a valid object 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("inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $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("-5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("5"); $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("-5"); $x->btdiv($y); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $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("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $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("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $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("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $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("5"); $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("5"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $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("3"); $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("4"); $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("-2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $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("3"); $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("4"); $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("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2282 - is a valid object ok 2283 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x % $y; ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x % $y; 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("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $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("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $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("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt->bgcd($x, $y); ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->bgcd($x, $y); ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt->bgcd($x, $y); ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt->bgcd($x, $y); ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt->bgcd($x, $y); ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt->bgcd($x, $y); ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt->bgcd($x, $y); ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt->bgcd($x, $y); ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt->bgcd($x, $y); ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt->bgcd($x, $y); ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt->bgcd($x, $y); ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt->bgcd($x, $y); ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt->bgcd($x, $y); ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt->bgcd($x, $y); ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt->bgcd($x, $y); ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt->bgcd($x, $y); ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt->bgcd($x, $y); ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt->bgcd($x, $y); ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt->bgcd($x, $y, $z); ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt->bgcd($x, $y, $z); ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt->blcm($x, $y); ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt->blcm($x, $y); ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt->blcm($x, $y); ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt->blcm($x, $y); ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt->blcm($x, $y); ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2634 - is a valid object ok 2635 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2636 - is a valid object ok 2637 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2638 - is a valid object ok 2639 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2640 - is a valid object ok 2641 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2642 - is a valid object ok 2643 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2644 - is a valid object ok 2645 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2646 - is a valid object ok 2647 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2648 - is a valid object ok 2649 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2650 - is a valid object ok 2651 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2652 - is a valid object ok 2653 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2654 - is a valid object ok 2655 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2656 - is a valid object ok 2657 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2658 - is a valid object ok 2659 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2660 - is a valid object ok 2661 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2662 - is a valid object ok 2663 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2664 - is a valid object ok 2665 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2666 - is a valid object ok 2667 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2668 - is a valid object ok 2669 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2670 - is a valid object ok 2671 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2672 - is a valid object ok 2673 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2674 - is a valid object ok 2675 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2676 - is a valid object ok 2677 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2678 - is a valid object ok 2679 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2680 - is a valid object ok 2681 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2682 - is a valid object ok 2683 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2684 - is a valid object ok 2685 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2686 - is a valid object ok 2687 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2688 - is a valid object ok 2689 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2690 - is a valid object ok 2691 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2692 - is a valid object ok 2693 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2694 - is a valid object ok 2695 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2696 - is a valid object ok 2697 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2698 - is a valid object ok 2699 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2700 - is a valid object ok 2701 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2702 - is a valid object ok 2703 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2704 - is a valid object ok 2705 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2706 - is a valid object ok 2707 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2708 - is a valid object ok 2709 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2710 - is a valid object ok 2711 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2712 - is a valid object ok 2713 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2714 - is a valid object ok 2715 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2716 - is a valid object ok 2717 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2718 - is a valid object ok 2719 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2720 - is a valid object ok 2721 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2722 - is a valid object ok 2723 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2724 - is a valid object ok 2725 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2726 - is a valid object ok 2727 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2728 - is a valid object ok 2729 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2730 - is a valid object ok 2731 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2732 - is a valid object ok 2733 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2734 - is a valid object ok 2735 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2736 - is a valid object ok 2737 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2738 - is a valid object ok 2739 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2740 - is a valid object ok 2741 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2742 - is a valid object ok 2743 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2744 - is a valid object ok 2745 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2746 - is a valid object ok 2747 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2748 - is a valid object ok 2749 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2750 - is a valid object ok 2751 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2752 - is a valid object ok 2753 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2754 - is a valid object ok 2755 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2756 - is a valid object ok 2757 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2758 - is a valid object ok 2759 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2760 - is a valid object ok 2761 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2762 - is a valid object ok 2763 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2764 - is a valid object ok 2765 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2766 - is a valid object ok 2767 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2768 - is a valid object ok 2769 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2770 - is a valid object ok 2771 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2772 - is a valid object ok 2773 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2774 - is a valid object ok 2775 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2776 - is a valid object ok 2777 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2778 - is a valid object ok 2779 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2780 - is a valid object ok 2781 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2782 - is a valid object ok 2783 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2784 - is a valid object ok 2785 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2786 - is a valid object ok 2787 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2788 - is a valid object ok 2789 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2790 - is a valid object ok 2791 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2792 - is a valid object ok 2793 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 2794 - is a valid object ok 2795 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2796 - is a valid object ok 2797 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2798 - is a valid object ok 2799 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2800 - is a valid object ok 2801 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2802 - is a valid object ok 2803 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2804 - is a valid object ok 2805 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2806 - is a valid object ok 2807 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2808 - is a valid object ok 2809 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2810 - is a valid object ok 2811 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2812 - is a valid object ok 2813 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2814 - is a valid object ok 2815 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2816 - is a valid object ok 2817 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2818 - is a valid object ok 2819 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2820 - is a valid object ok 2821 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2822 - is a valid object ok 2823 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2824 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2825 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2826 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2827 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2828 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2829 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2830 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2831 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2832 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2833 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2834 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2835 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2836 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2837 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2838 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2839 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2840 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2841 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2842 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2843 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2844 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2845 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2846 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2847 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2848 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2849 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2850 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2851 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2852 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2853 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2854 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2855 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2856 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2857 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2858 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2859 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2860 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2861 - $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 2862 - $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 2863 - $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 2864 - $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 2865 - $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 2866 - $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 2867 - $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 2868 - $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 2869 - $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 2870 - $x = Math::BigInt->new("NaN"); $x->bfac(); ok 2871 - is a valid object ok 2872 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2873 - is a valid object ok 2874 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2875 - is a valid object ok 2876 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2877 - is a valid object ok 2878 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2879 - is a valid object ok 2880 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2881 - is a valid object ok 2882 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2883 - is a valid object ok 2884 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2885 - is a valid object ok 2886 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2887 - is a valid object ok 2888 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("NaN"); $x->bdfac(); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("+inf"); $x->bdfac(); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("-inf"); $x->bdfac(); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("-2"); $x->bdfac(); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("-1"); $x->bdfac(); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("0"); $x->bdfac(); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("1"); $x->bdfac(); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("2"); $x->bdfac(); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("3"); $x->bdfac(); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("4"); $x->bdfac(); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("5"); $x->bdfac(); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("6"); $x->bdfac(); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("7"); $x->bdfac(); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("8"); $x->bdfac(); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("9"); $x->bdfac(); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("10"); $x->bdfac(); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("11"); $x->bdfac(); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("12"); $x->bdfac(); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("NaN"); $x->btfac(); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("+inf"); $x->btfac(); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("-inf"); $x->btfac(); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("-3"); $x->btfac(); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("-2"); $x->btfac(); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("-1"); $x->btfac(); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("0"); $x->btfac(); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("1"); $x->btfac(); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("2"); $x->btfac(); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("3"); $x->btfac(); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("4"); $x->btfac(); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("5"); $x->btfac(); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("6"); $x->btfac(); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("7"); $x->btfac(); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("8"); $x->btfac(); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("9"); $x->btfac(); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("10"); $x->btfac(); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("11"); $x->btfac(); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("12"); $x->btfac(); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("-inf"); $x->bmfac($y); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("-1"); $x->bmfac($y); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bmfac($y); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("inf"); $x->bmfac($y); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("NaN"); $x->bmfac($y); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x ** $y; ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("3"); $x ** $y; ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("0"); $x ** $y; ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x ** $y; ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x ** $y; ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x ** $y; ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3293 - is a valid object ok 3294 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3295 - is a valid object ok 3296 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3297 - is a valid object ok 3298 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 3299 - is a valid object ok 3300 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3301 - is a valid object ok 3302 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3303 - is a valid object ok 3304 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3305 - is a valid object ok 3306 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3307 - is a valid object ok 3308 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3309 - is a valid object ok 3310 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3311 - is a valid object ok 3312 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3313 - is a valid object ok 3314 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3315 - is a valid object ok 3316 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $x ** $y; ok 3317 - is a valid object ok 3318 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x ** $y; ok 3319 - is a valid object ok 3320 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3321 - is a valid object ok 3322 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3323 - is a valid object ok 3324 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3325 - is a valid object ok 3326 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3327 - is a valid object ok 3328 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3329 - is a valid object ok 3330 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3331 - is a valid object ok 3332 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3333 - is a valid object ok 3334 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3335 - is a valid object ok 3336 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 3337 - is a valid object ok 3338 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x ** $y; ok 3339 - is a valid object ok 3340 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 3341 - is a valid object ok 3342 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("3"); $x ** $y; ok 3343 - is a valid object ok 3344 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3345 - is a valid object ok 3346 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3347 - is a valid object ok 3348 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3349 - is a valid object ok 3350 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3351 - is a valid object ok 3352 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3353 - is a valid object ok 3354 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3355 - is a valid object ok 3356 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x ** $y; ok 3357 - is a valid object ok 3358 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x ** $y; ok 3359 - is a valid object ok 3360 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x ** $y; ok 3361 - is a valid object ok 3362 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("3"); $x ** $y; ok 3363 - is a valid object ok 3364 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3365 - is a valid object ok 3366 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3367 - is a valid object ok 3368 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 3369 - is a valid object ok 3370 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 3371 - is a valid object ok 3372 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 3373 - is a valid object ok 3374 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 3375 - is a valid object ok 3376 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 3377 - is a valid object ok 3378 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 3379 - is a valid object ok 3380 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 3381 - is a valid object ok 3382 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 3383 - is a valid object ok 3384 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 3385 - is a valid object ok 3386 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 3387 - is a valid object ok 3388 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 3389 - is a valid object ok 3390 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 3391 - is a valid object ok 3392 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 3393 - is a valid object ok 3394 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("100"); $x->length(); ok 3409 - $x = Math::BigInt->new("10"); $x->length(); ok 3410 - $x = Math::BigInt->new("1"); $x->length(); ok 3411 - $x = Math::BigInt->new("0"); $x->length(); ok 3412 - $x = Math::BigInt->new("12345"); $x->length(); ok 3413 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 3414 - $x = Math::BigInt->new("-123"); $x->length(); ok 3415 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 3416 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3417 - is a valid object ok 3418 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3419 - is a valid object ok 3420 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3421 - is a valid object ok 3422 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3423 - is a valid object ok 3424 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3425 - is a valid object ok 3426 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3427 - is a valid object ok 3428 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3429 - is a valid object ok 3430 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3431 - is a valid object ok 3432 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3433 - is a valid object ok 3434 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3435 - is a valid object ok 3436 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3437 - is a valid object ok 3438 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3439 - is a valid object ok 3440 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3441 - is a valid object ok 3442 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3443 - is a valid object ok 3444 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3445 - is a valid object ok 3446 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3447 - is a valid object ok 3448 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3449 - is a valid object ok 3450 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3451 - is a valid object ok 3452 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3453 - is a valid object ok 3454 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3455 - is a valid object ok 3456 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3457 - is a valid object ok 3458 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3459 - is a valid object ok 3460 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3461 - is a valid object ok 3462 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3463 - is a valid object ok 3464 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3465 - is a valid object ok 3466 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 3467 - is a valid object ok 3468 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3469 - is a valid object ok 3470 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3471 - is a valid object ok 3472 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3473 - is a valid object ok 3474 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3475 - is a valid object ok 3476 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3477 - is a valid object ok 3478 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3479 - is a valid object ok 3480 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3481 - is a valid object ok 3482 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3483 - is a valid object ok 3484 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3485 - is a valid object ok 3486 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3487 - is a valid object ok 3488 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3489 - is a valid object ok 3490 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3491 - is a valid object ok 3492 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3493 - is a valid object ok 3494 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3495 - is a valid object ok 3496 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3497 - is a valid object ok 3498 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3499 - is a valid object ok 3500 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 3501 - is a valid object ok 3502 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 3503 - is a valid object ok 3504 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 3505 - is a valid object ok 3506 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 3507 - is a valid object ok 3508 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 3509 - is a valid object ok 3510 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 3511 - is a valid object ok 3512 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 3513 - is a valid object ok 3514 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 3515 - is a valid object ok 3516 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 3517 - is a valid object ok 3518 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 3519 - is a valid object ok 3520 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 3521 - is a valid object ok 3522 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 3523 - is a valid object ok 3524 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 3525 - is a valid object ok 3526 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 3527 - is a valid object ok 3528 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3529 - is a valid object ok 3530 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3531 - is a valid object ok 3532 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3533 - is a valid object ok 3534 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3535 - is a valid object ok 3536 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3537 - is a valid object ok 3538 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3539 - is a valid object ok 3540 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3541 - is a valid object ok 3542 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3543 - is a valid object ok 3544 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3545 - is a valid object ok 3546 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3547 - is a valid object ok 3548 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3549 - is a valid object ok 3550 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3551 - is a valid object ok 3552 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3553 - is a valid object ok 3554 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3555 - is a valid object ok 3556 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3557 - is a valid object ok 3558 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3559 - is a valid object ok 3560 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3561 - is a valid object ok 3562 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3563 - is a valid object ok 3564 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3565 - is a valid object ok 3566 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3567 - is a valid object ok 3568 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3569 - is a valid object ok 3570 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3571 - is a valid object ok 3572 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3573 - is a valid object ok 3574 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3575 - is a valid object ok 3576 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3577 - is a valid object ok 3578 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3579 - is a valid object ok 3580 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3581 - is a valid object ok 3582 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3583 - is a valid object ok 3584 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3585 - is a valid object ok 3586 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3587 - is a valid object ok 3588 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3589 - is a valid object ok 3590 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3591 - is a valid object ok 3592 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3593 - is a valid object ok 3594 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3595 - is a valid object ok 3596 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3597 - is a valid object ok 3598 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3599 - is a valid object ok 3600 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3601 - is a valid object ok 3602 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3603 - is a valid object ok 3604 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3605 - is a valid object ok 3606 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3607 - is a valid object ok 3608 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3609 - is a valid object ok 3610 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3611 - is a valid object ok 3612 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3613 - is a valid object ok 3614 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3615 - is a valid object ok 3616 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3617 - is a valid object ok 3618 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3619 - is a valid object ok 3620 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3621 - is a valid object ok 3622 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3623 - is a valid object ok 3624 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3625 - is a valid object ok 3626 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3627 - is a valid object ok 3628 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3629 - is a valid object ok 3630 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3631 - is a valid object ok 3632 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3633 - is a valid object ok 3634 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3635 - is a valid object ok 3636 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3637 - is a valid object ok 3638 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3639 - is a valid object ok 3640 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3641 - is a valid object ok 3642 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3643 - is a valid object ok 3644 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3645 - is a valid object ok 3646 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3647 - is a valid object ok 3648 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3649 - is a valid object ok 3650 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3651 - is a valid object ok 3652 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3653 - is a valid object ok 3654 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3655 - is a valid object ok 3656 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3657 - is a valid object ok 3658 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3659 - is a valid object ok 3660 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3661 - is a valid object ok 3662 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3663 - is a valid object ok 3664 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3665 - is a valid object ok 3666 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3667 - is a valid object ok 3668 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3669 - is a valid object ok 3670 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3671 - is a valid object ok 3672 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3673 - is a valid object ok 3674 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3675 - is a valid object ok 3676 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3677 - is a valid object ok 3678 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3679 - is a valid object ok 3680 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3681 - is a valid object ok 3682 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3683 - is a valid object ok 3684 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3685 - is a valid object ok 3686 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3687 - is a valid object ok 3688 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3689 - is a valid object ok 3690 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3691 - is a valid object ok 3692 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3693 - is a valid object ok 3694 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3695 - is a valid object ok 3696 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3697 - is a valid object ok 3698 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3699 - is a valid object ok 3700 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3701 - is a valid object ok 3702 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3703 - is a valid object ok 3704 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3705 - is a valid object ok 3706 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3707 - is a valid object ok 3708 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3709 - is a valid object ok 3710 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3711 - is a valid object ok 3712 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3713 - is a valid object ok 3714 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3715 - is a valid object ok 3716 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3717 - is a valid object ok 3718 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3719 - is a valid object ok 3720 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3721 - is a valid object ok 3722 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3723 - is a valid object ok 3724 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3725 - is a valid object ok 3726 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3727 - is a valid object ok 3728 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3729 - is a valid object ok 3730 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3731 - is a valid object ok 3732 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3733 - is a valid object ok 3734 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3735 - is a valid object ok 3736 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3737 - is a valid object ok 3738 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3739 - is a valid object ok 3740 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3741 - is a valid object ok 3742 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3743 - is a valid object ok 3744 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3745 - is a valid object ok 3746 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3747 - is a valid object ok 3748 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3749 - is a valid object ok 3750 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3751 - is a valid object ok 3752 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3753 - is a valid object ok 3754 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3755 - is a valid object ok 3756 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3757 - is a valid object ok 3758 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3759 - is a valid object ok 3760 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3761 - is a valid object ok 3762 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3763 - is a valid object ok 3764 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3765 - is a valid object ok 3766 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3767 - is a valid object ok 3768 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3769 - is a valid object ok 3770 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3771 - is a valid object ok 3772 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3773 - is a valid object ok 3774 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3775 - is a valid object ok 3776 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3777 - is a valid object ok 3778 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3779 - is a valid object ok 3780 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3781 - is a valid object ok 3782 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3783 - is a valid object ok 3784 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3785 - is a valid object ok 3786 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3787 - is a valid object ok 3788 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3789 - is a valid object ok 3790 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3791 - is a valid object ok 3792 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3793 - is a valid object ok 3794 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3795 - is a valid object ok 3796 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3797 - is a valid object ok 3798 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3799 - is a valid object ok 3800 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3801 - is a valid object ok 3802 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3803 - is a valid object ok 3804 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3805 - is a valid object ok 3806 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3807 - is a valid object ok 3808 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3809 - is a valid object ok 3810 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3811 - is a valid object ok 3812 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3813 - is a valid object ok 3814 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3815 - is a valid object ok 3816 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3817 - is a valid object ok 3818 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3819 - is a valid object ok 3820 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3821 - $x = Math::BigInt->new("invalid"); $x->is_zero() || 0; ok 3822 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3823 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3824 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3825 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3826 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3827 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3828 - $x = Math::BigInt->new("invalid"); $x->is_one() || 0; ok 3829 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3830 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3831 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3832 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3833 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3834 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3835 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3836 - is a valid object ok 3837 - $x = Math::BigInt->new("invalid"); $x->bfloor(); ok 3838 - is a valid object ok 3839 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3840 - is a valid object ok 3841 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3842 - is a valid object ok 3843 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3844 - is a valid object ok 3845 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3846 - is a valid object ok 3847 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3848 - is a valid object ok 3849 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3850 - is a valid object ok 3851 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3852 - is a valid object ok 3853 - $x = Math::BigInt->new("invalid"); $x->bceil(); ok 3854 - is a valid object ok 3855 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3856 - is a valid object ok 3857 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3858 - is a valid object ok 3859 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3860 - is a valid object ok 3861 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3862 - is a valid object ok 3863 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3864 - is a valid object ok 3865 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3866 - is a valid object ok 3867 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3868 - is a valid object ok 3869 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3870 - is a valid object ok 3871 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3872 - is a valid object ok 3873 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3874 - is a valid object ok 3875 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3876 - is a valid object ok 3877 - $x = Math::BigInt->new("0"); $x->bint(); ok 3878 - is a valid object ok 3879 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3880 - is a valid object ok 3881 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3882 - is a valid object ok 3883 - $x = Math::BigInt->new("2"); $x->bint(); ok 3884 - is a valid object ok 3885 - $x = Math::BigInt->new("3"); $x->bint(); ok 3886 - is a valid object ok 3887 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3888 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3889 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3890 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3891 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3892 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3893 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3894 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3895 - $x = Math::BigInt->new("invalid"); $x->as_hex(); ok 3896 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3897 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3898 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3899 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3900 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3901 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3902 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3903 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3904 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3905 - $x = Math::BigInt->new("invalid"); $x->as_bin(); ok 3906 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3907 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3908 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3909 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3910 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3911 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3912 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3913 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3914 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3915 - $x = Math::BigInt->new("invalid"); $x->as_oct(); ok 3916 - $x = Math::BigInt->new("128"); $x->to_hex(); ok 3917 - $x = Math::BigInt->new("-128"); $x->to_hex(); ok 3918 - $x = Math::BigInt->new("0"); $x->to_hex(); ok 3919 - $x = Math::BigInt->new("-0"); $x->to_hex(); ok 3920 - $x = Math::BigInt->new("1"); $x->to_hex(); ok 3921 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_hex(); ok 3922 - $x = Math::BigInt->new("+inf"); $x->to_hex(); ok 3923 - $x = Math::BigInt->new("-inf"); $x->to_hex(); ok 3924 - $x = Math::BigInt->new("invalid"); $x->to_hex(); ok 3925 - $x = Math::BigInt->new("128"); $x->to_bin(); ok 3926 - $x = Math::BigInt->new("-128"); $x->to_bin(); ok 3927 - $x = Math::BigInt->new("0"); $x->to_bin(); ok 3928 - $x = Math::BigInt->new("-0"); $x->to_bin(); ok 3929 - $x = Math::BigInt->new("1"); $x->to_bin(); ok 3930 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 3931 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_bin(); ok 3932 - $x = Math::BigInt->new("+inf"); $x->to_bin(); ok 3933 - $x = Math::BigInt->new("-inf"); $x->to_bin(); ok 3934 - $x = Math::BigInt->new("invalid"); $x->to_bin(); ok 3935 - $x = Math::BigInt->new("128"); $x->to_oct(); ok 3936 - $x = Math::BigInt->new("-128"); $x->to_oct(); ok 3937 - $x = Math::BigInt->new("0"); $x->to_oct(); ok 3938 - $x = Math::BigInt->new("-0"); $x->to_oct(); ok 3939 - $x = Math::BigInt->new("1"); $x->to_oct(); ok 3940 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 3941 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_oct(); ok 3942 - $x = Math::BigInt->new("+inf"); $x->to_oct(); ok 3943 - $x = Math::BigInt->new("-inf"); $x->to_oct(); ok 3944 - $x = Math::BigInt->new("invalid"); $x->to_oct(); ok 3945 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3946 - is a valid object ok 3947 - $x = Math::BigInt->new("0"); $x = log($x); ok 3948 - is a valid object ok 3949 - $x = Math::BigInt->new("1"); $x = log($x); ok 3950 - is a valid object ok 3951 - $x = Math::BigInt->new("2"); $x = log($x); ok 3952 - is a valid object ok 3953 - $x = Math::BigInt->new("3"); $x = log($x); ok 3954 - is a valid object ok 3955 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3956 - is a valid object ok 3957 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3958 - is a valid object ok 3959 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3960 - is a valid object ok 3961 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3962 - is a valid object ok 3963 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3964 - is a valid object ok 3965 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3966 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3967 - $z = $x & $y; $x ok 3968 - $z = $x & $y; $y ok 3969 - $z = $x & $y; $z ok 3970 - $z = $x | $y; $x ok 3971 - $z = $x | $y; $y ok 3972 - $z = $x | $y; $z ok 3973 - $z = $x | $y; $x ok 3974 - $z = $x | $y; $y ok 3975 - $z = $x | $y; $z ok 3976 - $z = $x ^ $y; $x ok 3977 - $z = $x ^ $y; $y ok 3978 - $z = $x ^ $y; $z ok 3979 - $y = -$x; $x ok 3980 - $y = abs($x); $x ok 3981 - $x->copy()->bmodpow($y, $z); $u ok 3982 - $x->copy()->bmodpow($y, $z); $y ok 3983 - $x->copy()->bmodpow($y, $z); $z ok 3984 - $y = -$x; $x ok 3985 - $y = -$x; $y ok 3986 - $y = $x->copy()->bneg(); $x ok 3987 - $y = $x->copy()->bneg(); $y ok 3988 - $x->bmul($y); $x ok 3989 - $x->bmul($y); $y ok 3990 - $x->badd($y); $x ok 3991 - $x->badd($y); $y ok 3992 - $x->bsub($y); $x ok 3993 - $x->bsub($y); $y ok 3994 - $x->bdiv($y); $x ok 3995 - $x->bdiv($y); $y ok 3996 - $x->bmod($y); $x ok 3997 - $x->bmod($y); $y ok 3998 - $x->bmul($y); $x ok 3999 - $x->bmul($y); $y ok 4000 - $x->badd($y); $x ok 4001 - $x->badd($y); $y ok 4002 - $x->bsub($y); $x ok 4003 - $x->bsub($y); $y ok 4004 - $x->bdiv($y); $x ok 4005 - $x->bdiv($y); $y ok 4006 - $x->bmod($y); $x ok 4007 - $x->bmod($y); $y ok 4008 - $x->bmul($y); $x ok 4009 - $x->bmul($y); $y ok 4010 - $x->badd($y); $x ok 4011 - $x->badd($y); $y ok 4012 - $x->bsub($y); $x ok 4013 - $x->bsub($y); $y ok 4014 - $x->bdiv($y); $x ok 4015 - $x->bdiv($y); $y ok 4016 - $x->bmod($y); $x ok 4017 - $x->bmod($y); $y ok 4018 - overloading cmp works ok 4019 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 4020 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 4021 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 4022 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 4023 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 4024 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 4025 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 4026 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 4027 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 4028 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 4029 - $x = Math::BigInt->new(1); $x is true ok 4030 - $x = Math::BigInt->new(0); !$x is false ok 4031 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 4032 - first arg matches /^Math::BigInt/ ok 4033 - second arg is 4 ok 4034 - third arg is 5 ok 4035 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 4036 - first arg matches /^Math::BigInt/ ok 4037 - second arg is 4 ok 4038 - third arg is 5 ok 4039 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 4040 - first arg matches /^Math::BigInt/ ok 4041 - second arg is 4 ok 4042 - third arg is 5 ok 4043 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 4044 - first arg matches /^Math::BigInt/ ok 4045 - second arg is 4 ok 4046 - second arg is a Math::BigInt object ok 4047 - third arg is 5 ok 4048 - third arg is a Math::BigInt object ok 4049 - fourth arg is 6 ok 4050 - fourth arg is a scalar ok 4051 - fifth arg is 7 ok 4052 - fifth arg is a scalar ok 4053 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 4054 - first arg is Math::BigInt ok 4055 - second arg is 4 ok 4056 - second arg is a Math::BigInt object ok 4057 - third arg is 5 ok 4058 - third arg is a Math::BigInt object ok 4059 - fourth arg is 6 ok 4060 - fourth arg is a scalar ok 4061 - fifth arg is 7 ok 4062 - fifth arg is a scalar ok 4063 - Math::BigInt->new(123)->badd(123) = 246 ok 4064 - Math::BigInt->badd(123, 321) = 444 ok 4065 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 4066 - Math::BigInt->new(123)->bsub(122) = 1 ok 4067 - Math::BigInt->bsub(321, 123) = 198 ok 4068 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 4069 - Math::BigInt->new(123)->bmul(123) = 15129 ok 4070 - Math::BigInt->bmul(123, 123) = 15129 ok 4071 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 4072 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 4073 - Math::BigInt->bdiv(15129, 123) = 123 ok 4074 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 4075 - Math::BigInt->new(15131)->bmod(123) = 2 ok 4076 - Math::BigInt->bmod(15131, 123) = 2 ok 4077 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 4078 - Math::BigInt->new(2)->bpow(16) = 65536 ok 4079 - Math::BigInt->bpow(2, 16) = 65536 ok 4080 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 4081 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 4082 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 4083 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 4084 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 4085 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 4086 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 4087 - $x = Math::BigInt->new(1050000000000000); $x->bsstr() = "105e+13" ok 4088 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 4089 - Math::BigInt->new("1") = 1 ok 4090 - Math::BigInt->new(" 1") = 1 ok 4091 - Math::BigInt->new("1 ") = 1 ok 4092 - Math::BigInt->new(" 1 ") = 1 ok 4093 - Math::BigInt->new("\n1") = 1 ok 4094 - Math::BigInt->new("1\n") = 1 ok 4095 - Math::BigInt->new("\n1\n") = 1 ok 4096 - Math::BigInt->new(" \n1\n") = 1 ok 4097 - Math::BigInt->new(" \n1 \n") = 1 ok 4098 - Math::BigInt->new(" \n1\n ") = 1 ok 4099 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 4100 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 4101 - Math::BigInt->new("12") = 12 ok 4102 - Math::BigInt->new(" 12") = 12 ok 4103 - Math::BigInt->new("12 ") = 12 ok 4104 - Math::BigInt->new(" 12 ") = 12 ok 4105 - Math::BigInt->new("\n12") = 12 ok 4106 - Math::BigInt->new("12\n") = 12 ok 4107 - Math::BigInt->new("\n12\n") = 12 ok 4108 - Math::BigInt->new(" \n12\n") = 12 ok 4109 - Math::BigInt->new(" \n12 \n") = 12 ok 4110 - Math::BigInt->new(" \n12\n ") = 12 ok 4111 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 4112 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 4113 - Math::BigInt->new("123") = 123 ok 4114 - Math::BigInt->new(" 123") = 123 ok 4115 - Math::BigInt->new("123 ") = 123 ok 4116 - Math::BigInt->new(" 123 ") = 123 ok 4117 - Math::BigInt->new("\n123") = 123 ok 4118 - Math::BigInt->new("123\n") = 123 ok 4119 - Math::BigInt->new("\n123\n") = 123 ok 4120 - Math::BigInt->new(" \n123\n") = 123 ok 4121 - Math::BigInt->new(" \n123 \n") = 123 ok 4122 - Math::BigInt->new(" \n123\n ") = 123 ok 4123 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 4124 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 4125 - Math::BigInt->new("1234") = 1234 ok 4126 - Math::BigInt->new(" 1234") = 1234 ok 4127 - Math::BigInt->new("1234 ") = 1234 ok 4128 - Math::BigInt->new(" 1234 ") = 1234 ok 4129 - Math::BigInt->new("\n1234") = 1234 ok 4130 - Math::BigInt->new("1234\n") = 1234 ok 4131 - Math::BigInt->new("\n1234\n") = 1234 ok 4132 - Math::BigInt->new(" \n1234\n") = 1234 ok 4133 - Math::BigInt->new(" \n1234 \n") = 1234 ok 4134 - Math::BigInt->new(" \n1234\n ") = 1234 ok 4135 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 4136 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 4137 - Math::BigInt->new("12345") = 12345 ok 4138 - Math::BigInt->new(" 12345") = 12345 ok 4139 - Math::BigInt->new("12345 ") = 12345 ok 4140 - Math::BigInt->new(" 12345 ") = 12345 ok 4141 - Math::BigInt->new("\n12345") = 12345 ok 4142 - Math::BigInt->new("12345\n") = 12345 ok 4143 - Math::BigInt->new("\n12345\n") = 12345 ok 4144 - Math::BigInt->new(" \n12345\n") = 12345 ok 4145 - Math::BigInt->new(" \n12345 \n") = 12345 ok 4146 - Math::BigInt->new(" \n12345\n ") = 12345 ok 4147 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 4148 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 4149 - Math::BigInt->new("123456") = 123456 ok 4150 - Math::BigInt->new(" 123456") = 123456 ok 4151 - Math::BigInt->new("123456 ") = 123456 ok 4152 - Math::BigInt->new(" 123456 ") = 123456 ok 4153 - Math::BigInt->new("\n123456") = 123456 ok 4154 - Math::BigInt->new("123456\n") = 123456 ok 4155 - Math::BigInt->new("\n123456\n") = 123456 ok 4156 - Math::BigInt->new(" \n123456\n") = 123456 ok 4157 - Math::BigInt->new(" \n123456 \n") = 123456 ok 4158 - Math::BigInt->new(" \n123456\n ") = 123456 ok 4159 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 4160 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 4161 - Math::BigInt->new("1234567") = 1234567 ok 4162 - Math::BigInt->new(" 1234567") = 1234567 ok 4163 - Math::BigInt->new("1234567 ") = 1234567 ok 4164 - Math::BigInt->new(" 1234567 ") = 1234567 ok 4165 - Math::BigInt->new("\n1234567") = 1234567 ok 4166 - Math::BigInt->new("1234567\n") = 1234567 ok 4167 - Math::BigInt->new("\n1234567\n") = 1234567 ok 4168 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 4169 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 4170 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 4171 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 4172 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 4173 - Math::BigInt->new("12345678") = 12345678 ok 4174 - Math::BigInt->new(" 12345678") = 12345678 ok 4175 - Math::BigInt->new("12345678 ") = 12345678 ok 4176 - Math::BigInt->new(" 12345678 ") = 12345678 ok 4177 - Math::BigInt->new("\n12345678") = 12345678 ok 4178 - Math::BigInt->new("12345678\n") = 12345678 ok 4179 - Math::BigInt->new("\n12345678\n") = 12345678 ok 4180 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 4181 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 4182 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 4183 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 4184 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 4185 - Math::BigInt->new("123456789") = 123456789 ok 4186 - Math::BigInt->new(" 123456789") = 123456789 ok 4187 - Math::BigInt->new("123456789 ") = 123456789 ok 4188 - Math::BigInt->new(" 123456789 ") = 123456789 ok 4189 - Math::BigInt->new("\n123456789") = 123456789 ok 4190 - Math::BigInt->new("123456789\n") = 123456789 ok 4191 - Math::BigInt->new("\n123456789\n") = 123456789 ok 4192 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 4193 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 4194 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 4195 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 4196 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 4197 - Math::BigInt->new("1234567890") = 1234567890 ok 4198 - Math::BigInt->new(" 1234567890") = 1234567890 ok 4199 - Math::BigInt->new("1234567890 ") = 1234567890 ok 4200 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 4201 - Math::BigInt->new("\n1234567890") = 1234567890 ok 4202 - Math::BigInt->new("1234567890\n") = 1234567890 ok 4203 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 4204 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 4205 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 4206 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 4207 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 4208 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 4209 - value of ((2^148)+1)/17 ok 4210 - number of digits in ((2^148)+1)/17 ok 4211 - value of 2^127-1 ok 4212 - number of digits in 2^127-1 ok 4213 - number of digits in fraction part of 2^127-1 ok 4214 - number of digits in 1_000_000_000_000 ok 4215 - number of digits in fraction part of 1_000_000_000_000 ok 4216 - 2 <<= 18 with Math::BigInt objects ok 4217 - 2 <<= 18 with Math::BigInt objects ok 4218 - 2 >>= 18 with Math::BigInt objects ok 4219 - 2 >>= 18 with Math::BigInt objects ok 4220 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 4221 - $x is an object of class "Math::Foo" ok 4222 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 4223 - $x is an object of class "Math::Foo" ok 4224 - Math::BigInt->new("+inf") = "inf" ok 4225 - bigint 2**64-1 as string ok 4226 - bigint 2**64-1 as number ok 4227 - bigint -2**63 as string ok 4228 - bigint -2**63 as number ok 4229 - is a valid object ok 4230 - $x == 1000000000 ok 4231 - is a valid object ok 4232 - $x == 999999999 ok 4233 - is a valid object ok 4234 - $x->numify() = $BASE-1 ok 4235 - $x->numify() = -($BASE-1) ok 4236 - $x->numify()+0 = $BASE+0 ok 4237 - $x->numify() = -$BASE ok 4238 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 4239 - $x > $BASE ok 4240 - $x > $BASE ok 4241 - $x->length() = length($MAX) ok 4242 - Math::BigInt->digit(123, 2) = 1 ok 4243 - testing bug in sub ok 4244 - testing bug in sub ok 4245 - testing number with a zero-hole of BASE_LEN_SMALL ok 4246 - see if mul shortcut for small numbers works (999999999 * 999999999 = 999999998000000001) ok 4247 - -322056000 / -12882240 has remainder 0 ok 4248 - is a valid object ok 4249 - $x->bmod(5033) = 4404 ok 4250 - Math::BigInt->bzero() = 0 ok 4251 - Math::BigInt->bone() = 1 ok 4252 - Math::BigInt->bone("+") = 1 ok 4253 - Math::BigInt->bone("-") = -1 ok 4254 - Math::BigInt->bnan() = "NaN" ok 4255 - Math::BigInt->binf() = "inf" ok 4256 - Math::BigInt->binf("+") = "inf" ok 4257 - Math::BigInt->binf("-") = "-inf" ok 4258 - Math::BigInt->binf("-inf") = "-inf" ok 4259 - Math::BigInt->new(1)->is_one("-") = 0 ok 4260 - Math::BigInt->new(-1)->is_one("-") = 1 ok 4261 - Math::BigInt->new(1)->is_one() = 1 ok 4262 - Math::BigInt->new(-1)->is_one() = 0 ok 4263 - $x = Math::BigInt->new(3); $x -= $x; = 0 ok 4264 - $x = Math::BigInt->new(-3); $x -= $x; = 0 ok 4265 - $x = Math::BigInt->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 4266 - $x = Math::BigInt->new("inf"); $x -= $x; $x->is_nan() = 1 ok 4267 - $x = Math::BigInt->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 4268 - $x = Math::BigInt->new("NaN"); $x += $x; $x->is_nan() = 1 ok 4269 - $x = Math::BigInt->new("inf"); $x += $x; $x->is_inf() = 1 ok 4270 - $x = Math::BigInt->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 4271 - $x = Math::BigInt->new(3); $x += $x; $x = 6 ok 4272 - $x = Math::BigInt->new(-3); $x += $x; $x = -6 ok 4273 - $x = Math::BigInt->new(3); $x *= $x; $x = 9 ok 4274 - $x = Math::BigInt->new(-3); $x *= $x; $x = 9 ok 4275 - $x = Math::BigInt->new(3); $x /= $x; $x = 1 ok 4276 - $x = Math::BigInt->new(-3); $x /= $x; $x = 1 ok 4277 - $x = Math::BigInt->new(3); $x %= $x; $x = 0 ok 4278 - $x = Math::BigInt->new(-3); $x %= $x; $x = 0 ok t/bare_mbr.t .................. 1..899 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v2.003003 # Math::BigInt::BareCalc ok 1 ok 2 - $x = Math::BigRat->new("123"); $x->digit(2); ok 3 - $x = Math::BigRat->new("1234"); $x->digit(0); ok 4 - $x = Math::BigRat->new("1234"); $x->digit(1); ok 5 - $x = Math::BigRat->new("1234"); $x->digit(2); ok 6 - $x = Math::BigRat->new("1234"); $x->digit(3); ok 7 - $x = Math::BigRat->new("1234"); $x->digit(-1); ok 8 - $x = Math::BigRat->new("1234"); $x->digit(-2); ok 9 - $x = Math::BigRat->new("1234"); $x->digit(-3); ok 10 - $x = Math::BigRat->new("1234"); $x->digit(-4); ok 11 - $x = Math::BigRat->new("0"); $x->digit(0); ok 12 - $x = Math::BigRat->new("0"); $x->digit(1); ok 13 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x->bmodinv($y); ok 14 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 15 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $x->bmodinv($y); ok 16 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 17 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 18 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-5"); $x->bmodinv($y); ok 19 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 20 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("5033"); $x->bmodinv($y); ok 21 - $x = Math::BigRat->new("1234567891"); $y = Math::BigRat->new("13"); $x->bmodinv($y); ok 22 - $x = Math::BigRat->new("-1234567891"); $y = Math::BigRat->new("13"); $x->bmodinv($y); ok 23 - $x = Math::BigRat->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigRat->new("2348249874968739"); $x->bmodinv($y); ok 24 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 25 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("inf"); $x->bmodinv($y); ok 26 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 27 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("-inf"); $x->bmodinv($y); ok 28 - $x = Math::BigRat->new("144/7"); $x->as_number(); ok 29 - $x = Math::BigRat->new("12/1"); $x->as_number(); ok 30 - $x = Math::BigRat->new("-12/1"); $x->as_number(); ok 31 - $x = Math::BigRat->new("-12/3"); $x->as_number(); ok 32 - $x = Math::BigRat->new("NaN"); $x->as_number(); ok 33 - $x = Math::BigRat->new("+inf"); $x->as_number(); ok 34 - $x = Math::BigRat->new("-inf"); $x->as_number(); ok 35 - $x = Math::BigRat->new("144/7"); $x->as_int(); ok 36 - $x = Math::BigRat->new("12/1"); $x->as_int(); ok 37 - $x = Math::BigRat->new("-12/1"); $x->as_int(); ok 38 - $x = Math::BigRat->new("-12/3"); $x->as_int(); ok 39 - $x = Math::BigRat->new("NaN"); $x->as_int(); ok 40 - $x = Math::BigRat->new("+inf"); $x->as_int(); ok 41 - $x = Math::BigRat->new("-inf"); $x->as_int(); ok 42 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 43 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 44 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 45 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 46 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 47 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 48 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 49 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("2"); $x->bmodpow($y, $z); ok 50 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("2"); $x->bmodpow($y, $z); ok 51 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("1"); $x->bmodpow($y, $z); ok 52 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("7"); $z = Math::BigRat->new("5032"); $x->bmodpow($y, $z); ok 53 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("-1"); $z = Math::BigRat->new("5033"); $x->bmodpow($y, $z); ok 54 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("8"); $z = Math::BigRat->new("-5"); $x->bmodpow($y, $z); ok 55 - $x = Math::BigRat->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigRat->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigRat->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 56 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("-1"); $z = Math::BigRat->new("16"); $x->bmodpow($y, $z); ok 57 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("13"); $x->bmodpow($y, $z); ok 58 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("inf"); $z = Math::BigRat->new("13"); $x->bmodpow($y, $z); ok 59 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x % $y; ok 60 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x % $y; ok 61 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1"); $x % $y; ok 62 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("2"); $x % $y; ok 63 - $x = Math::BigRat->new("12"); $y = Math::BigRat->new("6"); $x % $y; ok 64 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/14"); $x % $y; ok 65 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/16"); $x % $y; ok 66 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/16"); $x % $y; ok 67 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/16"); $x % $y; ok 68 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/16"); $x % $y; ok 69 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/32"); $x % $y; ok 70 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/32"); $x % $y; ok 71 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/32"); $x % $y; ok 72 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/32"); $x % $y; ok 73 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/28"); $x % $y; ok 74 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/28"); $x % $y; ok 75 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/28"); $x % $y; ok 76 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/28"); $x % $y; ok 77 - $x = Math::BigRat->new("1"); ; $x->bsqrt(); ok 78 - $x = Math::BigRat->new("0"); ; $x->bsqrt(); ok 79 - $x = Math::BigRat->new("NaN"); ; $x->bsqrt(); ok 80 - $x = Math::BigRat->new("+inf"); ; $x->bsqrt(); ok 81 - $x = Math::BigRat->new("-inf"); ; $x->bsqrt(); ok 82 - $x = Math::BigRat->new("144"); ; $x->bsqrt(); ok 83 - $x = Math::BigRat->new("144/4"); ; $x->bsqrt(); ok 84 - $x = Math::BigRat->new("25/16"); ; $x->bsqrt(); ok 85 - $x = Math::BigRat->new("-3"); ; $x->bsqrt(); ok 86 - $x = Math::BigRat->new("4/9"); ; $x->bsqrt(); ok 87 - $x = Math::BigRat->new("36/49"); ; $x->bsqrt(); ok 88 - $x = Math::BigRat->new("49/121"); ; $x->bsqrt(); ok 89 - $x = Math::BigRat->new("999966000289/99999820000081"); ; $x->bsqrt(); ok 90 - $x = Math::BigRat->new("NaN"); ; $x->blog(); ok 91 - $x = Math::BigRat->new("0"); ; $x->blog(); ok 92 - $x = Math::BigRat->new("-2"); ; $x->blog(); ok 93 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 94 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 95 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("0"); $x->blog($y); ok 96 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x->blog($y); ok 97 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 98 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("2"); $x->blog($y); ok 99 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-2"); $x->blog($y); ok 100 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-2"); $x->blog($y); ok 101 - $x = Math::BigRat->new("1"); $x->binf("+"); ok 102 - $x = Math::BigRat->new("2"); $x->binf("-"); ok 103 - $x = Math::BigRat->new("3"); $x->binf("abc"); ok 104 - $x = Math::BigRat->new("0"); $x->numify(); ok 105 - $x = Math::BigRat->new("+1"); $x->numify(); ok 106 - $x = Math::BigRat->new("1234"); $x->numify(); ok 107 - $x = Math::BigRat->new("3/4"); $x->numify(); ok 108 - $x = Math::BigRat->new("5/2"); $x->numify(); ok 109 - $x = Math::BigRat->new("3/2"); $x->numify(); ok 110 - $x = Math::BigRat->new("5/4"); $x->numify(); ok 111 - $x = Math::BigRat->new("abc"); $x->bnan(); ok 112 - $x = Math::BigRat->new("2"); $x->bnan(); ok 113 - $x = Math::BigRat->new("-2"); $x->bnan(); ok 114 - $x = Math::BigRat->new("0"); $x->bnan(); ok 115 - $x = Math::BigRat->new("2"); $x->bone("+"); ok 116 - $x = Math::BigRat->new("-2"); $x->bone("-"); ok 117 - $x = Math::BigRat->new("-2"); $x->bone("+"); ok 118 - $x = Math::BigRat->new("2"); $x->bone("-"); ok 119 - $x = Math::BigRat->new("0"); $x->bone(""); ok 120 - $x = Math::BigRat->new("-2"); $x->bone(""); ok 121 - $x = Math::BigRat->new("abc"); $x->bone(""); ok 122 - $x = Math::BigRat->new("2"); $x->bone("abc"); ok 123 - $x = Math::BigRat->new("+inf"); $x->bsstr(); ok 124 - $x = Math::BigRat->new("-inf"); $x->bsstr(); ok 125 - $x = Math::BigRat->new("abcfsstr"); $x->bsstr(); ok 126 - $x = Math::BigRat->new("1"); $x->bsstr(); ok 127 - $x = Math::BigRat->new("3/1"); $x->bsstr(); ok 128 - $x = Math::BigRat->new("0.1"); $x->bsstr(); ok 129 - $x = Math::BigRat->new("1"); $x; ok 130 - $x = Math::BigRat->new("-0"); $x; ok 131 - $x = Math::BigRat->new("bnormNaN"); $x; ok 132 - $x = Math::BigRat->new("+inf"); $x; ok 133 - $x = Math::BigRat->new("-inf"); $x; ok 134 - $x = Math::BigRat->new("inf/inf"); $x; ok 135 - $x = Math::BigRat->new("5/inf"); $x; ok 136 - $x = Math::BigRat->new("5/-inf"); $x; ok 137 - $x = Math::BigRat->new("inf/5"); $x; ok 138 - $x = Math::BigRat->new("-inf/5"); $x; ok 139 - $x = Math::BigRat->new("inf/-5"); $x; ok 140 - $x = Math::BigRat->new("-inf/-5"); $x; ok 141 - $x = Math::BigRat->new("123"); $x; ok 142 - $x = Math::BigRat->new("-123.4567"); $x; ok 143 - $x = Math::BigRat->new(".2E-3."); $x; ok 144 - $x = Math::BigRat->new(".2E2"); $x; ok 145 - $x = Math::BigRat->new("inf"); $x; ok 146 - $x = Math::BigRat->new("+inf"); $x; ok 147 - $x = Math::BigRat->new("-inf"); $x; ok 148 - $x = Math::BigRat->new("+InFiNiTy"); $x; ok 149 - $x = Math::BigRat->new("+-inf"); $x; ok 150 - $x = Math::BigRat->new("abc"); $x; ok 151 - $x = Math::BigRat->new(" 1 a"); $x; ok 152 - $x = Math::BigRat->new("1bcd2"); $x; ok 153 - $x = Math::BigRat->new("11111b"); $x; ok 154 - $x = Math::BigRat->new("+1z"); $x; ok 155 - $x = Math::BigRat->new("-1z"); $x; ok 156 - $x = Math::BigRat->new("0"); $x; ok 157 - $x = Math::BigRat->new("+0"); $x; ok 158 - $x = Math::BigRat->new("+00"); $x; ok 159 - $x = Math::BigRat->new("+0_0_0"); $x; ok 160 - $x = Math::BigRat->new("000000_0000000_00000"); $x; ok 161 - $x = Math::BigRat->new("-0"); $x; ok 162 - $x = Math::BigRat->new("-0000"); $x; ok 163 - $x = Math::BigRat->new("+1"); $x; ok 164 - $x = Math::BigRat->new("+01"); $x; ok 165 - $x = Math::BigRat->new("+001"); $x; ok 166 - $x = Math::BigRat->new("+00000100000"); $x; ok 167 - $x = Math::BigRat->new("+00000800/00000010"); $x; ok 168 - $x = Math::BigRat->new("-00000800/00000010"); $x; ok 169 - $x = Math::BigRat->new("+00000800/-00000010"); $x; ok 170 - $x = Math::BigRat->new("-00000800/-00000010"); $x; ok 171 - $x = Math::BigRat->new("123456789"); $x; ok 172 - $x = Math::BigRat->new("-1"); $x; ok 173 - $x = Math::BigRat->new("-01"); $x; ok 174 - $x = Math::BigRat->new("-001"); $x; ok 175 - $x = Math::BigRat->new("-123456789"); $x; ok 176 - $x = Math::BigRat->new("-00000100000"); $x; ok 177 - $x = Math::BigRat->new("123.456a"); $x; ok 178 - $x = Math::BigRat->new("123.456"); $x; ok 179 - $x = Math::BigRat->new("0.01"); $x; ok 180 - $x = Math::BigRat->new(".002"); $x; ok 181 - $x = Math::BigRat->new("+.2"); $x; ok 182 - $x = Math::BigRat->new("-0.0003"); $x; ok 183 - $x = Math::BigRat->new("-.0000000004"); $x; ok 184 - $x = Math::BigRat->new("123456E2"); $x; ok 185 - $x = Math::BigRat->new("123456E-2"); $x; ok 186 - $x = Math::BigRat->new("-123456E2"); $x; ok 187 - $x = Math::BigRat->new("-123456E-2"); $x; ok 188 - $x = Math::BigRat->new("1e1"); $x; ok 189 - $x = Math::BigRat->new("2e-11"); $x; ok 190 - $x = Math::BigRat->new("12/10"); $x; ok 191 - $x = Math::BigRat->new("0.1/0.1"); $x; ok 192 - $x = Math::BigRat->new("100/0.1"); $x; ok 193 - $x = Math::BigRat->new("0.1/10"); $x; ok 194 - $x = Math::BigRat->new("1 / 3"); $x; ok 195 - $x = Math::BigRat->new("1/ 3"); $x; ok 196 - $x = Math::BigRat->new("1 /3"); $x; ok 197 - $x = Math::BigRat->new("fnegNaN"); $x->bneg(); ok 198 - $x = Math::BigRat->new("+inf"); $x->bneg(); ok 199 - $x = Math::BigRat->new("-inf"); $x->bneg(); ok 200 - $x = Math::BigRat->new("+0"); $x->bneg(); ok 201 - $x = Math::BigRat->new("+1"); $x->bneg(); ok 202 - $x = Math::BigRat->new("-1"); $x->bneg(); ok 203 - $x = Math::BigRat->new("+123456789"); $x->bneg(); ok 204 - $x = Math::BigRat->new("-123456789"); $x->bneg(); ok 205 - $x = Math::BigRat->new("+123.456789"); $x->bneg(); ok 206 - $x = Math::BigRat->new("-123456.789"); $x->bneg(); ok 207 - $x = Math::BigRat->new("123/7"); $x->bneg(); ok 208 - $x = Math::BigRat->new("-123/7"); $x->bneg(); ok 209 - $x = Math::BigRat->new("123/-7"); $x->bneg(); ok 210 - $x = Math::BigRat->new("fabsNaN"); $x->babs(); ok 211 - $x = Math::BigRat->new("+inf"); $x->babs(); ok 212 - $x = Math::BigRat->new("-inf"); $x->babs(); ok 213 - $x = Math::BigRat->new("+0"); $x->babs(); ok 214 - $x = Math::BigRat->new("+1"); $x->babs(); ok 215 - $x = Math::BigRat->new("-1"); $x->babs(); ok 216 - $x = Math::BigRat->new("+123456789"); $x->babs(); ok 217 - $x = Math::BigRat->new("-123456789"); $x->babs(); ok 218 - $x = Math::BigRat->new("+123.456789"); $x->babs(); ok 219 - $x = Math::BigRat->new("-123456.789"); $x->babs(); ok 220 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x + $y; ok 221 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x + $y; ok 222 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x + $y; ok 223 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x + $y; ok 224 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x + $y; ok 225 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x + $y; ok 226 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x + $y; ok 227 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x + $y; ok 228 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x + $y; ok 229 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("baddNaN"); $x + $y; ok 230 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("baddNaN"); $x + $y; ok 231 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x + $y; ok 232 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x + $y; ok 233 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x + $y; ok 234 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x + $y; ok 235 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x + $y; ok 236 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x + $y; ok 237 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x + $y; ok 238 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x + $y; ok 239 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x + $y; ok 240 - $x = Math::BigRat->new("+9"); $y = Math::BigRat->new("+1"); $x + $y; ok 241 - $x = Math::BigRat->new("+99"); $y = Math::BigRat->new("+1"); $x + $y; ok 242 - $x = Math::BigRat->new("+999"); $y = Math::BigRat->new("+1"); $x + $y; ok 243 - $x = Math::BigRat->new("+9999"); $y = Math::BigRat->new("+1"); $x + $y; ok 244 - $x = Math::BigRat->new("+99999"); $y = Math::BigRat->new("+1"); $x + $y; ok 245 - $x = Math::BigRat->new("+999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 246 - $x = Math::BigRat->new("+9999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 247 - $x = Math::BigRat->new("+99999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 248 - $x = Math::BigRat->new("+999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 249 - $x = Math::BigRat->new("+9999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 250 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 251 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("-1"); $x + $y; ok 252 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("-1"); $x + $y; ok 253 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("-1"); $x + $y; ok 254 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-1"); $x + $y; ok 255 - $x = Math::BigRat->new("+100000"); $y = Math::BigRat->new("-1"); $x + $y; ok 256 - $x = Math::BigRat->new("+1000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 257 - $x = Math::BigRat->new("+10000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 258 - $x = Math::BigRat->new("+100000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 259 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 260 - $x = Math::BigRat->new("+10000000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 261 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("+987654321"); $x + $y; ok 262 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x + $y; ok 263 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("-987654321"); $x + $y; ok 264 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x + $y; ok 265 - $x = Math::BigRat->new("1/3"); $y = Math::BigRat->new("1/3"); $x + $y; ok 266 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("-1/3"); $x + $y; ok 267 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x - $y; ok 268 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x - $y; ok 269 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x - $y; ok 270 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x - $y; ok 271 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x - $y; ok 272 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x - $y; ok 273 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x - $y; ok 274 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x - $y; ok 275 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x - $y; ok 276 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("baddNaN"); $x - $y; ok 277 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("baddNaN"); $x - $y; ok 278 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x - $y; ok 279 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x - $y; ok 280 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x - $y; ok 281 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x - $y; ok 282 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x - $y; ok 283 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x - $y; ok 284 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x - $y; ok 285 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x - $y; ok 286 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x - $y; ok 287 - $x = Math::BigRat->new("+9"); $y = Math::BigRat->new("+1"); $x - $y; ok 288 - $x = Math::BigRat->new("+99"); $y = Math::BigRat->new("+1"); $x - $y; ok 289 - $x = Math::BigRat->new("+999"); $y = Math::BigRat->new("+1"); $x - $y; ok 290 - $x = Math::BigRat->new("+9999"); $y = Math::BigRat->new("+1"); $x - $y; ok 291 - $x = Math::BigRat->new("+99999"); $y = Math::BigRat->new("+1"); $x - $y; ok 292 - $x = Math::BigRat->new("+999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 293 - $x = Math::BigRat->new("+9999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 294 - $x = Math::BigRat->new("+99999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 295 - $x = Math::BigRat->new("+999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 296 - $x = Math::BigRat->new("+9999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 297 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 298 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("-1"); $x - $y; ok 299 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("-1"); $x - $y; ok 300 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("-1"); $x - $y; ok 301 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-1"); $x - $y; ok 302 - $x = Math::BigRat->new("+100000"); $y = Math::BigRat->new("-1"); $x - $y; ok 303 - $x = Math::BigRat->new("+1000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 304 - $x = Math::BigRat->new("+10000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 305 - $x = Math::BigRat->new("+100000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 306 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 307 - $x = Math::BigRat->new("+10000000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 308 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("+987654321"); $x - $y; ok 309 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x - $y; ok 310 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("-987654321"); $x - $y; ok 311 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x - $y; ok 312 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("1/3"); $x - $y; ok 313 - $x = Math::BigRat->new("7/27"); $y = Math::BigRat->new("3/54"); $x - $y; ok 314 - $x = Math::BigRat->new("-2/3"); $y = Math::BigRat->new("+2/3"); $x - $y; ok 315 - $x = Math::BigRat->new("-2/3"); $y = Math::BigRat->new("-2/3"); $x - $y; ok 316 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-123"); $x - $y; ok 317 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("123"); $x - $y; ok 318 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x * $y; ok 319 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x * $y; ok 320 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x * $y; ok 321 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaNmul"); $x * $y; ok 322 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaNmul"); $x * $y; ok 323 - $x = Math::BigRat->new("NaNmul"); $y = Math::BigRat->new("+inf"); $x * $y; ok 324 - $x = Math::BigRat->new("NaNmul"); $y = Math::BigRat->new("-inf"); $x * $y; ok 325 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x * $y; ok 326 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x * $y; ok 327 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x * $y; ok 328 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x * $y; ok 329 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("123.34"); $x * $y; ok 330 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-123.34"); $x * $y; ok 331 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("123.34"); $x * $y; ok 332 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-123.34"); $x * $y; ok 333 - $x = Math::BigRat->new("123.34"); $y = Math::BigRat->new("+inf"); $x * $y; ok 334 - $x = Math::BigRat->new("-123.34"); $y = Math::BigRat->new("+inf"); $x * $y; ok 335 - $x = Math::BigRat->new("123.34"); $y = Math::BigRat->new("-inf"); $x * $y; ok 336 - $x = Math::BigRat->new("-123.34"); $y = Math::BigRat->new("-inf"); $x * $y; ok 337 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x * $y; ok 338 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x * $y; ok 339 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x * $y; ok 340 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x * $y; ok 341 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x * $y; ok 342 - $x = Math::BigRat->new("+123456789123456789"); $y = Math::BigRat->new("+0"); $x * $y; ok 343 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+123456789123456789"); $x * $y; ok 344 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x * $y; ok 345 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x * $y; ok 346 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x * $y; ok 347 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x * $y; ok 348 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("+3"); $x * $y; ok 349 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("+3"); $x * $y; ok 350 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("-3"); $x * $y; ok 351 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3"); $x * $y; ok 352 - $x = Math::BigRat->new("+111"); $y = Math::BigRat->new("+111"); $x * $y; ok 353 - $x = Math::BigRat->new("+10101"); $y = Math::BigRat->new("+10101"); $x * $y; ok 354 - $x = Math::BigRat->new("+1001001"); $y = Math::BigRat->new("+1001001"); $x * $y; ok 355 - $x = Math::BigRat->new("+100010001"); $y = Math::BigRat->new("+100010001"); $x * $y; ok 356 - $x = Math::BigRat->new("+10000100001"); $y = Math::BigRat->new("+10000100001"); $x * $y; ok 357 - $x = Math::BigRat->new("+11111111111"); $y = Math::BigRat->new("+9"); $x * $y; ok 358 - $x = Math::BigRat->new("+22222222222"); $y = Math::BigRat->new("+9"); $x * $y; ok 359 - $x = Math::BigRat->new("+33333333333"); $y = Math::BigRat->new("+9"); $x * $y; ok 360 - $x = Math::BigRat->new("+44444444444"); $y = Math::BigRat->new("+9"); $x * $y; ok 361 - $x = Math::BigRat->new("+55555555555"); $y = Math::BigRat->new("+9"); $x * $y; ok 362 - $x = Math::BigRat->new("+66666666666"); $y = Math::BigRat->new("+9"); $x * $y; ok 363 - $x = Math::BigRat->new("+77777777777"); $y = Math::BigRat->new("+9"); $x * $y; ok 364 - $x = Math::BigRat->new("+88888888888"); $y = Math::BigRat->new("+9"); $x * $y; ok 365 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+9"); $x * $y; ok 366 - $x = Math::BigRat->new("6"); $y = Math::BigRat->new("120"); $x * $y; ok 367 - $x = Math::BigRat->new("10"); $y = Math::BigRat->new("10000"); $x * $y; ok 368 - $x = Math::BigRat->new("1/4"); $y = Math::BigRat->new("1/3"); $x * $y; ok 369 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 370 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1"); ; join(",", $x->bdiv($y)); ok 371 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 372 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 373 - $x = Math::BigRat->new("9"); $y = Math::BigRat->new("4"); ; join(",", $x->bdiv($y)); ok 374 - $x = Math::BigRat->new("-9"); $y = Math::BigRat->new("4"); ; join(",", $x->bdiv($y)); ok 375 - $x = Math::BigRat->new("9"); $y = Math::BigRat->new("-4"); ; join(",", $x->bdiv($y)); ok 376 - $x = Math::BigRat->new("-9"); $y = Math::BigRat->new("-4"); ; join(",", $x->bdiv($y)); ok 377 - $x = Math::BigRat->new("11/7"); $y = Math::BigRat->new("2/3"); ; join(",", $x->bdiv($y)); ok 378 - $x = Math::BigRat->new("-11/7"); $y = Math::BigRat->new("2/3"); ; join(",", $x->bdiv($y)); ok 379 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 380 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 381 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 382 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 383 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 384 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 385 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 386 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 387 - $x = Math::BigRat->new("+3214"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 388 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 389 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 390 - $x = Math::BigRat->new("-3214"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 391 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 392 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 393 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 394 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 395 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+2"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 396 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 397 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("+inf"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 398 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("-inf"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 399 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("+5"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 400 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("+4"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 401 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("+8"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 402 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("+16"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 403 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-16"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 404 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 405 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+99"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 406 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 407 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+9999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 408 - $x = Math::BigRat->new("+999999999999999"); $y = Math::BigRat->new("+99999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 409 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 410 - $x = Math::BigRat->new("+2000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 411 - $x = Math::BigRat->new("+3000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 412 - $x = Math::BigRat->new("+4000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 413 - $x = Math::BigRat->new("+5000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 414 - $x = Math::BigRat->new("+6000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 415 - $x = Math::BigRat->new("+7000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 416 - $x = Math::BigRat->new("+8000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 417 - $x = Math::BigRat->new("+9000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 418 - $x = Math::BigRat->new("+35500000"); $y = Math::BigRat->new("+113"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 419 - $x = Math::BigRat->new("+71000000"); $y = Math::BigRat->new("+226"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 420 - $x = Math::BigRat->new("+106500000"); $y = Math::BigRat->new("+339"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 421 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("+3"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 422 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("25.024996000799840031993601279744051189762"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 423 - $x = Math::BigRat->new("123456"); $y = Math::BigRat->new("1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 424 - $x = Math::BigRat->new("1/4"); $y = Math::BigRat->new("1/3"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 425 - $x = Math::BigRat->new("123"); $x->is_nan(); ok 426 - $x = Math::BigRat->new("abc"); $x->is_nan(); ok 427 - $x = Math::BigRat->new("NaN"); $x->is_nan(); ok 428 - $x = Math::BigRat->new("-123"); $x->is_nan(); ok 429 - $x = Math::BigRat->new("abc"); $x->is_inf(); ok 430 - $x = Math::BigRat->new("NaN"); $x->is_inf(); ok 431 - $x = Math::BigRat->new("+inf"); $x->is_inf(); ok 432 - $x = Math::BigRat->new("-inf"); $x->is_inf(); ok 433 - $x = Math::BigRat->new("-1"); $x->is_inf(); ok 434 - $x = Math::BigRat->new("0"); $x->is_inf(); ok 435 - $x = Math::BigRat->new("1"); $x->is_inf(); ok 436 - $x = Math::BigRat->new("abc"); $x->is_inf("+"); ok 437 - $x = Math::BigRat->new("NaN"); $x->is_inf("+"); ok 438 - $x = Math::BigRat->new("+inf"); $x->is_inf("+"); ok 439 - $x = Math::BigRat->new("-inf"); $x->is_inf("+"); ok 440 - $x = Math::BigRat->new("-1"); $x->is_inf("+"); ok 441 - $x = Math::BigRat->new("0"); $x->is_inf("+"); ok 442 - $x = Math::BigRat->new("1"); $x->is_inf("+"); ok 443 - $x = Math::BigRat->new("abc"); $x->is_inf("-"); ok 444 - $x = Math::BigRat->new("NaN"); $x->is_inf("-"); ok 445 - $x = Math::BigRat->new("+inf"); $x->is_inf("-"); ok 446 - $x = Math::BigRat->new("-inf"); $x->is_inf("-"); ok 447 - $x = Math::BigRat->new("-1"); $x->is_inf("-"); ok 448 - $x = Math::BigRat->new("0"); $x->is_inf("-"); ok 449 - $x = Math::BigRat->new("1"); $x->is_inf("-"); ok 450 - $x = Math::BigRat->new("+infinity"); $x->is_inf(); ok 451 - $x = Math::BigRat->new("-infinity"); $x->is_inf(); ok 452 - $x = Math::BigRat->new("abc"); $x->is_odd(); ok 453 - $x = Math::BigRat->new("0"); $x->is_odd(); ok 454 - $x = Math::BigRat->new("-1"); $x->is_odd(); ok 455 - $x = Math::BigRat->new("-3"); $x->is_odd(); ok 456 - $x = Math::BigRat->new("1"); $x->is_odd(); ok 457 - $x = Math::BigRat->new("3"); $x->is_odd(); ok 458 - $x = Math::BigRat->new("1000001"); $x->is_odd(); ok 459 - $x = Math::BigRat->new("1000002"); $x->is_odd(); ok 460 - $x = Math::BigRat->new("+inf"); $x->is_odd(); ok 461 - $x = Math::BigRat->new("-inf"); $x->is_odd(); ok 462 - $x = Math::BigRat->new("123.45"); $x->is_odd(); ok 463 - $x = Math::BigRat->new("-123.45"); $x->is_odd(); ok 464 - $x = Math::BigRat->new("2"); $x->is_odd(); ok 465 - $x = Math::BigRat->new("NaNis_int"); $x->is_int(); ok 466 - $x = Math::BigRat->new("0"); $x->is_int(); ok 467 - $x = Math::BigRat->new("1"); $x->is_int(); ok 468 - $x = Math::BigRat->new("2"); $x->is_int(); ok 469 - $x = Math::BigRat->new("-2"); $x->is_int(); ok 470 - $x = Math::BigRat->new("-1"); $x->is_int(); ok 471 - $x = Math::BigRat->new("-inf"); $x->is_int(); ok 472 - $x = Math::BigRat->new("+inf"); $x->is_int(); ok 473 - $x = Math::BigRat->new("123.4567"); $x->is_int(); ok 474 - $x = Math::BigRat->new("-0.1"); $x->is_int(); ok 475 - $x = Math::BigRat->new("-0.002"); $x->is_int(); ok 476 - $x = Math::BigRat->new("1/3"); $x->is_int(); ok 477 - $x = Math::BigRat->new("3/1"); $x->is_int(); ok 478 - $x = Math::BigRat->new("abc"); $x->is_even(); ok 479 - $x = Math::BigRat->new("0"); $x->is_even(); ok 480 - $x = Math::BigRat->new("-1"); $x->is_even(); ok 481 - $x = Math::BigRat->new("-3"); $x->is_even(); ok 482 - $x = Math::BigRat->new("1"); $x->is_even(); ok 483 - $x = Math::BigRat->new("3"); $x->is_even(); ok 484 - $x = Math::BigRat->new("1000001"); $x->is_even(); ok 485 - $x = Math::BigRat->new("1000002"); $x->is_even(); ok 486 - $x = Math::BigRat->new("2"); $x->is_even(); ok 487 - $x = Math::BigRat->new("+inf"); $x->is_even(); ok 488 - $x = Math::BigRat->new("-inf"); $x->is_even(); ok 489 - $x = Math::BigRat->new("123.456"); $x->is_even(); ok 490 - $x = Math::BigRat->new("-123.456"); $x->is_even(); ok 491 - $x = Math::BigRat->new("0.01"); $x->is_even(); ok 492 - $x = Math::BigRat->new("-0.01"); $x->is_even(); ok 493 - $x = Math::BigRat->new("120"); $x->is_even(); ok 494 - $x = Math::BigRat->new("1200"); $x->is_even(); ok 495 - $x = Math::BigRat->new("-1200"); $x->is_even(); ok 496 - $x = Math::BigRat->new("0"); $x->is_pos(); ok 497 - $x = Math::BigRat->new("1"); $x->is_pos(); ok 498 - $x = Math::BigRat->new("-1"); $x->is_pos(); ok 499 - $x = Math::BigRat->new("-123"); $x->is_pos(); ok 500 - $x = Math::BigRat->new("NaN"); $x->is_pos(); ok 501 - $x = Math::BigRat->new("-inf"); $x->is_pos(); ok 502 - $x = Math::BigRat->new("+inf"); $x->is_pos(); ok 503 - $x = Math::BigRat->new("0"); $x->is_positive(); ok 504 - $x = Math::BigRat->new("1"); $x->is_positive(); ok 505 - $x = Math::BigRat->new("-1"); $x->is_positive(); ok 506 - $x = Math::BigRat->new("-123"); $x->is_positive(); ok 507 - $x = Math::BigRat->new("NaN"); $x->is_positive(); ok 508 - $x = Math::BigRat->new("-inf"); $x->is_positive(); ok 509 - $x = Math::BigRat->new("+inf"); $x->is_positive(); ok 510 - $x = Math::BigRat->new("0"); $x->is_neg(); ok 511 - $x = Math::BigRat->new("1"); $x->is_neg(); ok 512 - $x = Math::BigRat->new("-1"); $x->is_neg(); ok 513 - $x = Math::BigRat->new("-123"); $x->is_neg(); ok 514 - $x = Math::BigRat->new("NaN"); $x->is_neg(); ok 515 - $x = Math::BigRat->new("-inf"); $x->is_neg(); ok 516 - $x = Math::BigRat->new("+inf"); $x->is_neg(); ok 517 - $x = Math::BigRat->new("0"); $x->is_negative(); ok 518 - $x = Math::BigRat->new("1"); $x->is_negative(); ok 519 - $x = Math::BigRat->new("-1"); $x->is_negative(); ok 520 - $x = Math::BigRat->new("-123"); $x->is_negative(); ok 521 - $x = Math::BigRat->new("NaN"); $x->is_negative(); ok 522 - $x = Math::BigRat->new("-inf"); $x->is_negative(); ok 523 - $x = Math::BigRat->new("+inf"); $x->is_negative(); ok 524 - $x = Math::BigRat->new("0"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 525 - $x = Math::BigRat->new("1"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 526 - $x = Math::BigRat->new("123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 527 - $x = Math::BigRat->new("-123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 528 - $x = Math::BigRat->new("-1200"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 529 - $x = Math::BigRat->new("5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 530 - $x = Math::BigRat->new("-5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 531 - $x = Math::BigRat->new("NaNparts"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 532 - $x = Math::BigRat->new("+inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 533 - $x = Math::BigRat->new("-inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 534 - $x = Math::BigRat->new("123"); $x->length(); ok 535 - $x = Math::BigRat->new("-123"); $x->length(); ok 536 - $x = Math::BigRat->new("0"); $x->length(); ok 537 - $x = Math::BigRat->new("1"); $x->length(); ok 538 - $x = Math::BigRat->new("12345678901234567890"); $x->length(); ok 539 - $x = Math::BigRat->new("NaNzero"); $x->is_zero(); ok 540 - $x = Math::BigRat->new("+inf"); $x->is_zero(); ok 541 - $x = Math::BigRat->new("-inf"); $x->is_zero(); ok 542 - $x = Math::BigRat->new("0"); $x->is_zero(); ok 543 - $x = Math::BigRat->new("-1"); $x->is_zero(); ok 544 - $x = Math::BigRat->new("1"); $x->is_zero(); ok 545 - $x = Math::BigRat->new("0/3"); $x->is_zero(); ok 546 - $x = Math::BigRat->new("1/3"); $x->is_zero(); ok 547 - $x = Math::BigRat->new("-0/3"); $x->is_zero(); ok 548 - $x = Math::BigRat->new("5/inf"); $x->is_zero(); ok 549 - $x = Math::BigRat->new("invalid"); $x->is_one(); ok 550 - $x = Math::BigRat->new("NaN"); $x->is_one(); ok 551 - $x = Math::BigRat->new("+inf"); $x->is_one(); ok 552 - $x = Math::BigRat->new("-inf"); $x->is_one(); ok 553 - $x = Math::BigRat->new("-2"); $x->is_one(); ok 554 - $x = Math::BigRat->new("-1"); $x->is_one(); ok 555 - $x = Math::BigRat->new("0"); $x->is_one(); ok 556 - $x = Math::BigRat->new("1"); $x->is_one(); ok 557 - $x = Math::BigRat->new("-2"); $x->is_one(); ok 558 - $x = Math::BigRat->new("invalid"); $x->is_one("+"); ok 559 - $x = Math::BigRat->new("NaN"); $x->is_one("+"); ok 560 - $x = Math::BigRat->new("+inf"); $x->is_one("+"); ok 561 - $x = Math::BigRat->new("-inf"); $x->is_one("+"); ok 562 - $x = Math::BigRat->new("-2"); $x->is_one("+"); ok 563 - $x = Math::BigRat->new("-1"); $x->is_one("+"); ok 564 - $x = Math::BigRat->new("0"); $x->is_one("+"); ok 565 - $x = Math::BigRat->new("1"); $x->is_one("+"); ok 566 - $x = Math::BigRat->new("-2"); $x->is_one("+"); ok 567 - $x = Math::BigRat->new("invalid"); $x->is_one("-"); ok 568 - $x = Math::BigRat->new("NaN"); $x->is_one("-"); ok 569 - $x = Math::BigRat->new("+inf"); $x->is_one("-"); ok 570 - $x = Math::BigRat->new("-inf"); $x->is_one("-"); ok 571 - $x = Math::BigRat->new("-2"); $x->is_one("-"); ok 572 - $x = Math::BigRat->new("-1"); $x->is_one("-"); ok 573 - $x = Math::BigRat->new("0"); $x->is_one("-"); ok 574 - $x = Math::BigRat->new("1"); $x->is_one("-"); ok 575 - $x = Math::BigRat->new("-2"); $x->is_one("-"); ok 576 - $x = Math::BigRat->new("1/3"); $x->is_one(); ok 577 - $x = Math::BigRat->new("100/100"); $x->is_one(); ok 578 - $x = Math::BigRat->new("0.1/0.1"); $x->is_one(); ok 579 - $x = Math::BigRat->new("5/inf"); $x->is_one(); ok 580 - $x = Math::BigRat->new("0"); $x->bfloor(); ok 581 - $x = Math::BigRat->new("abc"); $x->bfloor(); ok 582 - $x = Math::BigRat->new("+inf"); $x->bfloor(); ok 583 - $x = Math::BigRat->new("-inf"); $x->bfloor(); ok 584 - $x = Math::BigRat->new("1"); $x->bfloor(); ok 585 - $x = Math::BigRat->new("-51"); $x->bfloor(); ok 586 - $x = Math::BigRat->new("-51.2"); $x->bfloor(); ok 587 - $x = Math::BigRat->new("12.2"); $x->bfloor(); ok 588 - $x = Math::BigRat->new("3/7"); $x->bfloor(); ok 589 - $x = Math::BigRat->new("6/7"); $x->bfloor(); ok 590 - $x = Math::BigRat->new("7/7"); $x->bfloor(); ok 591 - $x = Math::BigRat->new("8/7"); $x->bfloor(); ok 592 - $x = Math::BigRat->new("13/7"); $x->bfloor(); ok 593 - $x = Math::BigRat->new("14/7"); $x->bfloor(); ok 594 - $x = Math::BigRat->new("15/7"); $x->bfloor(); ok 595 - $x = Math::BigRat->new("-3/7"); $x->bfloor(); ok 596 - $x = Math::BigRat->new("-6/7"); $x->bfloor(); ok 597 - $x = Math::BigRat->new("-7/1"); $x->bfloor(); ok 598 - $x = Math::BigRat->new("-8/7"); $x->bfloor(); ok 599 - $x = Math::BigRat->new("-13/7"); $x->bfloor(); ok 600 - $x = Math::BigRat->new("-14/7"); $x->bfloor(); ok 601 - $x = Math::BigRat->new("-15/7"); $x->bfloor(); ok 602 - $x = Math::BigRat->new("0"); $x->bceil(); ok 603 - $x = Math::BigRat->new("abc"); $x->bceil(); ok 604 - $x = Math::BigRat->new("+inf"); $x->bceil(); ok 605 - $x = Math::BigRat->new("-inf"); $x->bceil(); ok 606 - $x = Math::BigRat->new("1"); $x->bceil(); ok 607 - $x = Math::BigRat->new("-51"); $x->bceil(); ok 608 - $x = Math::BigRat->new("-51.2"); $x->bceil(); ok 609 - $x = Math::BigRat->new("12.2"); $x->bceil(); ok 610 - $x = Math::BigRat->new("3/7"); $x->bceil(); ok 611 - $x = Math::BigRat->new("6/7"); $x->bceil(); ok 612 - $x = Math::BigRat->new("8/7"); $x->bceil(); ok 613 - $x = Math::BigRat->new("13/7"); $x->bceil(); ok 614 - $x = Math::BigRat->new("14/7"); $x->bceil(); ok 615 - $x = Math::BigRat->new("15/7"); $x->bceil(); ok 616 - $x = Math::BigRat->new("-3/7"); $x->bceil(); ok 617 - $x = Math::BigRat->new("-6/7"); $x->bceil(); ok 618 - $x = Math::BigRat->new("-8/7"); $x->bceil(); ok 619 - $x = Math::BigRat->new("-13/7"); $x->bceil(); ok 620 - $x = Math::BigRat->new("-14/7"); $x->bceil(); ok 621 - $x = Math::BigRat->new("-15/7"); $x->bceil(); ok 622 - $x = Math::BigRat->new("NaN"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 623 - $x = Math::BigRat->new("1"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 624 - $x = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 625 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("123"); $x->bpow($y); ok 626 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("abc"); $x->bpow($y); ok 627 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 628 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 629 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 630 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 631 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 632 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 633 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 634 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 635 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 636 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 637 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 638 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 639 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 640 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 641 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 642 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 643 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 644 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 645 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 646 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 647 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 648 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 649 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 650 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 651 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 652 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 653 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 654 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 655 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 656 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 657 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 658 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 659 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 660 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 661 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 662 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 663 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 664 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 665 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 666 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 667 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 668 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 669 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 670 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 671 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 672 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 673 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 674 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 675 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 676 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 677 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 678 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 679 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 680 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 681 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 682 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 683 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 684 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 685 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 686 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 687 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 688 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 689 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 690 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 691 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 692 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 693 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 694 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 695 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 696 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 697 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 698 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 699 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 700 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 701 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 702 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 703 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 704 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 705 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 706 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 707 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 708 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 709 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 710 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 711 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 712 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 713 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 714 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 715 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 716 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 717 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 718 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 719 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 720 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 721 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 722 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 723 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 724 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 725 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 726 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 727 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 728 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 729 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 730 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 731 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 732 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 733 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 734 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 735 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 736 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 737 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 738 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 739 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 740 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 741 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 742 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 743 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 744 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 745 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 746 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 747 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 748 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 749 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 750 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 751 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 752 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 753 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 754 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 755 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 756 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 757 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 758 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 759 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 760 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 761 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 763 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 764 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 765 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 766 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 767 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 768 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 769 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 770 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 771 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 772 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 773 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 774 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 775 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 776 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 777 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 778 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 779 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 780 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 781 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 782 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 783 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 784 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 785 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 786 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 787 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 788 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 789 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 790 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 791 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 792 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 793 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 794 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 795 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 796 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 797 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 798 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 799 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 800 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 801 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 802 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 803 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 804 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 805 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 806 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 807 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-0"); $x->bacmp($y); ok 808 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x->bacmp($y); ok 809 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x->bacmp($y); ok 810 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x->bacmp($y); ok 811 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+2"); $x->bacmp($y); ok 812 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("-1"); $x->bacmp($y); ok 813 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x->bacmp($y); ok 814 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x->bacmp($y); ok 815 - $x = Math::BigRat->new("+987654321"); $y = Math::BigRat->new("+123456789"); $x->bacmp($y); ok 816 - $x = Math::BigRat->new("-987654321"); $y = Math::BigRat->new("+123456789"); $x->bacmp($y); ok 817 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("+4567889"); $x->bacmp($y); ok 818 - $x = Math::BigRat->new("acmpNaN"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 819 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("acmpNaN"); $x->bacmp($y); ok 820 - $x = Math::BigRat->new("acmpNaN"); $y = Math::BigRat->new("acmpNaN"); $x->bacmp($y); ok 821 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x->bacmp($y); ok 822 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 823 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 824 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x->bacmp($y); ok 825 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 826 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 827 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-123"); $x->bacmp($y); ok 828 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-123"); $x->bacmp($y); ok 829 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("1/23"); $x->bacmp($y); ok 830 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1/23"); $x->bacmp($y); ok 831 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-1/23"); $x->bacmp($y); ok 832 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1/23"); $x->bacmp($y); ok 833 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("12/3"); $x->bacmp($y); ok 834 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("12/3"); $x->bacmp($y); ok 835 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-12/3"); $x->bacmp($y); ok 836 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-12/3"); $x->bacmp($y); ok 837 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 838 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 839 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 840 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 841 - $x = Math::BigRat->new("1/23"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 842 - $x = Math::BigRat->new("-1/23"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 843 - $x = Math::BigRat->new("1/23"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 844 - $x = Math::BigRat->new("-1/23"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 845 - $x = Math::BigRat->new("12/3"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 846 - $x = Math::BigRat->new("-12/3"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 847 - $x = Math::BigRat->new("12/3"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 848 - $x = Math::BigRat->new("-12/3"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 849 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaN"); $x->bacmp($y); ok 850 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 851 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("NaN"); $x->bacmp($y); ok 852 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 853 - $x = Math::BigRat->new("1/3"); $y = Math::BigRat->new("2/3"); $x->bacmp($y); ok 854 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("1/3"); $x->bacmp($y); ok 855 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("2/3"); $x->bacmp($y); ok 856 - $x = Math::BigRat->new("NaN"); $x->numerator()->bstr(); ok 857 - $x = Math::BigRat->new("inf"); $x->numerator()->bstr(); ok 858 - $x = Math::BigRat->new("-inf"); $x->numerator()->bstr(); ok 859 - $x = Math::BigRat->new("3/7"); $x->numerator()->bstr(); ok 860 - $x = Math::BigRat->new("-3/7"); $x->numerator()->bstr(); ok 861 - $x = Math::BigRat->new("0"); $x->numerator()->bstr(); ok 862 - $x = Math::BigRat->new("1"); $x->numerator()->bstr(); ok 863 - $x = Math::BigRat->new("5/-3"); $x->numerator()->bstr(); ok 864 - $x = Math::BigRat->new("NaN"); $x->denominator()->bstr(); ok 865 - $x = Math::BigRat->new("inf"); $x->denominator()->bstr(); ok 866 - $x = Math::BigRat->new("-inf"); $x->denominator()->bstr(); ok 867 - $x = Math::BigRat->new("3/7"); $x->denominator()->bstr(); ok 868 - $x = Math::BigRat->new("0"); $x->denominator()->bstr(); ok 869 - $x = Math::BigRat->new("1/1"); $x->denominator()->bstr(); ok 870 - $x = Math::BigRat->new("-1/1"); $x->denominator()->bstr(); ok 871 - $x = Math::BigRat->new("-3/7"); $x->denominator()->bstr(); ok 872 - $x = Math::BigRat->new("4/-5"); $x->denominator()->bstr(); ok 873 - $x = Math::BigRat->new("3/2"); ++$x; ok 874 - $x = Math::BigRat->new("-15/6"); ++$x; ok 875 - $x = Math::BigRat->new("NaN"); ++$x; ok 876 - $x = Math::BigRat->new("-1/3"); ++$x; ok 877 - $x = Math::BigRat->new("-2/7"); ++$x; ok 878 - $x = Math::BigRat->new("15/6"); --$x; ok 879 - $x = Math::BigRat->new("-3/2"); --$x; ok 880 - $x = Math::BigRat->new("1/3"); --$x; ok 881 - $x = Math::BigRat->new("2/7"); --$x; ok 882 - $x = Math::BigRat->new("NaN"); --$x; ok 883 - $x = Math::BigRat->new("-1"); $x = log($x); ok 884 - $x = Math::BigRat->new("0"); $x = log($x); ok 885 - $x = Math::BigRat->new("1"); $x = log($x); ok 886 - $x = Math::BigRat->new("34803"); $x = log($x); ok 887 - $x = Math::BigRat->new("-inf"); $x = log($x); ok 888 - $x = Math::BigRat->new("inf"); $x = log($x); ok 889 - $x = Math::BigRat->new("NaN"); $x = log($x); ok 890 - $x = Math::BigInt->new(1200); $y = Math::BigRat->new($x); 1200 ok 891 - $x = Math::BigInt->new(1200); $y = Math::BigRat->new($x); 1200 ok 892 - $x = Math::BigRat->new(2); $x->bzero(); $x->{accuracy} ok 893 - $x = Math::BigRat->new(2); $x->bzero(); $x->{precision} ok 894 - $x = Math::BigRat->new(2); $x->binf(); $x->{accuracy} ok 895 - $x = Math::BigRat->new(2); $x->binf(); $x->{precision} ok 896 - $x = Math::BigRat->new(2); $x->bone(); $x->{accuracy} ok 897 - $x = Math::BigRat->new(2); $x->bone(); $x->{precision} ok 898 - $x = Math::BigRat->new(2); $x->bnan(); $x->{accuracy} ok 899 - $x = Math::BigRat->new(2); $x->bnan(); $x->{precision} ok t/bare_mif.t .................. 1..713 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v2.003003 ok 1 - Math::BigInt->config('lib') ok 2 - ${"Math::BigInt::accuracy"} ok 3 - ${"Math::BigInt::precision"} ok 4 - Math::BigInt->accuracy() ok 5 - Math::BigInt->precision() ok 6 - ${"Math::BigInt::div_scale"} ok 7 - ${"Math::BigInt::round_mode"} ok 8 - Math::BigInt->round_mode() ok 9 - ${"Math::BigFloat::accuracy"} ok 10 - ${"Math::BigFloat::precision"} ok 11 - Math::BigFloat->precision() ok 12 - Math::BigFloat->precision() ok 13 - ${"Math::BigFloat::div_scale"} ok 14 - ${"Math::BigFloat::round_mode"} ok 15 - Math::BigFloat->round_mode() ok 16 - Math::BigInt->accuracy() ok 17 - Math::BigInt->precision() ok 18 - Math::BigInt->round_mode() ok 19 - Math::BigInt->div_scale() ok 20 - Math::BigInt->div_scale(20) ok 21 - Math::BigInt->div_scale() ok 22 - Math::BigInt->round_mode("odd") ok 23 - Math::BigInt->round_mode() ok 24 - Math::BigInt->accuracy(2) ok 25 - Math::BigInt->accuracy() ok 26 - Math::BigInt->accuracy(undef) ok 27 - Math::BigInt->precision(2) ok 28 - Math::BigInt->precision(-2) ok 29 - Math::BigInt->precision() ok 30 - Math::BigInt->precision(undef) ok 31 - Math::BigFloat->accuracy() ok 32 - Math::BigFloat->precision() ok 33 - Math::BigFloat->round_mode() ok 34 - Math::BigFloat->div_scale() ok 35 - Math::BigFloat->div_scale(20) ok 36 - Math::BigFloat->div_scale() ok 37 - Math::BigFloat->round_mode("odd") ok 38 - Math::BigFloat->round_mode() ok 39 - Math::BigFloat->accuracy(2) ok 40 - Math::BigFloat->accuracy() ok 41 - Math::BigFloat->accuracy(undef) ok 42 - Math::BigFloat->precision(2) ok 43 - Math::BigFloat->precision(-2) ok 44 - Math::BigFloat->precision() ok 45 - Math::BigFloat->precision(undef) ok 46 - ${"Math::BigFloat::accuracy"} = 5 ok 47 - ${"Math::BigInt::accuracy"} = 5 ok 48 - ${"Math::BigFloat::accuracy"} = 42 ok 49 - ${"Math::BigInt::accuracy"} = 42 ok 50 - ${"Math::BigFloat::accuracy"} = -1 ok 51 - ${"Math::BigInt::accuracy"} = -1 ok 52 - ${"Math::BigFloat::accuracy"} = 0 ok 53 - ${"Math::BigInt::accuracy"} = 0 ok 54 - ${"Math::BigFloat::accuracy"} = undef ok 55 - ${"Math::BigInt::accuracy"} = undef ok 56 - ${"Math::BigFloat::precision"} = 5 ok 57 - ${"Math::BigInt::precision"} = 5 ok 58 - ${"Math::BigFloat::precision"} = 42 ok 59 - ${"Math::BigInt::precision"} = 42 ok 60 - ${"Math::BigFloat::precision"} = -1 ok 61 - ${"Math::BigInt::precision"} = -1 ok 62 - ${"Math::BigFloat::precision"} = 0 ok 63 - ${"Math::BigInt::precision"} = 0 ok 64 - ${"Math::BigFloat::precision"} = undef ok 65 - ${"Math::BigInt::precision"} = undef ok 66 - ${"Math::BigFloat::div_scale"} = 5 ok 67 - ${"Math::BigInt::div_scale"} = 5 ok 68 - ${"Math::BigFloat::div_scale"} = 42 ok 69 - ${"Math::BigInt::div_scale"} = 42 ok 70 - ${"Math::BigFloat::div_scale"} = 1 ok 71 - ${"Math::BigInt::div_scale"} = 1 ok 72 - ${"Math::BigFloat::round_mode"} = "odd" ok 73 - ${"Math::BigInt::round_mode"} = "odd" ok 74 - ${"Math::BigFloat::round_mode"} = "even" ok 75 - ${"Math::BigInt::round_mode"} = "even" ok 76 - ${"Math::BigFloat::round_mode"} = "zero" ok 77 - ${"Math::BigInt::round_mode"} = "zero" ok 78 - ${"Math::BigFloat::round_mode"} = "trunc" ok 79 - ${"Math::BigInt::round_mode"} = "trunc" ok 80 - ${"Math::BigFloat::round_mode"} = "+inf" ok 81 - ${"Math::BigInt::round_mode"} = "+inf" ok 82 - ${"Math::BigFloat::round_mode"} = "-inf" ok 83 - ${"Math::BigInt::round_mode"} = "-inf" ok 84 - ${"Math::BigFloat::round_mode"} ok 85 - ${"Math::BigInt::round_mode"} ok 86 - $x->accuracy() ok 87 - $x->accuracy(5) ok 88 - $x->accuracy(undef) ok 89 - $x->precision() ok 90 - $x->precision(5) ok 91 - $x->precision(undef) ok 92 - ${"Math::BigInt::accuracy"} = 42 ok 93 - ${"Math::BigFloat::accuracy"} = 64 ok 94 - ${"Math::BigInt::accuracy"} = 42 ok 95 - ${"Math::BigFloat::accuracy"} = 64 ok 96 - Math::BigInt->new(123456) = 123500 ok 97 - Math::BigInt->new(123456) = 123000 ok 98 - Math::BigFloat->new("123.456") = 123.5 ok 99 - Math::BigFloat->new("123.456") = 123.5 ok 100 - Math::BigFloat->new("123.456") = 123.456 ok 101 - $x = Math::BigFloat->new("123.456"); $x->accuracy(4) ok 102 - $x = Math::BigFloat->new("123.456"); $x->precision(-2) ok 103 - $x = Math::BigInt->new(123456); $x->accuracy(4) ok 104 - $x = Math::BigInt->new(123456); $x->precision(2) ok 105 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5) ok 106 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(4) ok 107 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5, 2) ok 108 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, -2) ok 109 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, 2) ok 110 - $x = Math::BigInt->new("123"); $x->round(5, 2) ok 111 - $x = Math::BigFloat->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 112 - $x = Math::BigFloat->new("123.4567"); $y = $x->copy()->bround() ok 113 - $y = $x->copy()->round(5); $y->accuracy() ok 114 - $y = $x->copy()->round(5); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->precision() ok 116 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 117 - $x = $mbf->new("123.4567") ok 118 - $x->accuracy(4) ok 119 - $x->precision(-2) ok 120 - $x->accuracy() ok 121 - $x = $mbf->new("123.4567") ok 122 - $x->precision(-2) ok 123 - $x->accuracy(4) ok 124 - $x->precision() ok 125 - $z = $x->copy(); $z->accuracy() ok 126 - $z = $x->copy(); $z->precision() ok 127 - $x->copy()->bdiv(3, 4) ok 128 - $x->copy()->bdiv(3, 8) ok 129 - $x->copy()->bdiv(3, 16) ok 130 - $x->copy()->bdiv(3, 32) ok 131 - $x = Math::BigInt->bzero(); $x->accuracy(5); $x->{accuracy} ok 132 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{precision} ok 133 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{accuracy} ok 134 - $x = Math::BigInt->new(0); $x->precision(5); $x->{precision} ok 135 - $x = Math::BigInt->bzero(); $x->round(5); $x->{accuracy} ok 136 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{precision} ok 137 - $x = Math::BigInt->new(0); $x->round(5); $x->{accuracy} ok 138 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{precision} ok 139 - $x = Math::BigInt->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 140 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{accuracy} ok 141 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{precision} ok 142 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{accuracy} ok 143 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{precision} ok 144 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{accuracy} ok 145 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{precision} ok 146 - $x = Math::BigFloat->new(0); $x->round(5); $x->{accuracy} ok 147 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{precision} ok 148 - $x = Math::BigFloat->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 149 - Math::BigInt->new(123)->badd(123) ok 150 - Math::BigInt->badd(123, 321) ok 151 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 152 - Math::BigInt->new(123)->bsub(122) ok 153 - Math::BigInt->bsub(321, 123) ok 154 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 155 - Math::BigInt->new(123)->bmul(123) ok 156 - Math::BigInt->bmul(123, 123) ok 157 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 158 - Math::BigInt->new(15131)->bmod(123) ok 159 - Math::BigInt->bmod(15131, 123) ok 160 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 161 - Math::BigInt->new(2)->bpow(16) ok 162 - Math::BigInt->bpow(2, 16) ok 163 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 164 - Math::BigInt->new(2**15)->brsft(1) ok 165 - Math::BigInt->brsft(2**15, 1) ok 166 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 167 - Math::BigInt->new(2**13)->blsft(1) ok 168 - Math::BigInt->blsft(2**13, 1) ok 169 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 170 - Math::BigFloat->new(123)->badd(123) ok 171 - Math::BigFloat->badd(123, 321) ok 172 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 173 - Math::BigFloat->new(123)->bsub(122) ok 174 - Math::BigFloat->bsub(321, 123) ok 175 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 176 - Math::BigFloat->new(123)->bmul(123) ok 177 - Math::BigFloat->bmul(123, 123) ok 178 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 179 - Math::BigFloat->new(15131)->bmod(123) ok 180 - Math::BigFloat->bmod(15131, 123) ok 181 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 182 - Math::BigFloat->new(2)->bpow(16) ok 183 - Math::BigFloat->bpow(2, 16) ok 184 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 185 - Math::BigFloat->new(2**15)->brsft(1) ok 186 - Math::BigFloat->brsft(2**15, 1) ok 187 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 188 - Math::BigFloat->new(2**13)->blsft(1) ok 189 - Math::BigFloat->blsft(2**13, 1) ok 190 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 191 - $z = $x + $y ok 192 - $z = $y - $x ok 193 - $z = $y * $x ok 194 - $z = $x ** 2 ok 195 - $z = $x * $x ok 196 - $z = $z / 2 ok 197 - $z++ ok 198 - $z = $x + $y ok 199 - $z = $y - $x ok 200 - $z = $y * $x ok 201 - $z = $x ** 2 ok 202 - $z++ ok 203 - $z = $z / 2 ok 204 - $x->bnot() ok 205 - $x->babs() ok 206 - $x->bneg() ok 207 - $x ok 208 - $x->bdiv($y) ok 209 - $x->{accuracy} ok 210 - $x->bdiv($y) ok 211 - $x->{accuracy} ok 212 - $x->bdiv($y) ok 213 - $x->{accuracy} ok 214 - $x->bdiv($y) ok 215 - $x->{accuracy} ok 216 - $x->copy()->bsqrt(...) ok 217 - $x->copy->bsqrt(...) ok 218 - $x->{accuracy} ok 219 - $z = $x->bsqrt(); $z ok 220 - $z = $x->bsqrt(); $x ok 221 - $x->copy()->bpow(...) ok 222 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 223 - $x->copy()->bpow('2', 0) ok 224 - $mbi->new(12)->bfac() ok 225 - $mbi->new(12)->bfac(2) ok 226 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 229 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 230 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 231 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 232 - $x->accuracy() ok 233 - $x = 360 ok 234 - $x = 400 ok 235 - $z = $x + $y; ok 236 - $z is a "Math::BigFloat" object ok 237 - $z = $x / $y; ok 238 - $z is a "Math::BigFloat" object ok 239 - $z = $u * $y; ok 240 - $z is a "Math::BigFloat" object ok 241 - $z = 31000 ok 242 - $z = 30900 ok 243 - $z = 30863 ok 244 - $z = 30863 ok 245 - $z = 30860 ok 246 - $z = 30900 ok 247 - $z = 30862.5 ok 248 - $z = "" ok 249 - "$z = $y >= 3.17" gives warning as expected ok 250 - $z = "" ok 251 - "$z = $y >= 3.17" gives warning as expected ok 252 - $x->bdiv(3) ok 253 - $x->{accuracy} ok 254 - $x->bdiv($y) ok 255 - $x->{accuracy} ok 256 - $x->bdiv(3) ok 257 - $x->bdiv(3, undef, -2) ok 258 - $x->bdiv(3, undef, -8) = "3.33333333" ok 259 - $x->bdiv($y) = '3.333' ok 260 - $x->{accuracy} = 4 ok 261 - $y->{accuracy} = 4 ok 262 - $x->{precision} = undef ok 263 - $y->{precision} = undef ok 264 - $x->bdiv($y) = '3.33' ok 265 - $x->{precision} = -2 ok 266 - $y->{precision} = -2 ok 267 - $x->{accuracy} = undef ok 268 - $y->{accuracy} = undef ok 269 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 270 - $x = "1.000" ok 271 - $x->{accuracy} = 4 ok 272 - $x = "1.000" ok 273 - $x = "1230" ok 274 - $x->{accuracy} = 3 ok 275 - $x = "1230" # bround(n) should set accuracy ok 276 - $x = "1200" ok 277 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 278 - $x = "12300" ok 279 - $x->{accuracy} = 4 # bround(-n) should set accuracy ok 280 - $x = "12000" ok 281 - $x->{accuracy} = 3 # bround(-n) should set accuracy ok 282 - $x = "10000" ok 283 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 284 - $x = "0" ok 285 - $x->{accuracy} = 1 # bround(-n) should be no-op if n too big ok 286 - $x = "0" ok 287 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 288 - $x = "100000" ok 289 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 290 - $x = "100000" ok 291 - $x->{accuracy} = 0 # bround(n) should set accuracy ok 292 - $x = "12345" ok 293 - $x->{accuracy} = 5 # bround(n) should set accuracy ok 294 - $x = "12345" ok 295 - $x = "0.01" ok 296 - $x = "0.00" ok 297 - $x = "0.00" ok 298 - $x = "12340" ok 299 - $x = "12340" # MBI::bfround should clear A for negative P ok 300 - $x->{accuracy} = undef # test that bfround() and bround() work with large numbers ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 302 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 303 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" # rounding with already set precision/accuracy ok 304 - $x = "1.00000" # further rounding down ok 305 - $x->bfround(-2) = "1.00" ok 306 - $x->{precision} = -2 ok 307 - $x->bround(2) = "12000" ok 308 - $x->{accuracy} = 2 ok 309 - $x->bround(2) = "1.2" ok 310 - $x->{accuracy} = 2 # mantissa/exponent format and A/P ok 311 - $x = "12350" ok 312 - $x->{accuracy} = 4 ok 313 - $x->{precision} = undef # check for no A/P in case of fallback result ok 314 - $x->{accuracy} = undef ok 315 - $x->{precision} = undef # result & remainder ok 316 - $x->{accuracy} = undef ok 317 - $x->{precision} = undef ok 318 - $y->{accuracy} = undef ok 319 - $y->{precision} = undef ok 320 - $x+$y = 24000 ok 321 - $x-$y = 42000 ok 322 - $x+$y = "2.46" ok 323 - scalar(@params) = 1 ok 324 - scalar(@params) = 4 ok 325 - $params[0] = $x ok 326 - $params[1] = 1 ok 327 - $params[2] = undef ok 328 - $params[3] = "odd" ok 329 - scalar(@params) = 4 ok 330 - $params[0] = $x ok 331 - $params[1] = undef ok 332 - $params[2] = 2 ok 333 - $params[3] = "odd" ok 334 - round mode "foo" gives a warning as expected ok 335 - scalar(@params) = 4 ok 336 - $params[0] = $x ok 337 - $params[1] = undef ok 338 - $params[2] = 2 ok 339 - $params[3] = "+inf" ok 340 - scalar(@params) = 1 ok 341 - $params[0] = $x ok 342 - scalar(@params) = 1 ok 343 - $params[0] = $x ok 344 - $x->is_nan() = 1 ok 345 - scalar(@params) = 1 ok 346 - $params[0] = $x ok 347 - $x->is_nan() = 1 ok 348 - $x = Math::BigInt->new(2)->bzero(); $x->{accuracy} ok 349 - $x = Math::BigInt->new(2)->bzero(); $x->{precision} ok 350 - $x = Math::BigInt->new(2)->bone(); $x->{accuracy} ok 351 - $x = Math::BigInt->new(2)->bone(); $x->{precision} ok 352 - $x = Math::BigInt->new(2)->binf(); $x->{accuracy} ok 353 - $x = Math::BigInt->new(2)->binf(); $x->{precision} ok 354 - $x = Math::BigInt->new(2)->bnan(); $x->{accuracy} ok 355 - $x = Math::BigInt->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 356 - $x = Math::BigInt->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 357 - $x = Math::BigInt->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 358 - $x = Math::BigInt->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 359 - $x = Math::BigInt->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 360 - $x = Math::BigInt->new(2, 1); $x->{accuracy} ok 361 - $x = Math::BigInt->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 362 - $x = Math::BigInt->new(2, undef, 1); $x->{accuracy} ok 363 - $x = Math::BigInt->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 364 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{accuracy} ok 365 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 366 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{accuracy} ok 367 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 368 - $x = Math::BigInt->new(2, 1)->bone(); $x->{accuracy} ok 369 - $x = Math::BigInt->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 370 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{accuracy} ok 371 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 372 - $x = Math::BigInt->new(2); $x->{accuracy} ok 373 - $x = Math::BigInt->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 374 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 375 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 376 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 377 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 378 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 379 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 380 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{accuracy} ok 381 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 382 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 383 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{precision} ok 384 - $x = Math::BigFloat->new(2)->bzero(); $x->{accuracy} ok 385 - $x = Math::BigFloat->new(2)->bzero(); $x->{precision} ok 386 - $x = Math::BigFloat->new(2)->bone(); $x->{accuracy} ok 387 - $x = Math::BigFloat->new(2)->bone(); $x->{precision} ok 388 - $x = Math::BigFloat->new(2)->binf(); $x->{accuracy} ok 389 - $x = Math::BigFloat->new(2)->binf(); $x->{precision} ok 390 - $x = Math::BigFloat->new(2)->bnan(); $x->{accuracy} ok 391 - $x = Math::BigFloat->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 392 - $x = Math::BigFloat->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 393 - $x = Math::BigFloat->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 394 - $x = Math::BigFloat->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 395 - $x = Math::BigFloat->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 396 - $x = Math::BigFloat->new(2, 1); $x->{accuracy} ok 397 - $x = Math::BigFloat->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 398 - $x = Math::BigFloat->new(2, undef, 1); $x->{accuracy} ok 399 - $x = Math::BigFloat->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 400 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{accuracy} ok 401 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 402 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{accuracy} ok 403 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 404 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{accuracy} ok 405 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 406 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{accuracy} ok 407 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 408 - $x = Math::BigFloat->new(2); $x->{accuracy} ok 409 - $x = Math::BigFloat->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 410 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 411 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 412 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 413 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 414 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 415 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 416 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{accuracy} ok 417 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 418 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 419 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{precision} # Verify that class accuracy is copied into new objects. ok 420 - Math::BigInt->accuracy(3); $x = Math::BigInt->bzero(); $x->accuracy() ok 421 - Math::BigInt->accuracy(3); $x = Math::BigInt->bone(); $x->accuracy() ok 422 - Math::BigInt->accuracy(3); $x = Math::BigInt->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 423 - Math::BigInt->precision(-4); $x = Math::BigInt->bzero(); $x->precision() ok 424 - Math::BigInt->precision(-4); $x = Math::BigInt->bone(); $x->precision() ok 425 - Math::BigInt->precision(-4); $x = Math::BigInt->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 426 - Math::BigInt->accuracy(2); $x = Math::BigInt->bzero(5); $x->accuracy() ok 427 # skip 1 ok 428 - Math::BigInt->accuracy(2); $x = Math::BigInt->bone("+", 5); $x->accuracy() ok 429 # skip 1 ok 430 - Math::BigInt->accuracy(2); $x = Math::BigInt->new(2, 5); $x->accuracy() ok 431 # skip 1 # Verify that setting precision as method argument overrides class variable ok 432 - Math::BigInt->precision(-2); $x = Math::BigInt->bzero(undef, -6); $x->precision() ok 433 # skip 1 ok 434 - Math::BigInt->precision(-2); $x = Math::BigInt->bone("+", undef, -6); $x->precision() ok 435 # skip 1 ok 436 - Math::BigInt->precision(-2); $x = Math::BigInt->new(2, undef, -6); $x->precision() ok 437 # skip 1 # Verify that class accuracy is copied into new objects. ok 438 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->bzero(); $x->accuracy() ok 439 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->bone(); $x->accuracy() ok 440 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 441 - Math::BigFloat->precision(-4); $x = Math::BigFloat->bzero(); $x->precision() ok 442 - Math::BigFloat->precision(-4); $x = Math::BigFloat->bone(); $x->precision() ok 443 - Math::BigFloat->precision(-4); $x = Math::BigFloat->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 444 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->bzero(5); $x->accuracy() ok 445 # skip 1 ok 446 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->bone("+", 5); $x->accuracy() ok 447 # skip 1 ok 448 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->new(2, 5); $x->accuracy() ok 449 # skip 1 # Verify that setting precision as method argument overrides class variable ok 450 - Math::BigFloat->precision(-2); $x = Math::BigFloat->bzero(undef, -6); $x->precision() ok 451 # skip 1 ok 452 - Math::BigFloat->precision(-2); $x = Math::BigFloat->bone("+", undef, -6); $x->precision() ok 453 # skip 1 ok 454 - Math::BigFloat->precision(-2); $x = Math::BigFloat->new(2, undef, -6); $x->precision() ok 455 # skip 1 ok 456 - mixing A and P creates a NaN ok 457 - $class->new(123) = "NaN" ok 458 - mixing A and P creates a NaN ok 459 - $class->new(123) = "NaN" ok 460 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->badd($y); ok 461 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bsub($y); ok 462 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmul($y); ok 463 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bpow($y); ok 464 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmod($y); ok 465 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->badd($y); ok 466 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bsub($y); ok 467 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmul($y); ok 468 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bpow($y); ok 469 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmod($y); ok 470 - my $x = Math::BigInt->new(1234, 5, -3); ok 471 - my $x = Math::BigInt->bsqrt(1234, 5, -3); ok 472 - $x = 120 ok 473 - $x = 120 ok 474 - $x = 120 ok 475 - $x = 120 ok 476 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->badd($y); ok 477 - is a valid object ok 478 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->badd($y); ok 479 - is a valid object ok 480 - $x->{accuracy} == 3 ok 481 - $x->{precision} is undef ok 482 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->badd($y); ok 483 - is a valid object ok 484 - $x->{precision} == -3 ok 485 - $x->{accuracy} is undef ok 486 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->badd($y); ok 487 - is a valid object ok 488 - $x->{accuracy} == 3 ok 489 - $x->{precision} is undef ok 490 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->badd($y); ok 491 - is a valid object ok 492 - $x->{precision} == -3 ok 493 - $x->{accuracy} is undef ok 494 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->bmul($y); ok 495 - is a valid object ok 496 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->bmul($y); ok 497 - is a valid object ok 498 - $x->{accuracy} == 3 ok 499 - $x->{precision} is undef ok 500 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->bmul($y); ok 501 - is a valid object ok 502 - $x->{precision} == -3 ok 503 - $x->{accuracy} is undef ok 504 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->bmul($y); ok 505 - is a valid object ok 506 - $x->{accuracy} == 3 ok 507 - $x->{precision} is undef ok 508 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->bmul($y); ok 509 - is a valid object ok 510 - $x->{precision} == -3 ok 511 - $x->{accuracy} is undef ok 512 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("1"); $x->bmul($y); ok 513 - is a valid object ok 514 - $x->{accuracy} == 3 ok 515 - $x->{precision} is undef ok 516 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("1"); $x->bmul($y); ok 517 - is a valid object ok 518 - $x->{precision} == -3 ok 519 - $x->{accuracy} is undef ok 520 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(3); $x->bmul($y); ok 521 - is a valid object ok 522 - $x->{accuracy} == 3 ok 523 - $x->{precision} is undef ok 524 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-3); $x->bmul($y); ok 525 - is a valid object ok 526 - $x->{precision} == -3 ok 527 - $x->{accuracy} is undef ok 528 - $x = Math::BigInt->new("1"); $x->accuracy(3); $y = Math::BigInt->new("123"); $x->bmul($y); ok 529 - is a valid object ok 530 - $x->{accuracy} == 3 ok 531 - $x->{precision} is undef ok 532 - $x = Math::BigInt->new("1"); $x->precision(-3); $y = Math::BigInt->new("123"); $x->bmul($y); ok 533 - is a valid object ok 534 - $x->{precision} == -3 ok 535 - $x->{accuracy} is undef ok 536 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(3); $x->bmul($y); ok 537 - is a valid object ok 538 - $x->{accuracy} == 3 ok 539 - $x->{precision} is undef ok 540 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-3); $x->bmul($y); ok 541 - is a valid object ok 542 - $x->{precision} == -3 ok 543 - $x->{accuracy} is undef ok 544 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 545 - is a valid object ok 546 - $x = Math::BigInt->new("123"); $x->accuracy(4); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 547 - is a valid object ok 548 - $x->{accuracy} == 4 ok 549 - $x->{precision} is undef ok 550 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(4); $x->bdiv($y); ok 551 - is a valid object ok 552 - $x->{accuracy} == 4 ok 553 - $x->{precision} is undef ok 554 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-4); $x->bdiv($y); ok 555 - is a valid object ok 556 - $x->{precision} == -4 ok 557 - $x->{accuracy} is undef ok 558 - $x = Math::BigInt->new("123"); $x->precision(-4); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 559 - is a valid object ok 560 - $x->{precision} == -4 ok 561 - $x->{accuracy} is undef ok 562 - $x = Math::BigInt->new("1"); $x->accuracy(4); $y = Math::BigInt->new("123"); $x->bdiv($y); ok 563 - is a valid object ok 564 - $x->{accuracy} == 4 ok 565 - $x->{precision} is undef ok 566 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(4); $x->bdiv($y); ok 567 - is a valid object ok 568 - $x->{accuracy} == 4 ok 569 - $x->{precision} is undef ok 570 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-4); $x->bdiv($y); ok 571 - is a valid object ok 572 - $x->{precision} == -4 ok 573 - $x->{accuracy} is undef ok 574 - $x = Math::BigInt->new("1"); $x->precision(-4); $y = Math::BigInt->new("123"); $x->bdiv($y); ok 575 - is a valid object ok 576 - $x->{precision} == -4 ok 577 - $x->{accuracy} is undef ok 578 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->band($y); ok 579 - is a valid object ok 580 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->band($y); ok 581 - is a valid object ok 582 - $x->{accuracy} == 1 ok 583 - $x->{precision} is undef ok 584 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->band($y); ok 585 - is a valid object ok 586 - $x->{accuracy} == 1 ok 587 - $x->{precision} is undef ok 588 - $x = Math::BigInt->new("1234"); $x->precision(-1); $y = Math::BigInt->new("0"); $x->band($y); ok 589 - is a valid object ok 590 - $x->{precision} == -1 ok 591 - $x->{accuracy} is undef ok 592 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(-1); $x->band($y); ok 593 - is a valid object ok 594 - $x->{precision} == -1 ok 595 - $x->{accuracy} is undef ok 596 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->band($y); ok 597 - is a valid object ok 598 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->band($y); ok 599 - is a valid object ok 600 - $x->{accuracy} == 2 ok 601 - $x->{precision} is undef ok 602 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->band($y); ok 603 - is a valid object ok 604 - $x->{accuracy} == 2 ok 605 - $x->{precision} is undef ok 606 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->band($y); ok 607 - is a valid object ok 608 - $x->{precision} == 1 ok 609 - $x->{accuracy} is undef ok 610 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->band($y); ok 611 - is a valid object ok 612 - $x->{precision} == 1 ok 613 - $x->{accuracy} is undef ok 614 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bxor($y); ok 615 - is a valid object ok 616 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->bxor($y); ok 617 - is a valid object ok 618 - $x->{accuracy} == 1 ok 619 - $x->{precision} is undef ok 620 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->bxor($y); ok 621 - is a valid object ok 622 - $x->{accuracy} == 1 ok 623 - $x->{precision} is undef ok 624 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->bxor($y); ok 625 - is a valid object ok 626 - $x->{precision} == 3 ok 627 - $x->{accuracy} is undef ok 628 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->bxor($y); ok 629 - is a valid object ok 630 - $x->{precision} == 3 ok 631 - $x->{accuracy} is undef ok 632 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->bxor($y); ok 633 - is a valid object ok 634 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->bxor($y); ok 635 - is a valid object ok 636 - $x->{accuracy} == 2 ok 637 - $x->{precision} is undef ok 638 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->bxor($y); ok 639 - is a valid object ok 640 - $x->{accuracy} == 2 ok 641 - $x->{precision} is undef ok 642 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->bxor($y); ok 643 - is a valid object ok 644 - $x->{precision} == 1 ok 645 - $x->{accuracy} is undef ok 646 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->bxor($y); ok 647 - is a valid object ok 648 - $x->{precision} == 1 ok 649 - $x->{accuracy} is undef ok 650 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFFF"); $x->bxor($y); ok 651 - is a valid object ok 652 - $x->{accuracy} == 2 ok 653 - $x->{precision} is undef ok 654 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->accuracy(2); $x->bxor($y); ok 655 - is a valid object ok 656 - $x->{accuracy} == 2 ok 657 - $x->{precision} is undef ok 658 - $x = Math::BigInt->new("0xFF"); $x->precision(2); $y = Math::BigInt->new("0xFFF"); $x->bxor($y); ok 659 - is a valid object ok 660 - $x->{precision} == 2 ok 661 - $x->{accuracy} is undef ok 662 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->precision(2); $x->bxor($y); ok 663 - is a valid object ok 664 - $x->{precision} == 2 ok 665 - $x->{accuracy} is undef ok 666 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bior($y); ok 667 - is a valid object ok 668 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->bior($y); ok 669 - is a valid object ok 670 - $x->{accuracy} == 1 ok 671 - $x->{precision} is undef ok 672 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->bior($y); ok 673 - is a valid object ok 674 - $x->{accuracy} == 1 ok 675 - $x->{precision} is undef ok 676 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->bior($y); ok 677 - is a valid object ok 678 - $x->{precision} == 3 ok 679 - $x->{accuracy} is undef ok 680 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->bior($y); ok 681 - is a valid object ok 682 - $x->{precision} == 3 ok 683 - $x->{accuracy} is undef ok 684 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->bior($y); ok 685 - is a valid object ok 686 - $x = Math::BigInt->new("250"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->bior($y); ok 687 - is a valid object ok 688 - $x->{accuracy} == 2 ok 689 - $x->{precision} is undef ok 690 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("250"); $y->accuracy(2); $x->bior($y); ok 691 - is a valid object ok 692 - $x->{accuracy} == 2 ok 693 - $x->{precision} is undef ok 694 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->bior($y); ok 695 - is a valid object ok 696 - $x->{precision} == 1 ok 697 - $x->{accuracy} is undef ok 698 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->bior($y); ok 699 - is a valid object ok 700 - $x->{precision} == 1 ok 701 - $x->{accuracy} is undef ok 702 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bpow($y); ok 703 - is a valid object ok 704 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bpow($y); ok 705 - is a valid object ok 706 - $x = Math::BigInt->new("2"); $x->accuracy(2); $y = Math::BigInt->new("0"); $x->bpow($y); ok 707 - is a valid object ok 708 - $x->{accuracy} == 2 ok 709 - $x->{precision} is undef ok 710 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $y->accuracy(2); $x->bpow($y); ok 711 - is a valid object ok 712 - $x->{accuracy} == 2 ok 713 - $x->{precision} is undef ok t/bfround_numify.t ............ 1..3 ok 1 - numify before bfround ok 2 - numify after bfround ok 3 - bstr after bfround ok t/big_ap.t .................... 1..17 # Test new() ok 1 - Math::BigRat->new("12345678901234567890/2") ok 2 - Math::BigRat->new("1234567890123456789E1") ok 3 - Math::BigRat->new("12345678901234567890/1E0") ok 4 - Math::BigRat->new("1234567890123456789e1/1") ok 5 - Math::BigRat->new("1234567890123456789e1/1E0") ok 6 - Math::BigRat->new("12345678901234567890") ok 7 - Math::BigRat->new("12345678901234567890") # Test bdiv() ok 8 # Test bmul() ok 9 ok 10 ok 11 ok 12 # Test bdiv() ok 13 # Test bmul() ok 14 ok 15 # Test binc() ok 16 # Test bdec() ok 17 ok t/big_pi_e.t .................. 1..8 ok 1 - A is not defined ok 2 - P is not defined ok 3 - A is not defined ok 4 - P is not defined ok 5 - A is defined ok 6 - P is not defined ok 7 - A is not defined ok 8 - P is not defined ok t/bigfltpm.t .................. 1..3089 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 - 'bgcd() as function' isa 'Math::BigFloat' ok 6 - bgcd() as function ok 7 - 'bgcd() as class method' isa 'Math::BigFloat' ok 8 - bgcd() as class method ok 9 - 'bgcd() as instance method' isa 'Math::BigFloat' ok 10 - bgcd() as instance method ok 11 - bgcd() does not modify invocand ok 12 - 'blcm() as function' isa 'Math::BigFloat' ok 13 - blcm() as function ok 14 - 'blcm() as class method' isa 'Math::BigFloat' ok 15 - blcm() as class method ok 16 - 'blcm() as instance method' isa 'Math::BigFloat' ok 17 - blcm() as instance method ok 18 - blcm() does not modify invocand ok 19 - $e->{_e}->[0] is a scalar ok 20 - Math::BigFloat->config('lib') ok 21 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 37 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 38 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 43 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 44 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 51 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 52 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 53 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 54 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 55 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 56 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 57 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 58 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 59 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 60 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 61 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 62 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 63 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 64 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 65 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 66 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 67 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 68 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 69 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 70 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 71 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 72 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 73 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 74 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 75 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 76 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 77 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 78 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 79 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 80 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 81 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 82 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 83 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 84 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 85 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 86 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 87 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 88 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 89 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 90 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 91 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 92 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 93 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 94 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 95 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 96 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 97 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 98 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 99 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 100 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 101 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 102 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 103 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 104 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 105 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 106 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 107 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 108 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 109 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 110 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 111 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 112 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 113 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 114 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 115 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 116 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 117 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 118 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 119 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 120 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 121 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 122 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 123 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 124 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 125 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 126 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 127 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 136 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 137 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 140 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 141 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 142 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 143 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 144 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 145 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 146 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 147 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 148 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 149 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 150 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 151 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 152 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 153 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 154 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 155 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 156 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 157 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 158 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 159 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 160 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 161 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 162 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 163 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 164 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 165 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 224 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 225 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 226 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 227 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 228 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 229 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 230 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 231 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 232 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 233 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 234 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 235 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 236 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 237 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 238 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 239 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 240 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 241 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 242 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 243 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 244 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 245 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 246 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 247 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 248 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 249 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 250 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 251 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 252 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 253 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 254 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 255 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 256 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 257 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 258 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 259 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 260 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 261 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 262 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 263 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 264 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 265 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 266 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 267 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 268 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 269 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 270 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 271 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 272 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 273 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 274 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 275 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 276 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 277 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 278 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 279 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 280 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 281 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 282 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 283 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 284 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 285 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 286 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 287 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 288 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 289 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 290 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 291 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 292 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 293 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 294 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 295 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 296 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 297 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 298 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 299 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 300 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 301 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 302 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 303 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 304 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 305 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 306 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 307 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 308 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 309 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 310 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 311 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 312 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 313 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 314 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 315 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 316 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 317 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 318 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 319 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 320 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 321 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 322 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 323 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 324 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 325 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 326 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 327 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 328 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 329 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 330 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 331 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 332 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 333 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 334 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 335 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 336 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 337 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 338 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 339 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 340 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 341 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 342 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 343 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 344 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 345 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 346 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 347 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 348 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 349 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 350 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 351 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 352 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 353 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 354 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 355 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 356 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 357 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 358 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 359 - $x = Math::BigFloat->new("1"); $x; ok 360 - $x = Math::BigFloat->new("1"); $x; ok 361 - $x = Math::BigFloat->new("-0"); $x; ok 362 - $x = Math::BigFloat->new("-0"); $x; ok 363 - $x = Math::BigFloat->new("invalid"); $x; ok 364 - $x = Math::BigFloat->new("invalid"); $x; ok 365 - $x = Math::BigFloat->new("+inf"); $x; ok 366 - $x = Math::BigFloat->new("+inf"); $x; ok 367 - $x = Math::BigFloat->new("-inf"); $x; ok 368 - $x = Math::BigFloat->new("-inf"); $x; ok 369 - $x = Math::BigFloat->new("123"); $x; ok 370 - $x = Math::BigFloat->new("123"); $x; ok 371 - $x = Math::BigFloat->new("-123.4567"); $x; ok 372 - $x = Math::BigFloat->new("-123.4567"); $x; ok 373 - $x = Math::BigFloat->new(".2E-3."); $x; ok 374 - $x = Math::BigFloat->new(".2E-3."); $x; ok 375 - $x = Math::BigFloat->new("1e3e4"); $x; ok 376 - $x = Math::BigFloat->new("1e3e4"); $x; ok 377 - $x = Math::BigFloat->new(".2E2"); $x; ok 378 - $x = Math::BigFloat->new(".2E2"); $x; ok 379 - $x = Math::BigFloat->new("1.E3"); $x; ok 380 - $x = Math::BigFloat->new("1.E3"); $x; ok 381 - $x = Math::BigFloat->new("0e0"); $x; ok 382 - $x = Math::BigFloat->new("0e0"); $x; ok 383 - $x = Math::BigFloat->new("+0e0"); $x; ok 384 - $x = Math::BigFloat->new("+0e0"); $x; ok 385 - $x = Math::BigFloat->new("+0e+0"); $x; ok 386 - $x = Math::BigFloat->new("+0e+0"); $x; ok 387 - $x = Math::BigFloat->new("-0e+0"); $x; ok 388 - $x = Math::BigFloat->new("-0e+0"); $x; ok 389 - $x = Math::BigFloat->new("0e-0"); $x; ok 390 - $x = Math::BigFloat->new("0e-0"); $x; ok 391 - $x = Math::BigFloat->new("-0e-0"); $x; ok 392 - $x = Math::BigFloat->new("-0e-0"); $x; ok 393 - $x = Math::BigFloat->new("+0e-0"); $x; ok 394 - $x = Math::BigFloat->new("+0e-0"); $x; ok 395 - $x = Math::BigFloat->new("000"); $x; ok 396 - $x = Math::BigFloat->new("000"); $x; ok 397 - $x = Math::BigFloat->new("00e2"); $x; ok 398 - $x = Math::BigFloat->new("00e2"); $x; ok 399 - $x = Math::BigFloat->new("00e02"); $x; ok 400 - $x = Math::BigFloat->new("00e02"); $x; ok 401 - $x = Math::BigFloat->new("000e002"); $x; ok 402 - $x = Math::BigFloat->new("000e002"); $x; ok 403 - $x = Math::BigFloat->new("000e1230"); $x; ok 404 - $x = Math::BigFloat->new("000e1230"); $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+3"); $x; ok 408 - $x = Math::BigFloat->new("00e+3"); $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("00e+03"); $x; ok 412 - $x = Math::BigFloat->new("00e+03"); $x; ok 413 - $x = Math::BigFloat->new("-000"); $x; ok 414 - $x = Math::BigFloat->new("-000"); $x; ok 415 - $x = Math::BigFloat->new("-00e2"); $x; ok 416 - $x = Math::BigFloat->new("-00e2"); $x; ok 417 - $x = Math::BigFloat->new("-00e02"); $x; ok 418 - $x = Math::BigFloat->new("-00e02"); $x; ok 419 - $x = Math::BigFloat->new("-000e002"); $x; ok 420 - $x = Math::BigFloat->new("-000e002"); $x; ok 421 - $x = Math::BigFloat->new("-000e1230"); $x; ok 422 - $x = Math::BigFloat->new("-000e1230"); $x; ok 423 - $x = Math::BigFloat->new("-00e-3"); $x; ok 424 - $x = Math::BigFloat->new("-00e-3"); $x; ok 425 - $x = Math::BigFloat->new("-00e+3"); $x; ok 426 - $x = Math::BigFloat->new("-00e+3"); $x; ok 427 - $x = Math::BigFloat->new("-00e-03"); $x; ok 428 - $x = Math::BigFloat->new("-00e-03"); $x; ok 429 - $x = Math::BigFloat->new("-00e+03"); $x; ok 430 - $x = Math::BigFloat->new("-00e+03"); $x; ok 431 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 444 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 445 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 446 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 447 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 448 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 449 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 450 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 451 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 452 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 453 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 454 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 455 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 456 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 457 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 458 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 459 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 460 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 461 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 462 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 463 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 464 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 465 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 466 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 467 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 468 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 469 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 470 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 471 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 472 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 473 - $x = Math::BigFloat->new("128"); $x->as_hex(); ok 474 - $x = Math::BigFloat->new("-128"); $x->as_hex(); ok 475 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 476 - $x = Math::BigFloat->new("-0"); $x->as_hex(); ok 477 - $x = Math::BigFloat->new("1"); $x->as_hex(); ok 478 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_hex(); ok 479 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 480 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 481 - $x = Math::BigFloat->new("invalid"); $x->as_hex(); ok 482 - $x = Math::BigFloat->new("128"); $x->as_bin(); ok 483 - $x = Math::BigFloat->new("-128"); $x->as_bin(); ok 484 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 485 - $x = Math::BigFloat->new("-0"); $x->as_bin(); ok 486 - $x = Math::BigFloat->new("1"); $x->as_bin(); ok 487 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 488 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_bin(); ok 489 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 490 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 491 - $x = Math::BigFloat->new("invalid"); $x->as_bin(); ok 492 - $x = Math::BigFloat->new("128"); $x->as_oct(); ok 493 - $x = Math::BigFloat->new("-128"); $x->as_oct(); ok 494 - $x = Math::BigFloat->new("0"); $x->as_oct(); ok 495 - $x = Math::BigFloat->new("-0"); $x->as_oct(); ok 496 - $x = Math::BigFloat->new("1"); $x->as_oct(); ok 497 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 498 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_oct(); ok 499 - $x = Math::BigFloat->new("+inf"); $x->as_oct(); ok 500 - $x = Math::BigFloat->new("-inf"); $x->as_oct(); ok 501 - $x = Math::BigFloat->new("invalid"); $x->as_oct(); ok 502 - $x = Math::BigFloat->new("128"); $x->to_hex(); ok 503 - $x = Math::BigFloat->new("-128"); $x->to_hex(); ok 504 - $x = Math::BigFloat->new("0"); $x->to_hex(); ok 505 - $x = Math::BigFloat->new("-0"); $x->to_hex(); ok 506 - $x = Math::BigFloat->new("1"); $x->to_hex(); ok 507 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_hex(); ok 508 - $x = Math::BigFloat->new("+inf"); $x->to_hex(); ok 509 - $x = Math::BigFloat->new("-inf"); $x->to_hex(); ok 510 - $x = Math::BigFloat->new("invalid"); $x->to_hex(); ok 511 - $x = Math::BigFloat->new("128"); $x->to_bin(); ok 512 - $x = Math::BigFloat->new("-128"); $x->to_bin(); ok 513 - $x = Math::BigFloat->new("0"); $x->to_bin(); ok 514 - $x = Math::BigFloat->new("-0"); $x->to_bin(); ok 515 - $x = Math::BigFloat->new("1"); $x->to_bin(); ok 516 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 517 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_bin(); ok 518 - $x = Math::BigFloat->new("+inf"); $x->to_bin(); ok 519 - $x = Math::BigFloat->new("-inf"); $x->to_bin(); ok 520 - $x = Math::BigFloat->new("invalid"); $x->to_bin(); ok 521 - $x = Math::BigFloat->new("128"); $x->to_oct(); ok 522 - $x = Math::BigFloat->new("-128"); $x->to_oct(); ok 523 - $x = Math::BigFloat->new("0"); $x->to_oct(); ok 524 - $x = Math::BigFloat->new("-0"); $x->to_oct(); ok 525 - $x = Math::BigFloat->new("1"); $x->to_oct(); ok 526 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 527 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_oct(); ok 528 - $x = Math::BigFloat->new("+inf"); $x->to_oct(); ok 529 - $x = Math::BigFloat->new("-inf"); $x->to_oct(); ok 530 - $x = Math::BigFloat->new("invalid"); $x->to_oct(); ok 531 - $x = Math::BigFloat->new("0"); $x->numify(); ok 532 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 533 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 534 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 535 - $x = Math::BigFloat->new("100"); $x->numify(); ok 536 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 537 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 538 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 539 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 540 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 541 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 542 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 543 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 544 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 545 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 546 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 547 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 548 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 549 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 550 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 551 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 552 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 553 - $x = Math::BigFloat->new("0"); $x->bone(); ok 554 - $x = Math::BigFloat->new("0"); $x->bone(); ok 555 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 556 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 557 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 558 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 559 - $x = Math::BigFloat->new("2"); $x->bone(); ok 560 - $x = Math::BigFloat->new("2"); $x->bone(); ok 561 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 562 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 563 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 564 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 565 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 566 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 567 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 568 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 569 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 570 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 571 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 572 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 573 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 574 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 575 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 576 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 577 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 578 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 579 - $x = Math::BigFloat->new("inf"); $x; ok 580 - $x = Math::BigFloat->new("inf"); $x; ok 581 - $x = Math::BigFloat->new("+inf"); $x; ok 582 - $x = Math::BigFloat->new("+inf"); $x; ok 583 - $x = Math::BigFloat->new("-inf"); $x; ok 584 - $x = Math::BigFloat->new("-inf"); $x; ok 585 - $x = Math::BigFloat->new("+infinity"); $x; ok 586 - $x = Math::BigFloat->new("+infinity"); $x; ok 587 - $x = Math::BigFloat->new("+-inf"); $x; ok 588 - $x = Math::BigFloat->new("+-inf"); $x; ok 589 - $x = Math::BigFloat->new("abc"); $x; ok 590 - $x = Math::BigFloat->new("abc"); $x; ok 591 - $x = Math::BigFloat->new(" 1 a"); $x; ok 592 - $x = Math::BigFloat->new(" 1 a"); $x; ok 593 - $x = Math::BigFloat->new("1bcd2"); $x; ok 594 - $x = Math::BigFloat->new("1bcd2"); $x; ok 595 - $x = Math::BigFloat->new("11111b"); $x; ok 596 - $x = Math::BigFloat->new("11111b"); $x; ok 597 - $x = Math::BigFloat->new("+1z"); $x; ok 598 - $x = Math::BigFloat->new("+1z"); $x; ok 599 - $x = Math::BigFloat->new("-1z"); $x; ok 600 - $x = Math::BigFloat->new("-1z"); $x; ok 601 - $x = Math::BigFloat->new("0e999"); $x; ok 602 - $x = Math::BigFloat->new("0e999"); $x; ok 603 - $x = Math::BigFloat->new("0e-999"); $x; ok 604 - $x = Math::BigFloat->new("0e-999"); $x; ok 605 - $x = Math::BigFloat->new("-0e999"); $x; ok 606 - $x = Math::BigFloat->new("-0e999"); $x; ok 607 - $x = Math::BigFloat->new("-0e-999"); $x; ok 608 - $x = Math::BigFloat->new("-0e-999"); $x; ok 609 - $x = Math::BigFloat->new("0"); $x; ok 610 - $x = Math::BigFloat->new("0"); $x; ok 611 - $x = Math::BigFloat->new("+0"); $x; ok 612 - $x = Math::BigFloat->new("+0"); $x; ok 613 - $x = Math::BigFloat->new("+00"); $x; ok 614 - $x = Math::BigFloat->new("+00"); $x; ok 615 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 616 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 617 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 618 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 619 - $x = Math::BigFloat->new("-0"); $x; ok 620 - $x = Math::BigFloat->new("-0"); $x; ok 621 - $x = Math::BigFloat->new("-0000"); $x; ok 622 - $x = Math::BigFloat->new("-0000"); $x; ok 623 - $x = Math::BigFloat->new("+1"); $x; ok 624 - $x = Math::BigFloat->new("+1"); $x; ok 625 - $x = Math::BigFloat->new("+01"); $x; ok 626 - $x = Math::BigFloat->new("+01"); $x; ok 627 - $x = Math::BigFloat->new("+001"); $x; ok 628 - $x = Math::BigFloat->new("+001"); $x; ok 629 - $x = Math::BigFloat->new("+00000100000"); $x; ok 630 - $x = Math::BigFloat->new("+00000100000"); $x; ok 631 - $x = Math::BigFloat->new("123456789"); $x; ok 632 - $x = Math::BigFloat->new("123456789"); $x; ok 633 - $x = Math::BigFloat->new("-1"); $x; ok 634 - $x = Math::BigFloat->new("-1"); $x; ok 635 - $x = Math::BigFloat->new("-01"); $x; ok 636 - $x = Math::BigFloat->new("-01"); $x; ok 637 - $x = Math::BigFloat->new("-001"); $x; ok 638 - $x = Math::BigFloat->new("-001"); $x; ok 639 - $x = Math::BigFloat->new("-123456789"); $x; ok 640 - $x = Math::BigFloat->new("-123456789"); $x; ok 641 - $x = Math::BigFloat->new("-00000100000"); $x; ok 642 - $x = Math::BigFloat->new("-00000100000"); $x; ok 643 - $x = Math::BigFloat->new("123.456a"); $x; ok 644 - $x = Math::BigFloat->new("123.456a"); $x; ok 645 - $x = Math::BigFloat->new("123.456"); $x; ok 646 - $x = Math::BigFloat->new("123.456"); $x; ok 647 - $x = Math::BigFloat->new("0.01"); $x; ok 648 - $x = Math::BigFloat->new("0.01"); $x; ok 649 - $x = Math::BigFloat->new(".002"); $x; ok 650 - $x = Math::BigFloat->new(".002"); $x; ok 651 - $x = Math::BigFloat->new("+.2"); $x; ok 652 - $x = Math::BigFloat->new("+.2"); $x; ok 653 - $x = Math::BigFloat->new("-0.0003"); $x; ok 654 - $x = Math::BigFloat->new("-0.0003"); $x; ok 655 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 656 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 657 - $x = Math::BigFloat->new("123456E2"); $x; ok 658 - $x = Math::BigFloat->new("123456E2"); $x; ok 659 - $x = Math::BigFloat->new("123456E-2"); $x; ok 660 - $x = Math::BigFloat->new("123456E-2"); $x; ok 661 - $x = Math::BigFloat->new("-123456E2"); $x; ok 662 - $x = Math::BigFloat->new("-123456E2"); $x; ok 663 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 664 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 665 - $x = Math::BigFloat->new("1e1"); $x; ok 666 - $x = Math::BigFloat->new("1e1"); $x; ok 667 - $x = Math::BigFloat->new("2e-11"); $x; ok 668 - $x = Math::BigFloat->new("2e-11"); $x; ok 669 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 670 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 671 - $x = Math::BigFloat->new(" 000001"); $x; ok 672 - $x = Math::BigFloat->new(" 000001"); $x; ok 673 - $x = Math::BigFloat->new(" -00001"); $x; ok 674 - $x = Math::BigFloat->new(" -00001"); $x; ok 675 - $x = Math::BigFloat->new(" -1"); $x; ok 676 - $x = Math::BigFloat->new(" -1"); $x; ok 677 - $x = Math::BigFloat->new(" 000.01"); $x; ok 678 - $x = Math::BigFloat->new(" 000.01"); $x; ok 679 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 680 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 681 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 682 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 683 - $x = Math::BigFloat->new("-3e111"); $x; ok 684 - $x = Math::BigFloat->new("-3e111"); $x; ok 685 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 686 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 687 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 688 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 689 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 690 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 691 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 692 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 693 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 694 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 695 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 696 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 697 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 698 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 699 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 700 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 701 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 702 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 703 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 704 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 705 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 706 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 707 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 708 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 709 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 710 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 711 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 712 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 713 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 714 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 715 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 716 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 717 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 718 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 719 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 720 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 721 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 722 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 723 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 724 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 725 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 726 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 727 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 728 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 729 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 730 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 731 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 732 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 733 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 734 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 735 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 736 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 737 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 738 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 739 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 740 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 741 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 742 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 743 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 744 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 745 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 746 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 747 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 748 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 749 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 750 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 751 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 752 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 753 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 754 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 755 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 756 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 757 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 758 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 759 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 760 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 761 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 762 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 763 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 764 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 765 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 766 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 767 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 768 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 769 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 770 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 771 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 772 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 773 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 774 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 775 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 776 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 777 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 778 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 779 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 780 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 781 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 782 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 783 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 784 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 785 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 786 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 787 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 788 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 789 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 790 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 791 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 792 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 793 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 794 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 795 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 796 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 797 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 798 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 799 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 800 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 801 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 802 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 803 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 804 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 805 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 806 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 807 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 808 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 809 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 810 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 811 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 812 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 813 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 814 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 815 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 816 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 817 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 818 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 819 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 820 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 821 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 822 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 823 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 824 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 825 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 826 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 827 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 828 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 829 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 830 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 831 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 832 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 833 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 834 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 835 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 836 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 837 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 838 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 839 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 840 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 841 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 842 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 843 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 844 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 845 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 846 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 847 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 848 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 849 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 850 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 851 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 852 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 853 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 854 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 855 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 856 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 857 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 858 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 859 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 860 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 861 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 862 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 863 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 865 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 866 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 867 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 868 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 869 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 870 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 871 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 872 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 873 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 874 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 875 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 876 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 877 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 878 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 879 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 880 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 881 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 882 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 883 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 884 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 885 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 886 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 887 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 888 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 889 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 890 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 891 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 892 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 893 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 894 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 895 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 896 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 897 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 898 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 899 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 900 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 901 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 902 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 903 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 904 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 905 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 906 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 907 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 908 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 909 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 910 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 911 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 912 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 913 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 914 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 915 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 916 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 917 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 918 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 919 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 920 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 921 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 922 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 923 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 924 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 925 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 926 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 927 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 928 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 929 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 930 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 931 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 932 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 933 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 934 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 935 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 936 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 937 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 938 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 939 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 940 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 941 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 942 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 943 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 944 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 945 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 946 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 947 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 948 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 949 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 950 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 951 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 952 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 953 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 954 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 955 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 956 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 957 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 958 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 959 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 960 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 961 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 962 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 963 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 964 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 965 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 966 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 967 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 968 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 969 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 970 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 971 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 972 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 973 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 974 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 975 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 976 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 977 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 978 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 979 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 980 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 981 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 982 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 983 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 984 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 985 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 986 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 987 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 988 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 989 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 990 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 991 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 992 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 993 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 994 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 995 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 996 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 997 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 998 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 999 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1000 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1001 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1002 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1003 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1004 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1005 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1006 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1007 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1008 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1009 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1010 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1011 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1012 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1013 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1014 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1015 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1016 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1017 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1018 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1019 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1020 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1021 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1022 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1023 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1024 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1025 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1026 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1027 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1028 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1029 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1030 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1031 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1032 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1033 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1034 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1035 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1036 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1037 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1038 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1039 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1040 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1041 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1042 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1043 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1044 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1045 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1046 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1047 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1048 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1049 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1050 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1051 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1052 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1053 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1054 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1055 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1060 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1061 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1062 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1063 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1064 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1065 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1066 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1067 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1068 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1069 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1070 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1071 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1072 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1073 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1074 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1075 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1076 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1077 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1078 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1079 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1080 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1081 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1082 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1083 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1084 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1085 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1086 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1087 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1088 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1089 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1090 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1091 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1092 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1093 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1094 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1095 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1096 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1097 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1098 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1099 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1100 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1101 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1102 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1103 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1104 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1105 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1106 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1107 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1108 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1109 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1110 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1111 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1112 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1113 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1114 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1115 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1116 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1117 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1118 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1119 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1120 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1121 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1122 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1123 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1124 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1125 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1126 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1127 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1128 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1129 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1130 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1131 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1132 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1133 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1134 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1135 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1136 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1137 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1138 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1139 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1140 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1141 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1142 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1143 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1144 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1145 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1146 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1147 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1148 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1149 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1150 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1151 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1152 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1153 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1154 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1155 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1156 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1157 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1158 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1159 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1160 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1161 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1162 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1163 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1164 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1165 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1166 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1167 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1168 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1169 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1170 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1171 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1172 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1173 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1174 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1175 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1176 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1177 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1178 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1179 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1180 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1181 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1182 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1183 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1184 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1185 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1186 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1187 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1188 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1189 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1190 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1191 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1192 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1193 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1194 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1195 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1196 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1197 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1198 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1199 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1200 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1201 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1202 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1203 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1204 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1205 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1206 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1207 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1208 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1209 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1210 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1211 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1212 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1213 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1214 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1215 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1216 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1217 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1218 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1219 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1220 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1221 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1222 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1223 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1224 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1225 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1226 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1227 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1228 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1229 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1230 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1231 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1232 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1233 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1234 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1235 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1236 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1237 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1238 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1239 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1240 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1241 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1242 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1243 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1244 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1245 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1246 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1247 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1248 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1249 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1250 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1251 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1252 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1253 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1254 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1255 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1256 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1257 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1258 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1259 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1260 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1261 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1262 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1263 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1264 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1265 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1266 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1267 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1268 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1269 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1270 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1271 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1272 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1273 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1274 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1275 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1276 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1277 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1278 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1279 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1280 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1281 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1282 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1283 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1284 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1285 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1286 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1287 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1288 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1289 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1290 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1291 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1292 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1293 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1294 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1295 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1296 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1297 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1298 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1299 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1300 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1301 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1302 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1303 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1304 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1305 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1306 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1307 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1308 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1309 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1310 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1311 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1312 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1313 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1314 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1315 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1316 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1317 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1318 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1319 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1320 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1321 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1322 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1323 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1324 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1325 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1326 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 1327 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 1328 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1329 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1330 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1331 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1332 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1333 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1334 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1335 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1336 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1337 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1338 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1339 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1340 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1341 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1342 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1343 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1344 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1345 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1346 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 1347 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 1348 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 1349 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 1350 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1351 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1352 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1353 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1354 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1355 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1356 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1357 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1358 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1359 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1360 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1361 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1362 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1363 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1364 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1365 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1366 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1367 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1368 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 1369 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 1370 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 1371 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 1372 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1373 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1374 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1375 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1376 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1377 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1378 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1379 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1380 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1381 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1382 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1383 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1384 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1385 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1386 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1387 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1388 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1389 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1390 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 1391 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 1392 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 1393 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 1394 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1395 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1396 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1397 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1398 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1399 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1400 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1401 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1402 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1403 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1404 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1405 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1406 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1407 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1408 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1409 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1410 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1411 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1412 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1413 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1414 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1415 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1416 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1417 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1418 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1419 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1420 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1421 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1422 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1423 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1424 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1425 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1426 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1427 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1428 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1429 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1430 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1431 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1432 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1433 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1434 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1435 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1436 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1437 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1438 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1439 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1440 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1441 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1442 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1443 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1444 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1445 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1446 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1447 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1448 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1449 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1450 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1451 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1452 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1453 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1454 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1455 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1456 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1457 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1458 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1459 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1460 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1461 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1462 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1463 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1464 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1465 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1466 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1467 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1468 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1469 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1470 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1471 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1472 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1473 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1474 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1475 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1476 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1477 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1478 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1479 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1480 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1481 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1482 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1483 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1484 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1485 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1486 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1487 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1488 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1489 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1490 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1491 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1492 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1493 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1494 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1495 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1496 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1497 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1498 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1499 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1500 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1501 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1502 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1503 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1504 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1505 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1506 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1507 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1508 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1509 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1510 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1511 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1512 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1513 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1514 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1515 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1516 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1517 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1518 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1519 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1520 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1521 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1522 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1523 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1524 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1525 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1526 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1527 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1528 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1529 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1530 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1531 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1532 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1533 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1534 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1535 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1536 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1537 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1538 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1539 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1540 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1541 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1542 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1543 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1544 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1545 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1546 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1547 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1548 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1549 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1550 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1551 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1552 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1553 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1554 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1555 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1556 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1557 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1558 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1559 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1560 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1561 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1562 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1563 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1564 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1565 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1566 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1567 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1568 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1569 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1570 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1571 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1572 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1573 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1574 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1575 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1576 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1577 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1578 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1579 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1580 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1581 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1582 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1583 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1584 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1585 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1586 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1587 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1588 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1589 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1590 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1591 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1592 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1593 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1594 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1595 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1596 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1597 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1598 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1599 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1600 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1601 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1602 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1603 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1604 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1605 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1606 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1607 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1608 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1609 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1610 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1611 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1612 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1613 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1614 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1615 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1616 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1617 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1618 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1619 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1620 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1621 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1622 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1623 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1624 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1625 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1626 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1627 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1628 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1629 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1630 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1631 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1632 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1633 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1634 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1635 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1636 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1637 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1638 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1639 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1640 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1641 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1642 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1643 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1644 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1645 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1646 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1647 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1648 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1649 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1650 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1651 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1652 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1653 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1654 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1655 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1656 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1657 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1658 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1659 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1660 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1661 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1662 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1663 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1664 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1665 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1666 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1667 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1668 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1669 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1670 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1671 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1672 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1673 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1674 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1675 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1676 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1677 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1678 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1679 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1680 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1681 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1682 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1683 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1684 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1685 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1686 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1687 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1688 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1689 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1690 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1691 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1692 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1693 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1694 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1695 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1696 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1697 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1698 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1699 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1700 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1701 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1702 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1703 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1704 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1705 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1706 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1707 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1708 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1709 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1710 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1711 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1712 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1713 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1714 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1715 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1716 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1717 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1718 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1719 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1720 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1721 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1722 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1723 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1724 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1725 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1726 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1727 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1728 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1729 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1730 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1731 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1732 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1733 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1734 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1735 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1736 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1737 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1738 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1739 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1740 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1741 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1742 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1743 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1744 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1745 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1746 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1747 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1748 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1749 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1750 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1751 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1752 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1753 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1754 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1755 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1756 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1757 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1758 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1759 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1760 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1761 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1762 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1763 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1764 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1765 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1766 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1767 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1768 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1769 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1770 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1771 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1772 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1773 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1774 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1775 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1776 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1777 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1778 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1779 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1780 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1781 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1782 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1783 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1784 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1785 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1786 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1787 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1788 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1789 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1790 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1791 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1792 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1793 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1794 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1795 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1796 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1797 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1798 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1799 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1800 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1801 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1802 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1803 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1804 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1805 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1806 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1807 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1808 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1809 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1810 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1811 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1812 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1813 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1814 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1815 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1816 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1817 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1818 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1819 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1820 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1821 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1822 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1823 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1824 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1825 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1826 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1827 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1828 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1829 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1830 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1831 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1832 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1833 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1834 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1835 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1836 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1837 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1838 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1839 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1840 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1841 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1842 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1843 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1844 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1845 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1846 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1847 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1848 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1849 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1850 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1851 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1852 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1853 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1854 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1855 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1856 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1857 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1858 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1859 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1860 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1861 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1862 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1863 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1864 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1865 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1866 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1867 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1868 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1869 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1870 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1871 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1872 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1873 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1874 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1875 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1876 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1877 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1878 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1879 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1880 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1881 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1882 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1883 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1884 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1885 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1886 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1887 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1888 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1889 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1890 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1891 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1892 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1893 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1894 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1895 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1896 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1897 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1898 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1899 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1900 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1901 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1902 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1903 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1904 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1905 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1906 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1907 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1908 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1909 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1910 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1911 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1912 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1913 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1914 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1915 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1916 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1917 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1918 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1919 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1920 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1921 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1922 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1923 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1924 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1925 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1926 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1927 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1928 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1929 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1930 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1931 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1932 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1933 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1934 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1935 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1936 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1937 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1938 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1939 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1940 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1941 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1942 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1943 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1944 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1945 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1946 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1947 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1948 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1949 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1950 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1951 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1952 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1953 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1954 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1955 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1956 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1957 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1958 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1959 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1960 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1961 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1962 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1963 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1964 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1965 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1966 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1967 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1968 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1969 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1970 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1971 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1972 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1973 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1974 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1975 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1976 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1977 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1978 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1979 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1980 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1981 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1982 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1983 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1984 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1985 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1986 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1987 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1988 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1989 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1990 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1991 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1992 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1993 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1994 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1995 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1996 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1997 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1998 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1999 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 2000 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 2001 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 2002 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 2003 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 2004 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 2005 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 2006 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2007 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2008 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2009 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2010 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2011 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2012 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2013 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2014 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2015 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2016 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2017 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2018 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2019 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2020 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2021 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2022 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2023 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2024 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2025 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2026 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2027 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2028 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2029 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2030 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2031 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2032 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2033 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2034 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2035 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2036 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2037 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2038 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2039 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2040 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2041 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2042 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2043 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2044 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2045 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2046 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2047 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2048 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2049 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2050 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2051 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2052 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2053 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2054 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2055 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2056 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2057 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2058 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2059 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2060 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2061 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2062 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2063 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2064 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2065 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2066 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2067 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2068 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2069 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2070 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2071 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2072 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2073 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2074 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2075 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2076 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2077 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2078 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2079 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2080 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2081 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2082 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2083 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2084 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2085 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2086 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2087 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2088 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2089 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2090 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2091 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2092 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2093 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2094 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2095 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2096 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2097 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2098 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2099 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2100 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2101 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2102 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2103 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2104 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2105 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2106 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2107 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2108 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2109 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2110 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2111 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2112 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2113 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2114 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2115 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2116 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2117 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2118 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2119 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2120 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2121 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2122 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2123 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2124 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2125 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2126 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2127 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2128 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2129 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2130 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2131 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2132 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2133 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2134 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2135 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2136 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2137 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2138 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2139 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2140 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2141 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2142 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2143 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2144 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2145 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2146 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2147 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2148 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2149 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2150 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2151 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2152 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2153 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2154 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2155 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2156 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2157 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2158 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2159 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2160 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2161 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2162 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2163 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2164 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2165 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2166 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2167 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2168 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2169 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2170 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2171 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2172 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2173 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2174 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2175 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2176 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2177 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2178 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2179 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2180 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2181 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2182 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2183 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2184 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2185 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2186 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2187 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2188 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2189 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2190 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2191 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2192 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2193 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2194 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2195 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2196 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2197 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2198 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2199 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2200 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2201 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2202 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2203 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2204 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2205 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2206 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2207 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2208 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2209 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2210 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2211 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2212 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2213 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2214 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2215 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2216 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2217 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2218 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2219 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2220 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2221 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2222 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2223 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2224 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2225 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2226 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2227 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2228 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2229 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2230 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2231 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2232 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2233 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2234 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2235 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2236 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2237 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2238 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2239 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2240 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2241 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2242 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2243 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2244 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2245 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2246 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2247 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2248 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2249 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2250 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2251 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2252 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2253 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2254 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2255 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2256 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2257 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2258 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2259 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2260 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2261 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2262 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2263 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2264 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2265 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2266 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2267 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2268 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2269 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2270 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2271 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2272 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2273 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2274 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2275 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2276 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2277 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2278 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2279 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2280 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2281 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2282 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2283 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2284 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2285 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2286 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2287 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2288 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2289 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2290 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2291 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2292 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2293 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2294 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2295 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2296 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2297 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2298 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2299 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2300 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2301 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2302 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2303 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2304 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2305 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2306 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2307 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2308 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2309 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2310 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2311 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2312 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2313 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2314 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2315 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2316 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2317 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2318 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2319 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2320 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2321 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2322 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2323 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2324 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2325 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2326 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2327 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2328 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2329 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2330 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2331 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2332 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2333 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2334 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2335 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2336 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2337 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2338 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2339 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2340 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2341 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2342 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2343 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2344 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2345 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2346 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2347 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2348 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2349 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2350 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2351 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2352 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2353 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2354 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2355 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2356 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2357 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2358 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2359 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2360 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2361 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2362 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2363 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2364 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2365 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2366 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2367 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2368 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2369 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2370 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2371 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2372 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2373 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2374 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2375 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2376 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2377 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2378 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2379 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2380 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2381 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2382 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2383 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2384 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2385 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2386 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2387 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2388 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2389 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2390 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2391 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2392 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2393 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2394 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2395 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2396 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2397 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2398 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2399 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2400 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2401 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2402 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2403 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2404 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2405 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2406 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2407 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2408 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2409 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2410 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2411 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2412 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2413 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2414 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2415 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2416 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2417 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2418 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2419 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2420 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2421 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2422 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2423 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2424 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2425 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2426 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2427 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2428 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2429 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2430 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2431 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2432 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2433 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2434 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2435 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2436 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2437 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2438 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2439 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2440 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2441 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2442 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2443 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2444 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2445 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2446 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2447 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2448 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2449 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2450 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2451 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2452 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2453 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2454 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2455 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2456 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2457 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2458 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2459 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2460 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2461 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2462 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2463 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2464 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2465 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2466 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2467 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2468 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2469 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2470 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2471 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2472 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2473 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2474 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2475 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2476 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2477 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2478 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2479 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2480 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2481 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2482 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2483 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2484 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2485 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2486 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2487 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2488 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2489 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2490 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2491 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2492 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2493 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2494 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2495 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2496 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2497 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2498 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2499 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2500 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2501 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2502 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2503 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2504 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2505 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2506 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2507 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2508 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2509 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2510 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2511 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2512 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2513 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2514 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2515 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2516 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2517 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2518 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2519 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2520 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2521 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2522 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2523 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2524 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2525 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2526 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2527 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2528 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2529 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2530 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2531 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2532 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2533 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2534 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2535 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2536 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2537 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2538 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2539 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2540 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2541 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2542 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2543 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2544 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2545 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2546 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2547 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2548 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2549 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2550 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2551 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2552 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2553 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2554 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2555 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2556 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2557 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2558 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2559 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2560 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2561 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2562 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2563 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2564 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2565 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2566 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2567 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2568 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2569 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2570 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2571 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2572 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2573 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2574 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2575 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2576 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2577 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2578 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2579 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2580 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2581 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2582 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2583 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2584 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2585 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2586 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2587 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2588 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2589 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2590 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2591 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2592 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2593 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2594 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2595 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2596 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2597 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2598 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2599 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2600 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2601 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2602 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2603 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2604 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2605 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2606 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2607 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2608 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2609 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2610 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2611 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2612 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2613 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2614 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2615 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2616 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2617 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2618 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2619 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2620 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2621 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2622 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2623 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2624 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2625 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2626 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2627 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2628 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2629 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2630 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2631 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2632 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2633 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2634 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2635 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2636 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2637 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2638 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2639 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2640 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2641 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2642 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2643 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2644 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2645 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2646 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2647 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2648 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2649 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2650 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2651 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2652 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2653 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2654 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2655 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2656 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2657 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2658 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2659 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2660 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2661 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2662 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2663 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2664 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2665 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2666 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2667 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2668 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2669 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2670 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2671 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2672 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2673 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2674 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2675 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2676 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2677 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2678 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2679 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2680 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2681 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2682 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2683 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2684 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2685 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2686 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2687 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2688 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2689 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2690 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2691 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2692 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2693 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2694 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2695 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2696 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2697 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2698 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2699 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2700 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2701 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2702 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2703 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2704 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2705 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2706 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2707 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2708 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2709 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2710 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2711 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2712 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2713 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2714 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2715 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2716 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2717 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2718 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2719 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2720 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2721 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2722 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2723 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2724 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2725 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2726 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2727 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2728 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2729 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2730 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2731 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2732 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2733 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2734 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2735 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2736 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2737 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2738 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2739 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2740 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2741 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2742 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2743 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2744 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2745 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2746 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2747 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2748 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2749 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2750 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2751 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2752 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2753 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2754 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2755 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2756 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2757 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2758 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2759 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2760 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2761 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2762 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2763 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2764 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2765 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2766 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2767 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2768 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2769 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2770 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2771 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2772 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2773 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2774 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2775 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2776 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2777 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2778 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2779 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2780 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2781 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2782 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2783 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2784 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2785 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2786 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2787 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2788 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2789 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2790 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2791 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2792 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2793 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2794 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2795 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2796 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2797 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2798 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2799 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2800 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2801 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2802 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2803 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2804 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2805 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2806 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2807 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2808 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2809 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2810 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2811 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2812 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2813 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2814 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2815 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2816 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2817 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2818 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2819 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2820 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2821 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2822 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2823 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2824 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2825 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2826 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2827 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2828 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2829 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2830 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2831 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2832 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2833 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2834 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2835 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2836 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2837 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2838 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2839 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2840 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2841 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2842 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2843 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2844 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2845 - $x = Math::BigFloat->new("invalid"); $x->is_int(); ok 2846 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2847 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2848 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2849 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2850 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2851 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2852 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2853 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2854 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2855 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2856 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2857 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2858 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2859 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2860 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2861 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2862 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2863 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2864 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2865 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2866 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2867 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2868 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2869 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2870 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2871 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2872 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2873 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2874 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2875 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2876 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2877 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2878 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2879 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2880 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2881 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2882 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2883 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2884 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2885 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2886 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2887 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2888 - $x = Math::BigFloat->new("0"); $x->is_non_positive(); ok 2889 - $x = Math::BigFloat->new("1"); $x->is_non_positive(); ok 2890 - $x = Math::BigFloat->new("-1"); $x->is_non_positive(); ok 2891 - $x = Math::BigFloat->new("NaN"); $x->is_non_positive(); ok 2892 - $x = Math::BigFloat->new("-inf"); $x->is_non_positive(); ok 2893 - $x = Math::BigFloat->new("+inf"); $x->is_non_positive(); ok 2894 - $x = Math::BigFloat->new("0"); $x->is_non_negative(); ok 2895 - $x = Math::BigFloat->new("1"); $x->is_non_negative(); ok 2896 - $x = Math::BigFloat->new("-1"); $x->is_non_negative(); ok 2897 - $x = Math::BigFloat->new("NaN"); $x->is_non_negative(); ok 2898 - $x = Math::BigFloat->new("-inf"); $x->is_non_negative(); ok 2899 - $x = Math::BigFloat->new("+inf"); $x->is_non_negative(); ok 2900 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2901 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2902 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2903 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2904 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2905 - $x = Math::BigFloat->new("invalid"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2906 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2907 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2908 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2909 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2910 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2911 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2912 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2913 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2914 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2915 - $x = Math::BigFloat->new("invalid"); $x->exponent()->bstr(); ok 2916 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2917 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2918 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2919 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2920 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2921 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2922 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2923 - $x = Math::BigFloat->new("invalid"); $x->mantissa()->bstr(); ok 2924 - $x = Math::BigFloat->new("123"); $x->length(); ok 2925 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2926 - $x = Math::BigFloat->new("0"); $x->length(); ok 2927 - $x = Math::BigFloat->new("1"); $x->length(); ok 2928 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2929 - $x = Math::BigFloat->new("invalid"); $x->is_zero(); ok 2930 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2931 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2932 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2933 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2934 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2935 - $x = Math::BigFloat->new("invalid"); $x->is_one(); ok 2936 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2937 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2938 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2939 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2940 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2941 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2942 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2943 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2944 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2945 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2946 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2947 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2948 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2949 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2950 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2951 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2952 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2953 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2954 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2955 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2956 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2957 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2958 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2959 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2960 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2961 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2962 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2963 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2964 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2965 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2966 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2967 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2968 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2969 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2970 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2971 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2972 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2973 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2974 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2975 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2976 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2977 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2978 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2979 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2980 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2981 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2982 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2983 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2984 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2985 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2986 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2987 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2988 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2989 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2990 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2991 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2992 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2993 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2994 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2995 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2996 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2997 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2998 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2999 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 3000 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 3001 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 3002 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 3003 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 3004 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 3005 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 3006 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 3007 - $x = Math::BigFloat->new("0"); $x = log($x); ok 3008 - $x = Math::BigFloat->new("0"); $x = log($x); ok 3009 - $x = Math::BigFloat->new("1"); $x = log($x); ok 3010 - $x = Math::BigFloat->new("1"); $x = log($x); ok 3011 - $x = Math::BigFloat->new("2"); $x = log($x); ok 3012 - $x = Math::BigFloat->new("2"); $x = log($x); ok 3013 - $x = Math::BigFloat->new("3"); $x = log($x); ok 3014 - $x = Math::BigFloat->new("3"); $x = log($x); ok 3015 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 3016 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 3017 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 3018 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 3019 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3020 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3021 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3022 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3023 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3024 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3025 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $y ok 3026 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $x ok 3027 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 3028 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 3029 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 3030 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 3031 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 3032 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 3033 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{accuracy} ok 3034 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{precision} ok 3035 - $x = Math::BigFloat->new(2); $x->binf(); $x->{accuracy} ok 3036 - $x = Math::BigFloat->new(2); $x->binf(); $x->{precision} ok 3037 - $x = Math::BigFloat->new(2); $x->bone(); $x->{accuracy} ok 3038 - $x = Math::BigFloat->new(2); $x->bone(); $x->{precision} ok 3039 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{accuracy} ok 3040 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{precision} ok 3041 - Math::BigFloat->bzero() ok 3042 - Math::BigFloat->bone() ok 3043 - Math::BigFloat->bone("+") ok 3044 - Math::BigFloat->bone("-") ok 3045 - Math::BigFloat->bnan() ok 3046 - Math::BigFloat->binf() ok 3047 - Math::BigFloat->binf("+") ok 3048 - Math::BigFloat->binf("-") ok 3049 - Math::BigFloat->binf("-inf") ok 3050 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 3051 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 3052 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 3053 - A and P set => NaN ok 3054 - supplied arg overrides set global ok 3055 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 3056 - Math::BigFloat->new(-1)->is_one() ok 3057 - Math::BigFloat->new(-1)->is_one("-") ok 3058 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 3059 - $x = Math::BigFloat->new(3); $x -= $x; ok 3060 - $x = Math::BigFloat->new(-3); $x -= $x; ok 3061 - $x = Math::BigFloat->new(3); $x += $x; ok 3062 - $x = Math::BigFloat->new(-3); $x += $x; ok 3063 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 3064 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 3065 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 3066 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 3067 - $x = Math::BigFloat->new("inf"); $x += $x; ok 3068 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 3069 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 3070 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 3071 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 3072 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 3073 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 3074 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 3075 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 3076 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 3077 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 3078 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 3079 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 3080 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 3081 - value of ((2**148)+1)/17 ok 3082 - number of digits in ((2**148)+1)/17 ok 3083 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 3084 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 3085 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 3086 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 3087 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y ok 3088 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y ok 3089 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y; $x ok t/bigfltrt.t .................. 1..899 ok 1 ok 2 - $x = Math::BigRat::Subclass->new("123"); $x->digit(2); ok 3 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(0); ok 4 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(1); ok 5 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(2); ok 6 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(3); ok 7 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-1); ok 8 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-2); ok 9 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-3); ok 10 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-4); ok 11 - $x = Math::BigRat::Subclass->new("0"); $x->digit(0); ok 12 - $x = Math::BigRat::Subclass->new("0"); $x->digit(1); ok 13 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x->bmodinv($y); ok 14 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 15 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $x->bmodinv($y); ok 16 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 17 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 18 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-5"); $x->bmodinv($y); ok 19 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 20 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("5033"); $x->bmodinv($y); ok 21 - $x = Math::BigRat::Subclass->new("1234567891"); $y = Math::BigRat::Subclass->new("13"); $x->bmodinv($y); ok 22 - $x = Math::BigRat::Subclass->new("-1234567891"); $y = Math::BigRat::Subclass->new("13"); $x->bmodinv($y); ok 23 - $x = Math::BigRat::Subclass->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigRat::Subclass->new("2348249874968739"); $x->bmodinv($y); ok 24 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 25 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("inf"); $x->bmodinv($y); ok 26 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 27 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("-inf"); $x->bmodinv($y); ok 28 - $x = Math::BigRat::Subclass->new("144/7"); $x->as_number(); ok 29 - $x = Math::BigRat::Subclass->new("12/1"); $x->as_number(); ok 30 - $x = Math::BigRat::Subclass->new("-12/1"); $x->as_number(); ok 31 - $x = Math::BigRat::Subclass->new("-12/3"); $x->as_number(); ok 32 - $x = Math::BigRat::Subclass->new("NaN"); $x->as_number(); ok 33 - $x = Math::BigRat::Subclass->new("+inf"); $x->as_number(); ok 34 - $x = Math::BigRat::Subclass->new("-inf"); $x->as_number(); ok 35 - $x = Math::BigRat::Subclass->new("144/7"); $x->as_int(); ok 36 - $x = Math::BigRat::Subclass->new("12/1"); $x->as_int(); ok 37 - $x = Math::BigRat::Subclass->new("-12/1"); $x->as_int(); ok 38 - $x = Math::BigRat::Subclass->new("-12/3"); $x->as_int(); ok 39 - $x = Math::BigRat::Subclass->new("NaN"); $x->as_int(); ok 40 - $x = Math::BigRat::Subclass->new("+inf"); $x->as_int(); ok 41 - $x = Math::BigRat::Subclass->new("-inf"); $x->as_int(); ok 42 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 43 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 44 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 45 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 46 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 47 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 48 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 49 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("2"); $x->bmodpow($y, $z); ok 50 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("2"); $x->bmodpow($y, $z); ok 51 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("1"); $x->bmodpow($y, $z); ok 52 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("7"); $z = Math::BigRat::Subclass->new("5032"); $x->bmodpow($y, $z); ok 53 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("-1"); $z = Math::BigRat::Subclass->new("5033"); $x->bmodpow($y, $z); ok 54 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("8"); $z = Math::BigRat::Subclass->new("-5"); $x->bmodpow($y, $z); ok 55 - $x = Math::BigRat::Subclass->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigRat::Subclass->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigRat::Subclass->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 56 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("-1"); $z = Math::BigRat::Subclass->new("16"); $x->bmodpow($y, $z); ok 57 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("13"); $x->bmodpow($y, $z); ok 58 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("inf"); $z = Math::BigRat::Subclass->new("13"); $x->bmodpow($y, $z); ok 59 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x % $y; ok 60 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x % $y; ok 61 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1"); $x % $y; ok 62 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("2"); $x % $y; ok 63 - $x = Math::BigRat::Subclass->new("12"); $y = Math::BigRat::Subclass->new("6"); $x % $y; ok 64 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/14"); $x % $y; ok 65 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/16"); $x % $y; ok 66 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/16"); $x % $y; ok 67 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/16"); $x % $y; ok 68 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/16"); $x % $y; ok 69 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/32"); $x % $y; ok 70 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/32"); $x % $y; ok 71 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/32"); $x % $y; ok 72 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/32"); $x % $y; ok 73 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/28"); $x % $y; ok 74 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/28"); $x % $y; ok 75 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/28"); $x % $y; ok 76 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/28"); $x % $y; ok 77 - $x = Math::BigRat::Subclass->new("1"); ; $x->bsqrt(); ok 78 - $x = Math::BigRat::Subclass->new("0"); ; $x->bsqrt(); ok 79 - $x = Math::BigRat::Subclass->new("NaN"); ; $x->bsqrt(); ok 80 - $x = Math::BigRat::Subclass->new("+inf"); ; $x->bsqrt(); ok 81 - $x = Math::BigRat::Subclass->new("-inf"); ; $x->bsqrt(); ok 82 - $x = Math::BigRat::Subclass->new("144"); ; $x->bsqrt(); ok 83 - $x = Math::BigRat::Subclass->new("144/4"); ; $x->bsqrt(); ok 84 - $x = Math::BigRat::Subclass->new("25/16"); ; $x->bsqrt(); ok 85 - $x = Math::BigRat::Subclass->new("-3"); ; $x->bsqrt(); ok 86 - $x = Math::BigRat::Subclass->new("4/9"); ; $x->bsqrt(); ok 87 - $x = Math::BigRat::Subclass->new("36/49"); ; $x->bsqrt(); ok 88 - $x = Math::BigRat::Subclass->new("49/121"); ; $x->bsqrt(); ok 89 - $x = Math::BigRat::Subclass->new("999966000289/99999820000081"); ; $x->bsqrt(); ok 90 - $x = Math::BigRat::Subclass->new("NaN"); ; $x->blog(); ok 91 - $x = Math::BigRat::Subclass->new("0"); ; $x->blog(); ok 92 - $x = Math::BigRat::Subclass->new("-2"); ; $x->blog(); ok 93 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 94 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 95 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("0"); $x->blog($y); ok 96 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x->blog($y); ok 97 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 98 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("2"); $x->blog($y); ok 99 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-2"); $x->blog($y); ok 100 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-2"); $x->blog($y); ok 101 - $x = Math::BigRat::Subclass->new("1"); $x->binf("+"); ok 102 - $x = Math::BigRat::Subclass->new("2"); $x->binf("-"); ok 103 - $x = Math::BigRat::Subclass->new("3"); $x->binf("abc"); ok 104 - $x = Math::BigRat::Subclass->new("0"); $x->numify(); ok 105 - $x = Math::BigRat::Subclass->new("+1"); $x->numify(); ok 106 - $x = Math::BigRat::Subclass->new("1234"); $x->numify(); ok 107 - $x = Math::BigRat::Subclass->new("3/4"); $x->numify(); ok 108 - $x = Math::BigRat::Subclass->new("5/2"); $x->numify(); ok 109 - $x = Math::BigRat::Subclass->new("3/2"); $x->numify(); ok 110 - $x = Math::BigRat::Subclass->new("5/4"); $x->numify(); ok 111 - $x = Math::BigRat::Subclass->new("abc"); $x->bnan(); ok 112 - $x = Math::BigRat::Subclass->new("2"); $x->bnan(); ok 113 - $x = Math::BigRat::Subclass->new("-2"); $x->bnan(); ok 114 - $x = Math::BigRat::Subclass->new("0"); $x->bnan(); ok 115 - $x = Math::BigRat::Subclass->new("2"); $x->bone("+"); ok 116 - $x = Math::BigRat::Subclass->new("-2"); $x->bone("-"); ok 117 - $x = Math::BigRat::Subclass->new("-2"); $x->bone("+"); ok 118 - $x = Math::BigRat::Subclass->new("2"); $x->bone("-"); ok 119 - $x = Math::BigRat::Subclass->new("0"); $x->bone(""); ok 120 - $x = Math::BigRat::Subclass->new("-2"); $x->bone(""); ok 121 - $x = Math::BigRat::Subclass->new("abc"); $x->bone(""); ok 122 - $x = Math::BigRat::Subclass->new("2"); $x->bone("abc"); ok 123 - $x = Math::BigRat::Subclass->new("+inf"); $x->bsstr(); ok 124 - $x = Math::BigRat::Subclass->new("-inf"); $x->bsstr(); ok 125 - $x = Math::BigRat::Subclass->new("abcfsstr"); $x->bsstr(); ok 126 - $x = Math::BigRat::Subclass->new("1"); $x->bsstr(); ok 127 - $x = Math::BigRat::Subclass->new("3/1"); $x->bsstr(); ok 128 - $x = Math::BigRat::Subclass->new("0.1"); $x->bsstr(); ok 129 - $x = Math::BigRat::Subclass->new("1"); $x; ok 130 - $x = Math::BigRat::Subclass->new("-0"); $x; ok 131 - $x = Math::BigRat::Subclass->new("bnormNaN"); $x; ok 132 - $x = Math::BigRat::Subclass->new("+inf"); $x; ok 133 - $x = Math::BigRat::Subclass->new("-inf"); $x; ok 134 - $x = Math::BigRat::Subclass->new("inf/inf"); $x; ok 135 - $x = Math::BigRat::Subclass->new("5/inf"); $x; ok 136 - $x = Math::BigRat::Subclass->new("5/-inf"); $x; ok 137 - $x = Math::BigRat::Subclass->new("inf/5"); $x; ok 138 - $x = Math::BigRat::Subclass->new("-inf/5"); $x; ok 139 - $x = Math::BigRat::Subclass->new("inf/-5"); $x; ok 140 - $x = Math::BigRat::Subclass->new("-inf/-5"); $x; ok 141 - $x = Math::BigRat::Subclass->new("123"); $x; ok 142 - $x = Math::BigRat::Subclass->new("-123.4567"); $x; ok 143 - $x = Math::BigRat::Subclass->new(".2E-3."); $x; ok 144 - $x = Math::BigRat::Subclass->new(".2E2"); $x; ok 145 - $x = Math::BigRat::Subclass->new("inf"); $x; ok 146 - $x = Math::BigRat::Subclass->new("+inf"); $x; ok 147 - $x = Math::BigRat::Subclass->new("-inf"); $x; ok 148 - $x = Math::BigRat::Subclass->new("+InFiNiTy"); $x; ok 149 - $x = Math::BigRat::Subclass->new("+-inf"); $x; ok 150 - $x = Math::BigRat::Subclass->new("abc"); $x; ok 151 - $x = Math::BigRat::Subclass->new(" 1 a"); $x; ok 152 - $x = Math::BigRat::Subclass->new("1bcd2"); $x; ok 153 - $x = Math::BigRat::Subclass->new("11111b"); $x; ok 154 - $x = Math::BigRat::Subclass->new("+1z"); $x; ok 155 - $x = Math::BigRat::Subclass->new("-1z"); $x; ok 156 - $x = Math::BigRat::Subclass->new("0"); $x; ok 157 - $x = Math::BigRat::Subclass->new("+0"); $x; ok 158 - $x = Math::BigRat::Subclass->new("+00"); $x; ok 159 - $x = Math::BigRat::Subclass->new("+0_0_0"); $x; ok 160 - $x = Math::BigRat::Subclass->new("000000_0000000_00000"); $x; ok 161 - $x = Math::BigRat::Subclass->new("-0"); $x; ok 162 - $x = Math::BigRat::Subclass->new("-0000"); $x; ok 163 - $x = Math::BigRat::Subclass->new("+1"); $x; ok 164 - $x = Math::BigRat::Subclass->new("+01"); $x; ok 165 - $x = Math::BigRat::Subclass->new("+001"); $x; ok 166 - $x = Math::BigRat::Subclass->new("+00000100000"); $x; ok 167 - $x = Math::BigRat::Subclass->new("+00000800/00000010"); $x; ok 168 - $x = Math::BigRat::Subclass->new("-00000800/00000010"); $x; ok 169 - $x = Math::BigRat::Subclass->new("+00000800/-00000010"); $x; ok 170 - $x = Math::BigRat::Subclass->new("-00000800/-00000010"); $x; ok 171 - $x = Math::BigRat::Subclass->new("123456789"); $x; ok 172 - $x = Math::BigRat::Subclass->new("-1"); $x; ok 173 - $x = Math::BigRat::Subclass->new("-01"); $x; ok 174 - $x = Math::BigRat::Subclass->new("-001"); $x; ok 175 - $x = Math::BigRat::Subclass->new("-123456789"); $x; ok 176 - $x = Math::BigRat::Subclass->new("-00000100000"); $x; ok 177 - $x = Math::BigRat::Subclass->new("123.456a"); $x; ok 178 - $x = Math::BigRat::Subclass->new("123.456"); $x; ok 179 - $x = Math::BigRat::Subclass->new("0.01"); $x; ok 180 - $x = Math::BigRat::Subclass->new(".002"); $x; ok 181 - $x = Math::BigRat::Subclass->new("+.2"); $x; ok 182 - $x = Math::BigRat::Subclass->new("-0.0003"); $x; ok 183 - $x = Math::BigRat::Subclass->new("-.0000000004"); $x; ok 184 - $x = Math::BigRat::Subclass->new("123456E2"); $x; ok 185 - $x = Math::BigRat::Subclass->new("123456E-2"); $x; ok 186 - $x = Math::BigRat::Subclass->new("-123456E2"); $x; ok 187 - $x = Math::BigRat::Subclass->new("-123456E-2"); $x; ok 188 - $x = Math::BigRat::Subclass->new("1e1"); $x; ok 189 - $x = Math::BigRat::Subclass->new("2e-11"); $x; ok 190 - $x = Math::BigRat::Subclass->new("12/10"); $x; ok 191 - $x = Math::BigRat::Subclass->new("0.1/0.1"); $x; ok 192 - $x = Math::BigRat::Subclass->new("100/0.1"); $x; ok 193 - $x = Math::BigRat::Subclass->new("0.1/10"); $x; ok 194 - $x = Math::BigRat::Subclass->new("1 / 3"); $x; ok 195 - $x = Math::BigRat::Subclass->new("1/ 3"); $x; ok 196 - $x = Math::BigRat::Subclass->new("1 /3"); $x; ok 197 - $x = Math::BigRat::Subclass->new("fnegNaN"); $x->bneg(); ok 198 - $x = Math::BigRat::Subclass->new("+inf"); $x->bneg(); ok 199 - $x = Math::BigRat::Subclass->new("-inf"); $x->bneg(); ok 200 - $x = Math::BigRat::Subclass->new("+0"); $x->bneg(); ok 201 - $x = Math::BigRat::Subclass->new("+1"); $x->bneg(); ok 202 - $x = Math::BigRat::Subclass->new("-1"); $x->bneg(); ok 203 - $x = Math::BigRat::Subclass->new("+123456789"); $x->bneg(); ok 204 - $x = Math::BigRat::Subclass->new("-123456789"); $x->bneg(); ok 205 - $x = Math::BigRat::Subclass->new("+123.456789"); $x->bneg(); ok 206 - $x = Math::BigRat::Subclass->new("-123456.789"); $x->bneg(); ok 207 - $x = Math::BigRat::Subclass->new("123/7"); $x->bneg(); ok 208 - $x = Math::BigRat::Subclass->new("-123/7"); $x->bneg(); ok 209 - $x = Math::BigRat::Subclass->new("123/-7"); $x->bneg(); ok 210 - $x = Math::BigRat::Subclass->new("fabsNaN"); $x->babs(); ok 211 - $x = Math::BigRat::Subclass->new("+inf"); $x->babs(); ok 212 - $x = Math::BigRat::Subclass->new("-inf"); $x->babs(); ok 213 - $x = Math::BigRat::Subclass->new("+0"); $x->babs(); ok 214 - $x = Math::BigRat::Subclass->new("+1"); $x->babs(); ok 215 - $x = Math::BigRat::Subclass->new("-1"); $x->babs(); ok 216 - $x = Math::BigRat::Subclass->new("+123456789"); $x->babs(); ok 217 - $x = Math::BigRat::Subclass->new("-123456789"); $x->babs(); ok 218 - $x = Math::BigRat::Subclass->new("+123.456789"); $x->babs(); ok 219 - $x = Math::BigRat::Subclass->new("-123456.789"); $x->babs(); ok 220 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x + $y; ok 221 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 222 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x + $y; ok 223 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x + $y; ok 224 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 225 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 226 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x + $y; ok 227 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 228 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 229 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x + $y; ok 230 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x + $y; ok 231 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 232 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 233 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 234 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 235 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 236 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 237 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 238 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 239 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 240 - $x = Math::BigRat::Subclass->new("+9"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 241 - $x = Math::BigRat::Subclass->new("+99"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 242 - $x = Math::BigRat::Subclass->new("+999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 243 - $x = Math::BigRat::Subclass->new("+9999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 244 - $x = Math::BigRat::Subclass->new("+99999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 245 - $x = Math::BigRat::Subclass->new("+999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 246 - $x = Math::BigRat::Subclass->new("+9999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 247 - $x = Math::BigRat::Subclass->new("+99999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 248 - $x = Math::BigRat::Subclass->new("+999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 249 - $x = Math::BigRat::Subclass->new("+9999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 250 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 251 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 252 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 253 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 254 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 255 - $x = Math::BigRat::Subclass->new("+100000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 256 - $x = Math::BigRat::Subclass->new("+1000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 257 - $x = Math::BigRat::Subclass->new("+10000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 258 - $x = Math::BigRat::Subclass->new("+100000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 259 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 260 - $x = Math::BigRat::Subclass->new("+10000000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 261 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x + $y; ok 262 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x + $y; ok 263 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x + $y; ok 264 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x + $y; ok 265 - $x = Math::BigRat::Subclass->new("1/3"); $y = Math::BigRat::Subclass->new("1/3"); $x + $y; ok 266 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("-1/3"); $x + $y; ok 267 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x - $y; ok 268 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 269 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x - $y; ok 270 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x - $y; ok 271 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 272 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 273 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x - $y; ok 274 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 275 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 276 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x - $y; ok 277 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x - $y; ok 278 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 279 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 280 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 281 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 282 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 283 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 284 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 285 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 286 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 287 - $x = Math::BigRat::Subclass->new("+9"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 288 - $x = Math::BigRat::Subclass->new("+99"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 289 - $x = Math::BigRat::Subclass->new("+999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 290 - $x = Math::BigRat::Subclass->new("+9999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 291 - $x = Math::BigRat::Subclass->new("+99999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 292 - $x = Math::BigRat::Subclass->new("+999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 293 - $x = Math::BigRat::Subclass->new("+9999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 294 - $x = Math::BigRat::Subclass->new("+99999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 295 - $x = Math::BigRat::Subclass->new("+999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 296 - $x = Math::BigRat::Subclass->new("+9999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 297 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 298 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 299 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 300 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 301 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 302 - $x = Math::BigRat::Subclass->new("+100000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 303 - $x = Math::BigRat::Subclass->new("+1000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 304 - $x = Math::BigRat::Subclass->new("+10000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 305 - $x = Math::BigRat::Subclass->new("+100000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 306 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 307 - $x = Math::BigRat::Subclass->new("+10000000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 308 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x - $y; ok 309 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x - $y; ok 310 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x - $y; ok 311 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x - $y; ok 312 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("1/3"); $x - $y; ok 313 - $x = Math::BigRat::Subclass->new("7/27"); $y = Math::BigRat::Subclass->new("3/54"); $x - $y; ok 314 - $x = Math::BigRat::Subclass->new("-2/3"); $y = Math::BigRat::Subclass->new("+2/3"); $x - $y; ok 315 - $x = Math::BigRat::Subclass->new("-2/3"); $y = Math::BigRat::Subclass->new("-2/3"); $x - $y; ok 316 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-123"); $x - $y; ok 317 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("123"); $x - $y; ok 318 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x * $y; ok 319 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 320 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x * $y; ok 321 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaNmul"); $x * $y; ok 322 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaNmul"); $x * $y; ok 323 - $x = Math::BigRat::Subclass->new("NaNmul"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 324 - $x = Math::BigRat::Subclass->new("NaNmul"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 325 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 326 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 327 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 328 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 329 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("123.34"); $x * $y; ok 330 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-123.34"); $x * $y; ok 331 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("123.34"); $x * $y; ok 332 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-123.34"); $x * $y; ok 333 - $x = Math::BigRat::Subclass->new("123.34"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 334 - $x = Math::BigRat::Subclass->new("-123.34"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 335 - $x = Math::BigRat::Subclass->new("123.34"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 336 - $x = Math::BigRat::Subclass->new("-123.34"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 337 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 338 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 339 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 340 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 341 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 342 - $x = Math::BigRat::Subclass->new("+123456789123456789"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 343 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+123456789123456789"); $x * $y; ok 344 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 345 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 346 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 347 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 348 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("+3"); $x * $y; ok 349 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("+3"); $x * $y; ok 350 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("-3"); $x * $y; ok 351 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3"); $x * $y; ok 352 - $x = Math::BigRat::Subclass->new("+111"); $y = Math::BigRat::Subclass->new("+111"); $x * $y; ok 353 - $x = Math::BigRat::Subclass->new("+10101"); $y = Math::BigRat::Subclass->new("+10101"); $x * $y; ok 354 - $x = Math::BigRat::Subclass->new("+1001001"); $y = Math::BigRat::Subclass->new("+1001001"); $x * $y; ok 355 - $x = Math::BigRat::Subclass->new("+100010001"); $y = Math::BigRat::Subclass->new("+100010001"); $x * $y; ok 356 - $x = Math::BigRat::Subclass->new("+10000100001"); $y = Math::BigRat::Subclass->new("+10000100001"); $x * $y; ok 357 - $x = Math::BigRat::Subclass->new("+11111111111"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 358 - $x = Math::BigRat::Subclass->new("+22222222222"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 359 - $x = Math::BigRat::Subclass->new("+33333333333"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 360 - $x = Math::BigRat::Subclass->new("+44444444444"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 361 - $x = Math::BigRat::Subclass->new("+55555555555"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 362 - $x = Math::BigRat::Subclass->new("+66666666666"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 363 - $x = Math::BigRat::Subclass->new("+77777777777"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 364 - $x = Math::BigRat::Subclass->new("+88888888888"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 365 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 366 - $x = Math::BigRat::Subclass->new("6"); $y = Math::BigRat::Subclass->new("120"); $x * $y; ok 367 - $x = Math::BigRat::Subclass->new("10"); $y = Math::BigRat::Subclass->new("10000"); $x * $y; ok 368 - $x = Math::BigRat::Subclass->new("1/4"); $y = Math::BigRat::Subclass->new("1/3"); $x * $y; ok 369 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 370 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1"); ; join(",", $x->bdiv($y)); ok 371 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 372 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 373 - $x = Math::BigRat::Subclass->new("9"); $y = Math::BigRat::Subclass->new("4"); ; join(",", $x->bdiv($y)); ok 374 - $x = Math::BigRat::Subclass->new("-9"); $y = Math::BigRat::Subclass->new("4"); ; join(",", $x->bdiv($y)); ok 375 - $x = Math::BigRat::Subclass->new("9"); $y = Math::BigRat::Subclass->new("-4"); ; join(",", $x->bdiv($y)); ok 376 - $x = Math::BigRat::Subclass->new("-9"); $y = Math::BigRat::Subclass->new("-4"); ; join(",", $x->bdiv($y)); ok 377 - $x = Math::BigRat::Subclass->new("11/7"); $y = Math::BigRat::Subclass->new("2/3"); ; join(",", $x->bdiv($y)); ok 378 - $x = Math::BigRat::Subclass->new("-11/7"); $y = Math::BigRat::Subclass->new("2/3"); ; join(",", $x->bdiv($y)); ok 379 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 380 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 381 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 382 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 383 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 384 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 385 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 386 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 387 - $x = Math::BigRat::Subclass->new("+3214"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 388 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 389 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 390 - $x = Math::BigRat::Subclass->new("-3214"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 391 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 392 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 393 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 394 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 395 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+2"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 396 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 397 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("+inf"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 398 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("-inf"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 399 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("+5"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 400 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("+4"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 401 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("+8"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 402 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("+16"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 403 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-16"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 404 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 405 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+99"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 406 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 407 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+9999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 408 - $x = Math::BigRat::Subclass->new("+999999999999999"); $y = Math::BigRat::Subclass->new("+99999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 409 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 410 - $x = Math::BigRat::Subclass->new("+2000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 411 - $x = Math::BigRat::Subclass->new("+3000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 412 - $x = Math::BigRat::Subclass->new("+4000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 413 - $x = Math::BigRat::Subclass->new("+5000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 414 - $x = Math::BigRat::Subclass->new("+6000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 415 - $x = Math::BigRat::Subclass->new("+7000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 416 - $x = Math::BigRat::Subclass->new("+8000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 417 - $x = Math::BigRat::Subclass->new("+9000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 418 - $x = Math::BigRat::Subclass->new("+35500000"); $y = Math::BigRat::Subclass->new("+113"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 419 - $x = Math::BigRat::Subclass->new("+71000000"); $y = Math::BigRat::Subclass->new("+226"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 420 - $x = Math::BigRat::Subclass->new("+106500000"); $y = Math::BigRat::Subclass->new("+339"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 421 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("+3"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 422 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 423 - $x = Math::BigRat::Subclass->new("123456"); $y = Math::BigRat::Subclass->new("1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 424 - $x = Math::BigRat::Subclass->new("1/4"); $y = Math::BigRat::Subclass->new("1/3"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 425 - $x = Math::BigRat::Subclass->new("123"); $x->is_nan(); ok 426 - $x = Math::BigRat::Subclass->new("abc"); $x->is_nan(); ok 427 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_nan(); ok 428 - $x = Math::BigRat::Subclass->new("-123"); $x->is_nan(); ok 429 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf(); ok 430 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf(); ok 431 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf(); ok 432 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf(); ok 433 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf(); ok 434 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf(); ok 435 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf(); ok 436 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf("+"); ok 437 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf("+"); ok 438 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf("+"); ok 439 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf("+"); ok 440 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf("+"); ok 441 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf("+"); ok 442 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf("+"); ok 443 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf("-"); ok 444 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf("-"); ok 445 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf("-"); ok 446 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf("-"); ok 447 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf("-"); ok 448 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf("-"); ok 449 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf("-"); ok 450 - $x = Math::BigRat::Subclass->new("+infinity"); $x->is_inf(); ok 451 - $x = Math::BigRat::Subclass->new("-infinity"); $x->is_inf(); ok 452 - $x = Math::BigRat::Subclass->new("abc"); $x->is_odd(); ok 453 - $x = Math::BigRat::Subclass->new("0"); $x->is_odd(); ok 454 - $x = Math::BigRat::Subclass->new("-1"); $x->is_odd(); ok 455 - $x = Math::BigRat::Subclass->new("-3"); $x->is_odd(); ok 456 - $x = Math::BigRat::Subclass->new("1"); $x->is_odd(); ok 457 - $x = Math::BigRat::Subclass->new("3"); $x->is_odd(); ok 458 - $x = Math::BigRat::Subclass->new("1000001"); $x->is_odd(); ok 459 - $x = Math::BigRat::Subclass->new("1000002"); $x->is_odd(); ok 460 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_odd(); ok 461 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_odd(); ok 462 - $x = Math::BigRat::Subclass->new("123.45"); $x->is_odd(); ok 463 - $x = Math::BigRat::Subclass->new("-123.45"); $x->is_odd(); ok 464 - $x = Math::BigRat::Subclass->new("2"); $x->is_odd(); ok 465 - $x = Math::BigRat::Subclass->new("NaNis_int"); $x->is_int(); ok 466 - $x = Math::BigRat::Subclass->new("0"); $x->is_int(); ok 467 - $x = Math::BigRat::Subclass->new("1"); $x->is_int(); ok 468 - $x = Math::BigRat::Subclass->new("2"); $x->is_int(); ok 469 - $x = Math::BigRat::Subclass->new("-2"); $x->is_int(); ok 470 - $x = Math::BigRat::Subclass->new("-1"); $x->is_int(); ok 471 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_int(); ok 472 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_int(); ok 473 - $x = Math::BigRat::Subclass->new("123.4567"); $x->is_int(); ok 474 - $x = Math::BigRat::Subclass->new("-0.1"); $x->is_int(); ok 475 - $x = Math::BigRat::Subclass->new("-0.002"); $x->is_int(); ok 476 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_int(); ok 477 - $x = Math::BigRat::Subclass->new("3/1"); $x->is_int(); ok 478 - $x = Math::BigRat::Subclass->new("abc"); $x->is_even(); ok 479 - $x = Math::BigRat::Subclass->new("0"); $x->is_even(); ok 480 - $x = Math::BigRat::Subclass->new("-1"); $x->is_even(); ok 481 - $x = Math::BigRat::Subclass->new("-3"); $x->is_even(); ok 482 - $x = Math::BigRat::Subclass->new("1"); $x->is_even(); ok 483 - $x = Math::BigRat::Subclass->new("3"); $x->is_even(); ok 484 - $x = Math::BigRat::Subclass->new("1000001"); $x->is_even(); ok 485 - $x = Math::BigRat::Subclass->new("1000002"); $x->is_even(); ok 486 - $x = Math::BigRat::Subclass->new("2"); $x->is_even(); ok 487 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_even(); ok 488 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_even(); ok 489 - $x = Math::BigRat::Subclass->new("123.456"); $x->is_even(); ok 490 - $x = Math::BigRat::Subclass->new("-123.456"); $x->is_even(); ok 491 - $x = Math::BigRat::Subclass->new("0.01"); $x->is_even(); ok 492 - $x = Math::BigRat::Subclass->new("-0.01"); $x->is_even(); ok 493 - $x = Math::BigRat::Subclass->new("120"); $x->is_even(); ok 494 - $x = Math::BigRat::Subclass->new("1200"); $x->is_even(); ok 495 - $x = Math::BigRat::Subclass->new("-1200"); $x->is_even(); ok 496 - $x = Math::BigRat::Subclass->new("0"); $x->is_pos(); ok 497 - $x = Math::BigRat::Subclass->new("1"); $x->is_pos(); ok 498 - $x = Math::BigRat::Subclass->new("-1"); $x->is_pos(); ok 499 - $x = Math::BigRat::Subclass->new("-123"); $x->is_pos(); ok 500 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_pos(); ok 501 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_pos(); ok 502 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_pos(); ok 503 - $x = Math::BigRat::Subclass->new("0"); $x->is_positive(); ok 504 - $x = Math::BigRat::Subclass->new("1"); $x->is_positive(); ok 505 - $x = Math::BigRat::Subclass->new("-1"); $x->is_positive(); ok 506 - $x = Math::BigRat::Subclass->new("-123"); $x->is_positive(); ok 507 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_positive(); ok 508 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_positive(); ok 509 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_positive(); ok 510 - $x = Math::BigRat::Subclass->new("0"); $x->is_neg(); ok 511 - $x = Math::BigRat::Subclass->new("1"); $x->is_neg(); ok 512 - $x = Math::BigRat::Subclass->new("-1"); $x->is_neg(); ok 513 - $x = Math::BigRat::Subclass->new("-123"); $x->is_neg(); ok 514 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_neg(); ok 515 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_neg(); ok 516 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_neg(); ok 517 - $x = Math::BigRat::Subclass->new("0"); $x->is_negative(); ok 518 - $x = Math::BigRat::Subclass->new("1"); $x->is_negative(); ok 519 - $x = Math::BigRat::Subclass->new("-1"); $x->is_negative(); ok 520 - $x = Math::BigRat::Subclass->new("-123"); $x->is_negative(); ok 521 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_negative(); ok 522 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_negative(); ok 523 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_negative(); ok 524 - $x = Math::BigRat::Subclass->new("0"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 525 - $x = Math::BigRat::Subclass->new("1"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 526 - $x = Math::BigRat::Subclass->new("123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 527 - $x = Math::BigRat::Subclass->new("-123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 528 - $x = Math::BigRat::Subclass->new("-1200"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 529 - $x = Math::BigRat::Subclass->new("5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 530 - $x = Math::BigRat::Subclass->new("-5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 531 - $x = Math::BigRat::Subclass->new("NaNparts"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 532 - $x = Math::BigRat::Subclass->new("+inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 533 - $x = Math::BigRat::Subclass->new("-inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 534 - $x = Math::BigRat::Subclass->new("123"); $x->length(); ok 535 - $x = Math::BigRat::Subclass->new("-123"); $x->length(); ok 536 - $x = Math::BigRat::Subclass->new("0"); $x->length(); ok 537 - $x = Math::BigRat::Subclass->new("1"); $x->length(); ok 538 - $x = Math::BigRat::Subclass->new("12345678901234567890"); $x->length(); ok 539 - $x = Math::BigRat::Subclass->new("NaNzero"); $x->is_zero(); ok 540 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_zero(); ok 541 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_zero(); ok 542 - $x = Math::BigRat::Subclass->new("0"); $x->is_zero(); ok 543 - $x = Math::BigRat::Subclass->new("-1"); $x->is_zero(); ok 544 - $x = Math::BigRat::Subclass->new("1"); $x->is_zero(); ok 545 - $x = Math::BigRat::Subclass->new("0/3"); $x->is_zero(); ok 546 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_zero(); ok 547 - $x = Math::BigRat::Subclass->new("-0/3"); $x->is_zero(); ok 548 - $x = Math::BigRat::Subclass->new("5/inf"); $x->is_zero(); ok 549 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one(); ok 550 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one(); ok 551 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one(); ok 552 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one(); ok 553 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one(); ok 554 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one(); ok 555 - $x = Math::BigRat::Subclass->new("0"); $x->is_one(); ok 556 - $x = Math::BigRat::Subclass->new("1"); $x->is_one(); ok 557 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one(); ok 558 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one("+"); ok 559 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one("+"); ok 560 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one("+"); ok 561 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one("+"); ok 562 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("+"); ok 563 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one("+"); ok 564 - $x = Math::BigRat::Subclass->new("0"); $x->is_one("+"); ok 565 - $x = Math::BigRat::Subclass->new("1"); $x->is_one("+"); ok 566 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("+"); ok 567 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one("-"); ok 568 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one("-"); ok 569 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one("-"); ok 570 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one("-"); ok 571 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("-"); ok 572 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one("-"); ok 573 - $x = Math::BigRat::Subclass->new("0"); $x->is_one("-"); ok 574 - $x = Math::BigRat::Subclass->new("1"); $x->is_one("-"); ok 575 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("-"); ok 576 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_one(); ok 577 - $x = Math::BigRat::Subclass->new("100/100"); $x->is_one(); ok 578 - $x = Math::BigRat::Subclass->new("0.1/0.1"); $x->is_one(); ok 579 - $x = Math::BigRat::Subclass->new("5/inf"); $x->is_one(); ok 580 - $x = Math::BigRat::Subclass->new("0"); $x->bfloor(); ok 581 - $x = Math::BigRat::Subclass->new("abc"); $x->bfloor(); ok 582 - $x = Math::BigRat::Subclass->new("+inf"); $x->bfloor(); ok 583 - $x = Math::BigRat::Subclass->new("-inf"); $x->bfloor(); ok 584 - $x = Math::BigRat::Subclass->new("1"); $x->bfloor(); ok 585 - $x = Math::BigRat::Subclass->new("-51"); $x->bfloor(); ok 586 - $x = Math::BigRat::Subclass->new("-51.2"); $x->bfloor(); ok 587 - $x = Math::BigRat::Subclass->new("12.2"); $x->bfloor(); ok 588 - $x = Math::BigRat::Subclass->new("3/7"); $x->bfloor(); ok 589 - $x = Math::BigRat::Subclass->new("6/7"); $x->bfloor(); ok 590 - $x = Math::BigRat::Subclass->new("7/7"); $x->bfloor(); ok 591 - $x = Math::BigRat::Subclass->new("8/7"); $x->bfloor(); ok 592 - $x = Math::BigRat::Subclass->new("13/7"); $x->bfloor(); ok 593 - $x = Math::BigRat::Subclass->new("14/7"); $x->bfloor(); ok 594 - $x = Math::BigRat::Subclass->new("15/7"); $x->bfloor(); ok 595 - $x = Math::BigRat::Subclass->new("-3/7"); $x->bfloor(); ok 596 - $x = Math::BigRat::Subclass->new("-6/7"); $x->bfloor(); ok 597 - $x = Math::BigRat::Subclass->new("-7/1"); $x->bfloor(); ok 598 - $x = Math::BigRat::Subclass->new("-8/7"); $x->bfloor(); ok 599 - $x = Math::BigRat::Subclass->new("-13/7"); $x->bfloor(); ok 600 - $x = Math::BigRat::Subclass->new("-14/7"); $x->bfloor(); ok 601 - $x = Math::BigRat::Subclass->new("-15/7"); $x->bfloor(); ok 602 - $x = Math::BigRat::Subclass->new("0"); $x->bceil(); ok 603 - $x = Math::BigRat::Subclass->new("abc"); $x->bceil(); ok 604 - $x = Math::BigRat::Subclass->new("+inf"); $x->bceil(); ok 605 - $x = Math::BigRat::Subclass->new("-inf"); $x->bceil(); ok 606 - $x = Math::BigRat::Subclass->new("1"); $x->bceil(); ok 607 - $x = Math::BigRat::Subclass->new("-51"); $x->bceil(); ok 608 - $x = Math::BigRat::Subclass->new("-51.2"); $x->bceil(); ok 609 - $x = Math::BigRat::Subclass->new("12.2"); $x->bceil(); ok 610 - $x = Math::BigRat::Subclass->new("3/7"); $x->bceil(); ok 611 - $x = Math::BigRat::Subclass->new("6/7"); $x->bceil(); ok 612 - $x = Math::BigRat::Subclass->new("8/7"); $x->bceil(); ok 613 - $x = Math::BigRat::Subclass->new("13/7"); $x->bceil(); ok 614 - $x = Math::BigRat::Subclass->new("14/7"); $x->bceil(); ok 615 - $x = Math::BigRat::Subclass->new("15/7"); $x->bceil(); ok 616 - $x = Math::BigRat::Subclass->new("-3/7"); $x->bceil(); ok 617 - $x = Math::BigRat::Subclass->new("-6/7"); $x->bceil(); ok 618 - $x = Math::BigRat::Subclass->new("-8/7"); $x->bceil(); ok 619 - $x = Math::BigRat::Subclass->new("-13/7"); $x->bceil(); ok 620 - $x = Math::BigRat::Subclass->new("-14/7"); $x->bceil(); ok 621 - $x = Math::BigRat::Subclass->new("-15/7"); $x->bceil(); ok 622 - $x = Math::BigRat::Subclass->new("NaN"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 623 - $x = Math::BigRat::Subclass->new("1"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 624 - $x = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 625 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("123"); $x->bpow($y); ok 626 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("abc"); $x->bpow($y); ok 627 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 628 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 629 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 630 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 631 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 632 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 633 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 634 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 635 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 636 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 637 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 638 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 639 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 640 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 641 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 642 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 643 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 644 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 645 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 646 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 647 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 648 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 649 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 650 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 651 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 652 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 653 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 654 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 655 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 656 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 657 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 658 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 659 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 660 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 661 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 662 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 663 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 664 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 665 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 666 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 667 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 668 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 669 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 670 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 671 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 672 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 673 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 674 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 675 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 676 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 677 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 678 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 679 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 680 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 681 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 682 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 683 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 684 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 685 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 686 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 687 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 688 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 689 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 690 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 691 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 692 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 693 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 694 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 695 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 696 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 697 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 698 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 699 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 700 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 701 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 702 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 703 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 704 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 705 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 706 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 707 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 708 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 709 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 710 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 711 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 712 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 713 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 714 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 715 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 716 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 717 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 718 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 719 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 720 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 721 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 722 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 723 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 724 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 725 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 726 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 727 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 728 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 729 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 730 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 731 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 732 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 733 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 734 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 735 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 736 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 737 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 738 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 739 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 740 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 741 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 742 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 743 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 744 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 745 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 746 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 747 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 748 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 749 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 750 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 751 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 752 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 753 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 754 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 755 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 756 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 757 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 758 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 759 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 760 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 761 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 763 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 764 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 765 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 766 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 767 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 768 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 769 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 770 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 771 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 772 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 773 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 774 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 775 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 776 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 777 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 778 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 779 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 780 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 781 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 782 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 783 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 784 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 785 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 786 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 787 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 788 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 789 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 790 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 791 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 792 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 793 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 794 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 795 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 796 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 797 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 798 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 799 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 800 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 801 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 802 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 803 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 804 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 805 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 806 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 807 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-0"); $x->bacmp($y); ok 808 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x->bacmp($y); ok 809 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x->bacmp($y); ok 810 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x->bacmp($y); ok 811 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+2"); $x->bacmp($y); ok 812 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("-1"); $x->bacmp($y); ok 813 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x->bacmp($y); ok 814 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x->bacmp($y); ok 815 - $x = Math::BigRat::Subclass->new("+987654321"); $y = Math::BigRat::Subclass->new("+123456789"); $x->bacmp($y); ok 816 - $x = Math::BigRat::Subclass->new("-987654321"); $y = Math::BigRat::Subclass->new("+123456789"); $x->bacmp($y); ok 817 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("+4567889"); $x->bacmp($y); ok 818 - $x = Math::BigRat::Subclass->new("acmpNaN"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 819 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("acmpNaN"); $x->bacmp($y); ok 820 - $x = Math::BigRat::Subclass->new("acmpNaN"); $y = Math::BigRat::Subclass->new("acmpNaN"); $x->bacmp($y); ok 821 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x->bacmp($y); ok 822 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 823 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 824 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x->bacmp($y); ok 825 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 826 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 827 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-123"); $x->bacmp($y); ok 828 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-123"); $x->bacmp($y); ok 829 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("1/23"); $x->bacmp($y); ok 830 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1/23"); $x->bacmp($y); ok 831 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-1/23"); $x->bacmp($y); ok 832 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1/23"); $x->bacmp($y); ok 833 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("12/3"); $x->bacmp($y); ok 834 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("12/3"); $x->bacmp($y); ok 835 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-12/3"); $x->bacmp($y); ok 836 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-12/3"); $x->bacmp($y); ok 837 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 838 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 839 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 840 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 841 - $x = Math::BigRat::Subclass->new("1/23"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 842 - $x = Math::BigRat::Subclass->new("-1/23"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 843 - $x = Math::BigRat::Subclass->new("1/23"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 844 - $x = Math::BigRat::Subclass->new("-1/23"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 845 - $x = Math::BigRat::Subclass->new("12/3"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 846 - $x = Math::BigRat::Subclass->new("-12/3"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 847 - $x = Math::BigRat::Subclass->new("12/3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 848 - $x = Math::BigRat::Subclass->new("-12/3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 849 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bacmp($y); ok 850 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 851 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bacmp($y); ok 852 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 853 - $x = Math::BigRat::Subclass->new("1/3"); $y = Math::BigRat::Subclass->new("2/3"); $x->bacmp($y); ok 854 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("1/3"); $x->bacmp($y); ok 855 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("2/3"); $x->bacmp($y); ok 856 - $x = Math::BigRat::Subclass->new("NaN"); $x->numerator()->bstr(); ok 857 - $x = Math::BigRat::Subclass->new("inf"); $x->numerator()->bstr(); ok 858 - $x = Math::BigRat::Subclass->new("-inf"); $x->numerator()->bstr(); ok 859 - $x = Math::BigRat::Subclass->new("3/7"); $x->numerator()->bstr(); ok 860 - $x = Math::BigRat::Subclass->new("-3/7"); $x->numerator()->bstr(); ok 861 - $x = Math::BigRat::Subclass->new("0"); $x->numerator()->bstr(); ok 862 - $x = Math::BigRat::Subclass->new("1"); $x->numerator()->bstr(); ok 863 - $x = Math::BigRat::Subclass->new("5/-3"); $x->numerator()->bstr(); ok 864 - $x = Math::BigRat::Subclass->new("NaN"); $x->denominator()->bstr(); ok 865 - $x = Math::BigRat::Subclass->new("inf"); $x->denominator()->bstr(); ok 866 - $x = Math::BigRat::Subclass->new("-inf"); $x->denominator()->bstr(); ok 867 - $x = Math::BigRat::Subclass->new("3/7"); $x->denominator()->bstr(); ok 868 - $x = Math::BigRat::Subclass->new("0"); $x->denominator()->bstr(); ok 869 - $x = Math::BigRat::Subclass->new("1/1"); $x->denominator()->bstr(); ok 870 - $x = Math::BigRat::Subclass->new("-1/1"); $x->denominator()->bstr(); ok 871 - $x = Math::BigRat::Subclass->new("-3/7"); $x->denominator()->bstr(); ok 872 - $x = Math::BigRat::Subclass->new("4/-5"); $x->denominator()->bstr(); ok 873 - $x = Math::BigRat::Subclass->new("3/2"); ++$x; ok 874 - $x = Math::BigRat::Subclass->new("-15/6"); ++$x; ok 875 - $x = Math::BigRat::Subclass->new("NaN"); ++$x; ok 876 - $x = Math::BigRat::Subclass->new("-1/3"); ++$x; ok 877 - $x = Math::BigRat::Subclass->new("-2/7"); ++$x; ok 878 - $x = Math::BigRat::Subclass->new("15/6"); --$x; ok 879 - $x = Math::BigRat::Subclass->new("-3/2"); --$x; ok 880 - $x = Math::BigRat::Subclass->new("1/3"); --$x; ok 881 - $x = Math::BigRat::Subclass->new("2/7"); --$x; ok 882 - $x = Math::BigRat::Subclass->new("NaN"); --$x; ok 883 - $x = Math::BigRat::Subclass->new("-1"); $x = log($x); ok 884 - $x = Math::BigRat::Subclass->new("0"); $x = log($x); ok 885 - $x = Math::BigRat::Subclass->new("1"); $x = log($x); ok 886 - $x = Math::BigRat::Subclass->new("34803"); $x = log($x); ok 887 - $x = Math::BigRat::Subclass->new("-inf"); $x = log($x); ok 888 - $x = Math::BigRat::Subclass->new("inf"); $x = log($x); ok 889 - $x = Math::BigRat::Subclass->new("NaN"); $x = log($x); ok 890 - $x = Math::BigInt->new(1200); $y = Math::BigRat::Subclass->new($x); 1200 ok 891 - $x = Math::BigInt->new(1200); $y = Math::BigRat::Subclass->new($x); 1200 ok 892 - $x = Math::BigRat::Subclass->new(2); $x->bzero(); $x->{accuracy} ok 893 - $x = Math::BigRat::Subclass->new(2); $x->bzero(); $x->{precision} ok 894 - $x = Math::BigRat::Subclass->new(2); $x->binf(); $x->{accuracy} ok 895 - $x = Math::BigRat::Subclass->new(2); $x->binf(); $x->{precision} ok 896 - $x = Math::BigRat::Subclass->new(2); $x->bone(); $x->{accuracy} ok 897 - $x = Math::BigRat::Subclass->new(2); $x->bone(); $x->{precision} ok 898 - $x = Math::BigRat::Subclass->new(2); $x->bnan(); $x->{accuracy} ok 899 - $x = Math::BigRat::Subclass->new(2); $x->bnan(); $x->{precision} ok t/bigintc-import.t ............ 1..4 # # BASE_LEN = 1 # BASE = 10 # MAX_VAL = 9 # AND_BITS = 3 # XOR_BITS = 3 # OR_BITS = 3 # MAX_EXP_F = 9 # MAX_EXP_I = 9 # USE_INT = 0 ok 1 - $BASE_LEN is 1 ok 2 - $USE_INT is 0 ok 3 - string representation of Math::BigInt::Calc object ok 4 - internal representation of Math::BigInt::Calc object ok t/bigintc.t ................... 1..524 # # BASE_LEN = 9 # BASE = 1000000000 # MAX_VAL = 999999999 # AND_BITS = 29 # XOR_BITS = 29 # OR_BITS = 29 # MAX_EXP_F = 9 # MAX_EXP_I = 9 # USE_INT = 1 ok 1 - ref($x) is a $REF ok 2 - Math::BigInt::Calc->_str($x) = 123 ok 3 - Math::BigInt::Calc->_str($y) = 321 ok 4 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_add($x, $y)) = 444 ok 5 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sub($x, $y)) = 123 ok 6 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_mul($x, $y)) = 39483 ok 7 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_div($x, $y)) = 123 ok 8 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_mul($x, $y)) = 39483 ok 9 - Math::BigInt::Calc->_str($x) = 39483 ok 10 - Math::BigInt::Calc->_str($y) = 321 ok 11 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_div($x, $y)) = 123 ok 12 - Math::BigInt::Calc->_str($x) = 123 ok 13 - Math::BigInt::Calc->_str($y) = 321 ok 14 - "$x1" = "$x" ok 15 - "$x1" = "$x" ok 16 - Math::BigInt::Calc->_str($r1) = "0" ok 17 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_add($x, $z)) = 39485 ok 18 - Math::BigInt::Calc->_str($re) = 123 ok 19 - Math::BigInt::Calc->_str($rr) = 2 ok 20 - Math::BigInt::Calc->_is_zero($x) ok 21 - Math::BigInt::Calc->_is_one($x) ok 22 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_zero()) = "0" ok 23 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_one()) = "1" ok 24 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_two()) = "2" ok 25 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_ten()) = "10" ok 26 - Math::BigInt::Calc->_is_ten(Math::BigInt::Calc->_two()) is false ok 27 - Math::BigInt::Calc->_is_two(Math::BigInt::Calc->_two()) is true ok 28 - Math::BigInt::Calc->_is_ten(Math::BigInt::Calc->_ten()) is true ok 29 - Math::BigInt::Calc->_is_two(Math::BigInt::Calc->_ten()) is false ok 30 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_one()) is true ok 31 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_two()) is false ok 32 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_ten()) is false ok 33 - Math::BigInt::Calc->_is_one(Math::BigInt::Calc->_zero()) is false ok 34 - Math::BigInt::Calc->_is_zero(Math::BigInt::Calc->_zero()) is true ok 35 - Math::BigInt::Calc->_is_zero(Math::BigInt::Calc->_one()) is false ok 36 - Math::BigInt::Calc->_is_odd(Math::BigInt::Calc->_one()) is true ok 37 - Math::BigInt::Calc->_is_odd(Math::BigInt::Calc->_zero()) is false ok 38 - Math::BigInt::Calc->_is_even(Math::BigInt::Calc->_one()) is false ok 39 - Math::BigInt::Calc->_is_even(Math::BigInt::Calc->_zero()) is true ok 40 - Math::BigInt::Calc->_alen($x) = 1 ok 41 - Math::BigInt::Calc->_alen($x) = 2 ok 42 - Math::BigInt::Calc->_alen($x) = 3 ok 43 - Math::BigInt::Calc->_alen($x) = 4 ok 44 - Math::BigInt::Calc->_alen($x) = 5 ok 45 - Math::BigInt::Calc->_alen($x) = 6 ok 46 - Math::BigInt::Calc->_alen($x) = 7 ok 47 - Math::BigInt::Calc->_alen($x) = 8 ok 48 - Math::BigInt::Calc->_alen($x) = 9 ok 49 - Math::BigInt::Calc->_alen($x) = 1 ok 50 - Math::BigInt::Calc->_alen($x) = 2 ok 51 - Math::BigInt::Calc->_alen($x) = 3 ok 52 - Math::BigInt::Calc->_alen($x) = 4 ok 53 - Math::BigInt::Calc->_alen($x) = 5 ok 54 - Math::BigInt::Calc->_alen($x) = 6 ok 55 - Math::BigInt::Calc->_alen($x) = 7 ok 56 - Math::BigInt::Calc->_alen($x) = 8 ok 57 - Math::BigInt::Calc->_alen($x) = 9 ok 58 - Math::BigInt::Calc->_alen($x) = 1 ok 59 - Math::BigInt::Calc->_alen($x) = 2 ok 60 - Math::BigInt::Calc->_alen($x) = 3 ok 61 - Math::BigInt::Calc->_alen($x) = 4 ok 62 - Math::BigInt::Calc->_alen($x) = 5 ok 63 - Math::BigInt::Calc->_alen($x) = 6 ok 64 - Math::BigInt::Calc->_alen($x) = 7 ok 65 - Math::BigInt::Calc->_alen($x) = 8 ok 66 - Math::BigInt::Calc->_alen($x) = 9 ok 67 - Math::BigInt::Calc->_len($x) = 1 ok 68 - Math::BigInt::Calc->_len($x) = 2 ok 69 - Math::BigInt::Calc->_len($x) = 3 ok 70 - Math::BigInt::Calc->_len($x) = 4 ok 71 - Math::BigInt::Calc->_len($x) = 5 ok 72 - Math::BigInt::Calc->_len($x) = 6 ok 73 - Math::BigInt::Calc->_len($x) = 7 ok 74 - Math::BigInt::Calc->_len($x) = 8 ok 75 - Math::BigInt::Calc->_len($x) = 1 ok 76 - Math::BigInt::Calc->_len($x) = 2 ok 77 - Math::BigInt::Calc->_len($x) = 3 ok 78 - Math::BigInt::Calc->_len($x) = 4 ok 79 - Math::BigInt::Calc->_len($x) = 5 ok 80 - Math::BigInt::Calc->_len($x) = 6 ok 81 - Math::BigInt::Calc->_len($x) = 7 ok 82 - Math::BigInt::Calc->_len($x) = 8 ok 83 - Math::BigInt::Calc->_len($x) = 9 ok 84 - Math::BigInt::Calc->_len($x) = 1 ok 85 - Math::BigInt::Calc->_len($x) = 2 ok 86 - Math::BigInt::Calc->_len($x) = 3 ok 87 - Math::BigInt::Calc->_len($x) = 4 ok 88 - Math::BigInt::Calc->_len($x) = 5 ok 89 - Math::BigInt::Calc->_len($x) = 6 ok 90 - Math::BigInt::Calc->_len($x) = 7 ok 91 - Math::BigInt::Calc->_len($x) = 8 ok 92 - Math::BigInt::Calc->_len($x) = 9 ok 93 - Math::BigInt::Calc->_len($x) = 1 ok 94 - Math::BigInt::Calc->_len($x) = 2 ok 95 - Math::BigInt::Calc->_len($x) = 3 ok 96 - Math::BigInt::Calc->_len($x) = 4 ok 97 - Math::BigInt::Calc->_len($x) = 5 ok 98 - Math::BigInt::Calc->_len($x) = 6 ok 99 - Math::BigInt::Calc->_len($x) = 7 ok 100 - Math::BigInt::Calc->_len($x) = 8 ok 101 - Math::BigInt::Calc->_len($x) = 9 ok 102 - Math::BigInt::Calc->_len($x) = 1 ok 103 - Math::BigInt::Calc->_len($x) = 2 ok 104 - Math::BigInt::Calc->_len($x) = 3 ok 105 - Math::BigInt::Calc->_len($x) = 4 ok 106 - Math::BigInt::Calc->_len($x) = 5 ok 107 - Math::BigInt::Calc->_len($x) = 6 ok 108 - Math::BigInt::Calc->_len($x) = 7 ok 109 - Math::BigInt::Calc->_len($x) = 8 ok 110 - Math::BigInt::Calc->_digit($x, 0) = 9 ok 111 - Math::BigInt::Calc->_digit($x, 1) = 8 ok 112 - Math::BigInt::Calc->_digit($x, 2) = 7 ok 113 - Math::BigInt::Calc->_digit($x, 8) = 1 ok 114 - Math::BigInt::Calc->_digit($x, 9) = 0 ok 115 - Math::BigInt::Calc->_digit($x, -1) = 1 ok 116 - Math::BigInt::Calc->_digit($x, -2) = 2 ok 117 - Math::BigInt::Calc->_digit($x, -3) = 3 ok 118 - Math::BigInt::Calc->_digit($x, -9) = 9 ok 119 - Math::BigInt::Calc->_digit($x, -10) = 0 ok 120 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1" ok 121 - Math::BigInt::Calc->_str($x) = "1" ok 122 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12" ok 123 - Math::BigInt::Calc->_str($x) = "12" ok 124 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123" ok 125 - Math::BigInt::Calc->_str($x) = "123" ok 126 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1234" ok 127 - Math::BigInt::Calc->_str($x) = "1234" ok 128 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12345" ok 129 - Math::BigInt::Calc->_str($x) = "12345" ok 130 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123456" ok 131 - Math::BigInt::Calc->_str($x) = "123456" ok 132 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "1234567" ok 133 - Math::BigInt::Calc->_str($x) = "1234567" ok 134 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "12345678" ok 135 - Math::BigInt::Calc->_str($x) = "12345678" ok 136 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_copy($x)) = "123456789" ok 137 - Math::BigInt::Calc->_str($x) = "123456789" ok 138 - Math::BigInt::Calc->_zeros($x) = 6 ok 139 - Math::BigInt::Calc->_zeros($x) = 0 ok 140 - Math::BigInt::Calc->_zeros($x) = 3 ok 141 - Math::BigInt::Calc->_zeros($x) = 0 ok 142 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 10)) = 10000 ok 143 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 10)) = 20000 ok 144 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft($x, $y, 2)) = 128 << 4 ok 145 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 1 ok 146 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 20 ok 147 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 2)) = 256 >> 4 ok 148 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_rsft($x, $y, 10)) = 0 ok 149 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 150 - $n is unmodified ok 151 - $b is unmodified ok 152 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 153 - $n is unmodified ok 154 - $b is unmodified ok 155 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 156 - $n is unmodified ok 157 - $b is unmodified ok 158 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 159 - $n is unmodified ok 160 - $b is unmodified ok 161 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 162 - $n is unmodified ok 163 - $b is unmodified ok 164 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 165 - $n is unmodified ok 166 - $b is unmodified ok 167 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 168 - $n is unmodified ok 169 - $b is unmodified ok 170 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 171 - $n is unmodified ok 172 - $b is unmodified ok 173 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 174 - $n is unmodified ok 175 - $b is unmodified ok 176 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 177 - $n is unmodified ok 178 - $b is unmodified ok 179 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 180 - $n is unmodified ok 181 - $b is unmodified ok 182 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 183 - $n is unmodified ok 184 - $b is unmodified ok 185 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 186 - $n is unmodified ok 187 - $b is unmodified ok 188 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 189 - $n is unmodified ok 190 - $b is unmodified ok 191 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 192 - $n is unmodified ok 193 - $b is unmodified ok 194 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 195 - $n is unmodified ok 196 - $b is unmodified ok 197 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 198 - $n is unmodified ok 199 - $b is unmodified ok 200 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 201 - $n is unmodified ok 202 - $b is unmodified ok 203 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 204 - $n is unmodified ok 205 - $b is unmodified ok 206 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 207 - $n is unmodified ok 208 - $b is unmodified ok 209 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 210 - $n is unmodified ok 211 - $b is unmodified ok 212 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 213 - $n is unmodified ok 214 - $b is unmodified ok 215 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 216 - $n is unmodified ok 217 - $b is unmodified ok 218 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("2"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 219 - $n is unmodified ok 220 - $b is unmodified ok 221 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("10000000000000000000000000"))) ok 222 - $n is unmodified ok 223 - $b is unmodified ok 224 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("100000000000000000000000000000000000000000000000000"))) ok 225 - $n is unmodified ok 226 - $b is unmodified ok 227 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_lsft(Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("3"), Math::BigInt::Calc->_new("1000000000000000000000000000000000000000000000000000000000000000000000000000"))) ok 228 - $n is unmodified ok 229 - $b is unmodified ok 230 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 231 - Math::BigInt::Calc->_acmp($y, $x) = 1 ok 232 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 233 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 234 - Math::BigInt::Calc->_acmp($x, $y) = 0 ok 235 - Math::BigInt::Calc->_acmp($x, $y) = 1 ok 236 - Math::BigInt::Calc->_acmp($y, $x) = -1 ok 237 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 238 - Math::BigInt::Calc->_acmp($y, $x) = +1 ok 239 - Math::BigInt::Calc->_acmp($x, $y) = 1 ok 240 - Math::BigInt::Calc->_acmp($y, $x) = -1 ok 241 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 242 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 243 - Math::BigInt::Calc->_acmp($x, $y) = -1 ok 244 - Math::BigInt::Calc->_acmp($y, $x) = 1 ok 245 - Math::BigInt::Calc->_acmp($x, $x) = 0 ok 246 - Math::BigInt::Calc->_acmp($y, $y) = 0 ok 247 - Math::BigInt::Calc->_str($xmod) = "629" ok 248 - $sign = "-" ok 249 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_div($x, $y))) = 3 ok 250 - Math::BigInt::Calc->_str($x) = 30 ok 251 - Math::BigInt::Calc->_str($y) = 3 ok 252 - Math::BigInt::Calc->_str($x) = 0 ok 253 - Math::BigInt::Calc->_str($y) = 123 ok 254 - ref($x) = "$REF" ok 255 - Math::BigInt::Calc->_str($x) = "1" ok 256 - ref($x) = "" ok 257 - $x = 1 ok 258 - ref($x) = "$REF" ok 259 - Math::BigInt::Calc->_str($x) = "12" ok 260 - ref($x) = "" ok 261 - $x = 12 ok 262 - ref($x) = "$REF" ok 263 - Math::BigInt::Calc->_str($x) = "123" ok 264 - ref($x) = "" ok 265 - $x = 123 ok 266 - ref($x) = "$REF" ok 267 - Math::BigInt::Calc->_str($x) = "1234" ok 268 - ref($x) = "" ok 269 - $x = 1234 ok 270 - ref($x) = "$REF" ok 271 - Math::BigInt::Calc->_str($x) = "12345" ok 272 - ref($x) = "" ok 273 - $x = 12345 ok 274 - ref($x) = "$REF" ok 275 - Math::BigInt::Calc->_str($x) = "1234567" ok 276 - ref($x) = "" ok 277 - $x = 1234567 ok 278 - ref($x) = "$REF" ok 279 - Math::BigInt::Calc->_str($x) = "12345678" ok 280 - ref($x) = "" ok 281 - $x = 12345678 ok 282 - ref($x) = "$REF" ok 283 - Math::BigInt::Calc->_str($x) = "123456789" ok 284 - ref($x) = "" ok 285 - $x = 123456789 ok 286 - ref($x) = "$REF" ok 287 - Math::BigInt::Calc->_str($x) = "1234567890" ok 288 - ref($x) = "" ok 289 - $x = 1234567890 ok 290 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sqrt($x)) = "12" ok 291 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_sqrt($x)) = "12000000" ok 292 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "4" ok 293 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "3" ok 294 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 0 ok 295 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 1 ok 296 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 1 ok 297 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 5 ok 298 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 81 ** 3 ok 299 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 81 ok 300 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 81 ** 3 ok 301 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = "150094635296999121" ok 302 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "531441" ok 303 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 304 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = "523347633027360537213511521" ok 305 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 306 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "80" ok 307 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = "81" ok 308 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9801 # _root( 99, 99) ok 309 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 310 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 9 ok 311 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 998001 # _root( 999, 999) ok 312 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 313 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 31 ok 314 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 99980001 # _root( 9999, 9999) ok 315 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 316 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 99 ok 317 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9999800001 # _root( 99999, 99999) ok 318 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 319 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 316 ok 320 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 999998000001 # _root( 999999, 999999) ok 321 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 322 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 999 ok 323 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 99999980000001 # _root( 9999999, 9999999) ok 324 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 325 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 3162 ok 326 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 9999999800000001 # _root( 99999999, 99999999) ok 327 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 328 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 9999 ok 329 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_pow($x, $n)) = 999999998000000001 # _root( 999999999, 999999999) ok 330 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = '1' ok 331 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_root($x, $n)) = 31622 ok 332 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "1" ok 333 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "1" ok 334 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "2" ok 335 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "6" ok 336 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "24" ok 337 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "120" ok 338 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "3628800" ok 339 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "39916800" ok 340 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "479001600" ok 341 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_fac($x)) = "6227020800" ok 342 - Math::BigInt::Calc->_str($x) = "6" ok 343 - Math::BigInt::Calc->_str($x) = "6227020800" ok 344 - Math::BigInt::Calc->_str($x) = 2 ok 345 - Math::BigInt::Calc->_str($x) = 1 ok 346 - Math::BigInt::Calc->_str($x) = 12 ok 347 - Math::BigInt::Calc->_str($x) = 11 ok 348 - Math::BigInt::Calc->_str($x) = 122 ok 349 - Math::BigInt::Calc->_str($x) = 121 ok 350 - Math::BigInt::Calc->_str($x) = 1232 ok 351 - Math::BigInt::Calc->_str($x) = 1231 ok 352 - Math::BigInt::Calc->_str($x) = 12342 ok 353 - Math::BigInt::Calc->_str($x) = 12341 ok 354 - Math::BigInt::Calc->_str($x) = 1234562 ok 355 - Math::BigInt::Calc->_str($x) = 1234561 ok 356 - Math::BigInt::Calc->_str($x) = 12345672 ok 357 - Math::BigInt::Calc->_str($x) = 12345671 ok 358 - Math::BigInt::Calc->_str($x) = 123456782 ok 359 - Math::BigInt::Calc->_str($x) = 123456781 ok 360 - Math::BigInt::Calc->_str($x) = 1234567892 ok 361 - Math::BigInt::Calc->_str($x) = 1234567891 ok 362 - Math::BigInt::Calc->_str($x) = 20 ok 363 - Math::BigInt::Calc->_str($x) = 19 ok 364 - Math::BigInt::Calc->_str($x) = 120 ok 365 - Math::BigInt::Calc->_str($x) = 119 ok 366 - Math::BigInt::Calc->_str($x) = 1220 ok 367 - Math::BigInt::Calc->_str($x) = 1219 ok 368 - Math::BigInt::Calc->_str($x) = 12320 ok 369 - Math::BigInt::Calc->_str($x) = 12319 ok 370 - Math::BigInt::Calc->_str($x) = 1234520 ok 371 - Math::BigInt::Calc->_str($x) = 1234519 ok 372 - Math::BigInt::Calc->_str($x) = 12345620 ok 373 - Math::BigInt::Calc->_str($x) = 12345619 ok 374 - Math::BigInt::Calc->_str($x) = 123456720 ok 375 - Math::BigInt::Calc->_str($x) = 123456719 ok 376 - Math::BigInt::Calc->_str($x) = 1234567820 ok 377 - Math::BigInt::Calc->_str($x) = 1234567819 ok 378 - $x = Math::BigInt::Calc->_new("9"); Math::BigInt::Calc->_inc() ok 379 - $x = Math::BigInt::Calc->_new("10"); Math::BigInt::Calc->_dec() ok 380 - $x = Math::BigInt::Calc->_new("99"); Math::BigInt::Calc->_inc() ok 381 - $x = Math::BigInt::Calc->_new("100"); Math::BigInt::Calc->_dec() ok 382 - $x = Math::BigInt::Calc->_new("999"); Math::BigInt::Calc->_inc() ok 383 - $x = Math::BigInt::Calc->_new("1000"); Math::BigInt::Calc->_dec() ok 384 - $x = Math::BigInt::Calc->_new("9999"); Math::BigInt::Calc->_inc() ok 385 - $x = Math::BigInt::Calc->_new("10000"); Math::BigInt::Calc->_dec() ok 386 - $x = Math::BigInt::Calc->_new("99999"); Math::BigInt::Calc->_inc() ok 387 - $x = Math::BigInt::Calc->_new("100000"); Math::BigInt::Calc->_dec() ok 388 - $x = Math::BigInt::Calc->_new("999999"); Math::BigInt::Calc->_inc() ok 389 - $x = Math::BigInt::Calc->_new("1000000"); Math::BigInt::Calc->_dec() ok 390 - $x = Math::BigInt::Calc->_new("9999999"); Math::BigInt::Calc->_inc() ok 391 - $x = Math::BigInt::Calc->_new("10000000"); Math::BigInt::Calc->_dec() ok 392 - $x = Math::BigInt::Calc->_new("99999999"); Math::BigInt::Calc->_inc() ok 393 - $x = Math::BigInt::Calc->_new("100000000"); Math::BigInt::Calc->_dec() ok 394 - $x = Math::BigInt::Calc->_new("999999999"); Math::BigInt::Calc->_inc() ok 395 - $x = Math::BigInt::Calc->_new("1000000000"); Math::BigInt::Calc->_dec() ok 396 - $x = Math::BigInt::Calc->_new("9999999999"); Math::BigInt::Calc->_inc() ok 397 - $x = Math::BigInt::Calc->_new("10000000000"); Math::BigInt::Calc->_dec() ok 398 - $x = Math::BigInt::Calc->_new("99999999999"); Math::BigInt::Calc->_inc() ok 399 - $x = Math::BigInt::Calc->_new("100000000000"); Math::BigInt::Calc->_dec() ok 400 - $x = Math::BigInt::Calc->_new("999999999999"); Math::BigInt::Calc->_inc() ok 401 - $x = Math::BigInt::Calc->_new("1000000000000"); Math::BigInt::Calc->_dec() ok 402 - $x = Math::BigInt::Calc->_new("9999999999999"); Math::BigInt::Calc->_inc() ok 403 - $x = Math::BigInt::Calc->_new("10000000000000"); Math::BigInt::Calc->_dec() ok 404 - $x = Math::BigInt::Calc->_new("99999999999999"); Math::BigInt::Calc->_inc() ok 405 - $x = Math::BigInt::Calc->_new("100000000000000"); Math::BigInt::Calc->_dec() ok 406 - $x = Math::BigInt::Calc->_new("999999999999999"); Math::BigInt::Calc->_inc() ok 407 - $x = Math::BigInt::Calc->_new("1000000000000000"); Math::BigInt::Calc->_dec() ok 408 - $x = Math::BigInt::Calc->_new("9999999999999999"); Math::BigInt::Calc->_inc() ok 409 - $x = Math::BigInt::Calc->_new("10000000000000000"); Math::BigInt::Calc->_dec() ok 410 - $x = Math::BigInt::Calc->_new("99999999999999999"); Math::BigInt::Calc->_inc() ok 411 - $x = Math::BigInt::Calc->_new("100000000000000000"); Math::BigInt::Calc->_dec() ok 412 - $x = Math::BigInt::Calc->_new("999999999999999999"); Math::BigInt::Calc->_inc() ok 413 - $x = Math::BigInt::Calc->_new("1000000000000000000"); Math::BigInt::Calc->_dec() ok 414 - $x = Math::BigInt::Calc->_new("9999999999999999999"); Math::BigInt::Calc->_inc() ok 415 - $x = Math::BigInt::Calc->_new("10000000000000000000"); Math::BigInt::Calc->_dec() ok 416 - $x = Math::BigInt::Calc->_new("99999999999999999999"); Math::BigInt::Calc->_inc() ok 417 - $x = Math::BigInt::Calc->_new("100000000000000000000"); Math::BigInt::Calc->_dec() ok 418 - $x = Math::BigInt::Calc->_new("10"); Math::BigInt::Calc->_inc() ok 419 - $x = Math::BigInt::Calc->_new("11"); Math::BigInt::Calc->_dec() ok 420 - $x = Math::BigInt::Calc->_new("100"); Math::BigInt::Calc->_inc() ok 421 - $x = Math::BigInt::Calc->_new("101"); Math::BigInt::Calc->_dec() ok 422 - $x = Math::BigInt::Calc->_new("1000"); Math::BigInt::Calc->_inc() ok 423 - $x = Math::BigInt::Calc->_new("1001"); Math::BigInt::Calc->_dec() ok 424 - $x = Math::BigInt::Calc->_new("10000"); Math::BigInt::Calc->_inc() ok 425 - $x = Math::BigInt::Calc->_new("10001"); Math::BigInt::Calc->_dec() ok 426 - $x = Math::BigInt::Calc->_new("100000"); Math::BigInt::Calc->_inc() ok 427 - $x = Math::BigInt::Calc->_new("100001"); Math::BigInt::Calc->_dec() ok 428 - $x = Math::BigInt::Calc->_new("1000000"); Math::BigInt::Calc->_inc() ok 429 - $x = Math::BigInt::Calc->_new("1000001"); Math::BigInt::Calc->_dec() ok 430 - $x = Math::BigInt::Calc->_new("10000000"); Math::BigInt::Calc->_inc() ok 431 - $x = Math::BigInt::Calc->_new("10000001"); Math::BigInt::Calc->_dec() ok 432 - $x = Math::BigInt::Calc->_new("100000000"); Math::BigInt::Calc->_inc() ok 433 - $x = Math::BigInt::Calc->_new("100000001"); Math::BigInt::Calc->_dec() ok 434 - $x = Math::BigInt::Calc->_new("1000000000"); Math::BigInt::Calc->_inc() ok 435 - $x = Math::BigInt::Calc->_new("1000000001"); Math::BigInt::Calc->_dec() ok 436 - $x = Math::BigInt::Calc->_new("10000000000"); Math::BigInt::Calc->_inc() ok 437 - $x = Math::BigInt::Calc->_new("10000000001"); Math::BigInt::Calc->_dec() ok 438 - $x = Math::BigInt::Calc->_new("100000000000"); Math::BigInt::Calc->_inc() ok 439 - $x = Math::BigInt::Calc->_new("100000000001"); Math::BigInt::Calc->_dec() ok 440 - $x = Math::BigInt::Calc->_new("1000000000000"); Math::BigInt::Calc->_inc() ok 441 - $x = Math::BigInt::Calc->_new("1000000000001"); Math::BigInt::Calc->_dec() ok 442 - $x = Math::BigInt::Calc->_new("10000000000000"); Math::BigInt::Calc->_inc() ok 443 - $x = Math::BigInt::Calc->_new("10000000000001"); Math::BigInt::Calc->_dec() ok 444 - $x = Math::BigInt::Calc->_new("100000000000000"); Math::BigInt::Calc->_inc() ok 445 - $x = Math::BigInt::Calc->_new("100000000000001"); Math::BigInt::Calc->_dec() ok 446 - $x = Math::BigInt::Calc->_new("1000000000000000"); Math::BigInt::Calc->_inc() ok 447 - $x = Math::BigInt::Calc->_new("1000000000000001"); Math::BigInt::Calc->_dec() ok 448 - $x = Math::BigInt::Calc->_new("10000000000000000"); Math::BigInt::Calc->_inc() ok 449 - $x = Math::BigInt::Calc->_new("10000000000000001"); Math::BigInt::Calc->_dec() ok 450 - $x = Math::BigInt::Calc->_new("100000000000000000"); Math::BigInt::Calc->_inc() ok 451 - $x = Math::BigInt::Calc->_new("100000000000000001"); Math::BigInt::Calc->_dec() ok 452 - $x = Math::BigInt::Calc->_new("1000000000000000000"); Math::BigInt::Calc->_inc() ok 453 - $x = Math::BigInt::Calc->_new("1000000000000000001"); Math::BigInt::Calc->_dec() ok 454 - $x = Math::BigInt::Calc->_new("10000000000000000000"); Math::BigInt::Calc->_inc() ok 455 - $x = Math::BigInt::Calc->_new("10000000000000000001"); Math::BigInt::Calc->_dec() ok 456 - $x = Math::BigInt::Calc->_new("100000000000000000000"); Math::BigInt::Calc->_inc() ok 457 - $x = Math::BigInt::Calc->_new("100000000000000000001"); Math::BigInt::Calc->_dec() ok 458 - Math::BigInt::Calc->_str($x) = "1001" ok 459 - Math::BigInt::Calc->_str($x) = "1000" ok 460 - Math::BigInt::Calc->_str($x) = 1000000001 ok 461 - Math::BigInt::Calc->_str($x) = 999999999 ok 462 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_mod($x, $y))) = 1 ok 463 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_mod($x, $y))) = 0 ok 464 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_xor($x, $y))) = 7 ok 465 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_or($x, $y))) = 7 ok 466 - Math::BigInt::Calc->_str(scalar(Math::BigInt::Calc->_and($x, $y))) = 1 ok 467 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex("0xFf")) = 255 ok 468 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin("0b10101011")) = 160+11 ok 469 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("0100")) = 8*8 ok 470 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("01000")) = 8*8*8 ok 471 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("010001")) = 8*8*8*8+1 ok 472 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct("010007")) = 8*8*8*8+7 ok 473 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("128")))) = 128 ok 474 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("128")))) = 128 ok 475 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("128")))) = 128 ok 476 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456")))) = 123456 ok 477 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456789")))) = "123456789" ok 478 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("1234567890123")))) = "1234567890123" ok 479 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 480 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 481 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("123456789012345678901234567890")))) = "123456789012345678901234567890" ok 482 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_hex(Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("0")))) = 0 ok 483 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_bin(Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("0")))) = 0 ok 484 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_from_oct(Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("0")))) = 0 ok 485 - Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("0")) = "0x0" ok 486 - Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("0")) = "0b0" ok 487 - Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("0")) = "00" ok 488 - Math::BigInt::Calc->_as_hex(Math::BigInt::Calc->_new("12")) = "0xc" ok 489 - Math::BigInt::Calc->_as_bin(Math::BigInt::Calc->_new("12")) = "0b1100" ok 490 - Math::BigInt::Calc->_as_oct(Math::BigInt::Calc->_new("64")) = "0100" ok 491 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(0)) = "1" ok 492 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(1)) = "10" ok 493 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(2)) = "100" ok 494 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(12)) = "1000000000000" ok 495 - Math::BigInt::Calc->_str(Math::BigInt::Calc->_1ex(16)) = "10000000000000000" ok 496 - Math::BigInt::Calc->_check($x) = 0 ok 497 - Math::BigInt::Calc->_check(123) = "123 is not a reference" ok 498 - @$x = 1 ok 499 - $x->[0] = 0 ok 500 - @$x = 1 ok 501 - $x->[0] = 0 ok 502 - @$x = 1 ok 503 - $x->[0] = 1 ok 504 - @$x = 2 ok 505 - $x->[0] = 0 ok 506 - $x->[1] = 1 ok 507 - @$x = 3 ok 508 - $x->[0] = 0 ok 509 - $x->[1] = 1 ok 510 - $x->[2] = 2 ok 511 - @$x = 3 ok 512 - $x->[0] = 0 ok 513 - $x->[1] = 1 ok 514 - $x->[2] = 2 ok 515 - @$x = 3 ok 516 - $x->[0] = 0 ok 517 - $x->[1] = 1 ok 518 - $x->[2] = 2 ok 519 - @$x = 3 ok 520 - $x->[0] = 0 ok 521 - $x->[1] = 1 ok 522 - $x->[2] = 2 ok 523 - @$x = 1 ok 524 - $x->[0] = 0 ok t/bigintpm.t .................. 1..4298 ok 1 - 'bgcd() as function' isa 'Math::BigInt' ok 2 - bgcd() as function ok 3 - 'bgcd() as class method' isa 'Math::BigInt' ok 4 - bgcd() as class method ok 5 - 'bgcd() as instance method' isa 'Math::BigInt' ok 6 - bgcd() as instance method ok 7 - bgcd() does not modify invocand ok 8 - 'blcm() as function' isa 'Math::BigInt' ok 9 - blcm() as function ok 10 - 'blcm() as class method' isa 'Math::BigInt' ok 11 - blcm() as class method ok 12 - 'blcm() as instance method' isa 'Math::BigInt' ok 13 - blcm() as instance method ok 14 - blcm() does not modify invocand ok 15 - Math::BigInt->from_hex("0xcafe") ok 16 - Math::BigInt->from_hex("0xcafebabedead") ok 17 - Math::BigInt->from_bin("0b1001") ok 18 - Math::BigInt->from_bin("0b1001100110011001100110011001"); ok 19 - Math::BigInt->from_oct("0775"); ok 20 - Math::BigInt->from_oct("07777777777777711111111222222222"); ok 21 - Math::BigInt->config('lib') ok 22 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("-345"); $x .= $y; ok 23 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x += $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x += $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x -= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x -= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x *= $y; ok 32 - is a valid object ok 33 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x *= $y; ok 34 - is a valid object ok 35 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x %= $y; ok 36 - is a valid object ok 37 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("9"); $x %= $y; ok 38 - is a valid object ok 39 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x %= $y; ok 40 - is a valid object ok 41 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("3"); $x /= $y; ok 42 - is a valid object ok 43 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("2"); $x /= $y; ok 44 - is a valid object ok 45 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 46 - is a valid object ok 47 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x &= $y; ok 48 - is a valid object ok 49 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $x ^= $y; ok 50 - is a valid object ok 51 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("2"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("invalid"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt->new("122"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("122"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt->new("-21"); $y = Math::BigInt->new("4"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt->new("21"); $y = Math::BigInt->new("-21"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("4"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt->new("1024"); $y = Math::BigInt->new("2"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("3"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt->new("82"); $y = Math::BigInt->new("3"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt->new("80"); $y = Math::BigInt->new("3"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("2"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt->new("15625"); $y = Math::BigInt->new("5"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt->new("15626"); $y = Math::BigInt->new("5"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt->new("15624"); $y = Math::BigInt->new("5"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt->new("1000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt->new("10000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt->new("100000000"); $y = Math::BigInt->new("10"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt->new("8916100448256"); $y = Math::BigInt->new("12"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt->new("8916100448257"); $y = Math::BigInt->new("12"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt->new("8916100448255"); $y = Math::BigInt->new("12"); $x->blog($y); ok 140 - is a valid object ok 141 - $x = Math::BigInt->new("2251799813685248"); $y = Math::BigInt->new("8"); $x->blog($y); ok 142 - is a valid object ok 143 - $x = Math::BigInt->new("72057594037927936"); $y = Math::BigInt->new("2"); $x->blog($y); ok 144 - is a valid object ok 145 - $x = Math::BigInt->new("144115188075855872"); $y = Math::BigInt->new("2"); $x->blog($y); ok 146 - is a valid object ok 147 - $x = Math::BigInt->new("288230376151711744"); $y = Math::BigInt->new("2"); $x->blog($y); ok 148 - is a valid object ok 149 - $x = Math::BigInt->new("576460752303423488"); $y = Math::BigInt->new("2"); $x->blog($y); ok 150 - is a valid object ok 151 - $x = Math::BigInt->new("1329227995784915872903807060280344576"); $y = Math::BigInt->new("2"); $x->blog($y); ok 152 - is a valid object ok 153 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->blog($y); ok 154 - is a valid object ok 155 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->blog($y); ok 156 - is a valid object ok 157 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->blog($y); ok 158 - is a valid object ok 159 - $x = Math::BigInt->new("0"); $x->is_negative() || 0; ok 160 - $x = Math::BigInt->new("-1"); $x->is_negative() || 0; ok 161 - $x = Math::BigInt->new("1"); $x->is_negative() || 0; ok 162 - $x = Math::BigInt->new("+inf"); $x->is_negative() || 0; ok 163 - $x = Math::BigInt->new("-inf"); $x->is_negative() || 0; ok 164 - $x = Math::BigInt->new("invalid"); $x->is_negative() || 0; ok 165 - $x = Math::BigInt->new("0"); $x->is_positive() || 0; ok 166 - $x = Math::BigInt->new("-1"); $x->is_positive() || 0; ok 167 - $x = Math::BigInt->new("1"); $x->is_positive() || 0; ok 168 - $x = Math::BigInt->new("+inf"); $x->is_positive() || 0; ok 169 - $x = Math::BigInt->new("-inf"); $x->is_positive() || 0; ok 170 - $x = Math::BigInt->new("invalid"); $x->is_positive() || 0; ok 171 - $x = Math::BigInt->new("0"); $x->is_non_negative() || 0; ok 172 - $x = Math::BigInt->new("-1"); $x->is_non_negative() || 0; ok 173 - $x = Math::BigInt->new("1"); $x->is_non_negative() || 0; ok 174 - $x = Math::BigInt->new("+inf"); $x->is_non_negative() || 0; ok 175 - $x = Math::BigInt->new("-inf"); $x->is_non_negative() || 0; ok 176 - $x = Math::BigInt->new("NaN"); $x->is_non_negative() || 0; ok 177 - $x = Math::BigInt->new("0"); $x->is_non_positive() || 0; ok 178 - $x = Math::BigInt->new("-1"); $x->is_non_positive() || 0; ok 179 - $x = Math::BigInt->new("1"); $x->is_non_positive() || 0; ok 180 - $x = Math::BigInt->new("+inf"); $x->is_non_positive() || 0; ok 181 - $x = Math::BigInt->new("-inf"); $x->is_non_positive() || 0; ok 182 - $x = Math::BigInt->new("NaN"); $x->is_non_positive() || 0; ok 183 - $x = Math::BigInt->new("-inf"); $x->is_int() || 0; ok 184 - $x = Math::BigInt->new("+inf"); $x->is_int() || 0; ok 185 - $x = Math::BigInt->new("invalid"); $x->is_int() || 0; ok 186 - $x = Math::BigInt->new("1"); $x->is_int() || 0; ok 187 - $x = Math::BigInt->new("0"); $x->is_int() || 0; ok 188 - $x = Math::BigInt->new("123e12"); $x->is_int() || 0; ok 189 - $x = Math::BigInt->new("abc"); $x->is_odd() || 0; ok 190 - $x = Math::BigInt->new("0"); $x->is_odd() || 0; ok 191 - $x = Math::BigInt->new("1"); $x->is_odd() || 0; ok 192 - $x = Math::BigInt->new("3"); $x->is_odd() || 0; ok 193 - $x = Math::BigInt->new("-1"); $x->is_odd() || 0; ok 194 - $x = Math::BigInt->new("-3"); $x->is_odd() || 0; ok 195 - $x = Math::BigInt->new("10000001"); $x->is_odd() || 0; ok 196 - $x = Math::BigInt->new("10000002"); $x->is_odd() || 0; ok 197 - $x = Math::BigInt->new("2"); $x->is_odd() || 0; ok 198 - $x = Math::BigInt->new("120"); $x->is_odd() || 0; ok 199 - $x = Math::BigInt->new("121"); $x->is_odd() || 0; ok 200 - $x = Math::BigInt->new("abc"); $x->is_even() || 0; ok 201 - $x = Math::BigInt->new("0"); $x->is_even() || 0; ok 202 - $x = Math::BigInt->new("1"); $x->is_even() || 0; ok 203 - $x = Math::BigInt->new("3"); $x->is_even() || 0; ok 204 - $x = Math::BigInt->new("-1"); $x->is_even() || 0; ok 205 - $x = Math::BigInt->new("-3"); $x->is_even() || 0; ok 206 - $x = Math::BigInt->new("10000001"); $x->is_even() || 0; ok 207 - $x = Math::BigInt->new("10000002"); $x->is_even() || 0; ok 208 - $x = Math::BigInt->new("2"); $x->is_even() || 0; ok 209 - $x = Math::BigInt->new("120"); $x->is_even() || 0; ok 210 - $x = Math::BigInt->new("121"); $x->is_even() || 0; ok 211 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 212 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 213 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 214 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 215 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 216 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 217 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 218 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 219 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 220 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 221 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 222 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 223 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("invalid"); $x->bacmp($y); ok 224 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->bacmp($y); ok 225 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 226 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 227 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 228 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 229 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 230 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 231 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 232 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 233 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 234 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 235 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 236 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 237 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 238 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 239 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 240 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 241 - $x = Math::BigInt->bnorm("0e999"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0e-999"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("-0e999"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("-0e-999"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("123"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("123.000"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("123e0"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("123e+0"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("123e-0"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("123.000e0"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("123.000e+0"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("123.000e-0"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0babc"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0b123"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0b0"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("-0b0"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("-0b1"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0b0001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0b001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0b011"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0b101"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0b1001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0b10001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0b100001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("0b1000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("0b10000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("0b100000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0b1000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm("0b10000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("0b100000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 330 - is a valid object ok 331 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 334 - is a valid object ok 335 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 338 - is a valid object ok 339 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("-0x0"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0x1234"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("0xabcdef"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("-0x1234"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("0x12345678"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("0x9"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0x11"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("0x21"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("0x41"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("0x81"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("0x101"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("0x201"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("0x401"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("0x801"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("0x1001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("0x2001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("0x4001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("0x8001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("0x10001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("0x20001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("0x40001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("0x80001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("0x100001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("0x200001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("0x400001"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("0x800001"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("0x1000001"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("0x2000001"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("0x4000001"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm("0x8000001"); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("0x10000001"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm("0x20000001"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm("0x40000001"); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("0x80000001"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm("0x100000001"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm("0x200000001"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("0x400000001"); ok 432 - is a valid object ok 433 - $x = Math::BigInt->bnorm("0x800000001"); ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 436 - is a valid object ok 437 - $x = Math::BigInt->bnorm("inf"); ok 438 - is a valid object ok 439 - $x = Math::BigInt->bnorm("+inf"); ok 440 - is a valid object ok 441 - $x = Math::BigInt->bnorm("-inf"); ok 442 - is a valid object ok 443 - $x = Math::BigInt->bnorm("0inf"); ok 444 - is a valid object ok 445 - $x = Math::BigInt->bnorm(""); ok 446 - is a valid object ok 447 - $x = Math::BigInt->bnorm("abc"); ok 448 - is a valid object ok 449 - $x = Math::BigInt->bnorm(" 1 a"); ok 450 - is a valid object ok 451 - $x = Math::BigInt->bnorm("1bcd2"); ok 452 - is a valid object ok 453 - $x = Math::BigInt->bnorm("11111b"); ok 454 - is a valid object ok 455 - $x = Math::BigInt->bnorm("+1z"); ok 456 - is a valid object ok 457 - $x = Math::BigInt->bnorm("-1z"); ok 458 - is a valid object ok 459 - $x = Math::BigInt->bnorm("_123"); ok 460 - is a valid object ok 461 - $x = Math::BigInt->bnorm("_123_"); ok 462 - is a valid object ok 463 - $x = Math::BigInt->bnorm("1E_12"); ok 464 - is a valid object ok 465 - $x = Math::BigInt->bnorm("1_E_12"); ok 466 - is a valid object ok 467 - $x = Math::BigInt->bnorm("+_1E12"); ok 468 - is a valid object ok 469 - $x = Math::BigInt->bnorm("+0_1E2"); ok 470 - is a valid object ok 471 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 472 - is a valid object ok 473 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 474 - is a valid object ok 475 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 476 - is a valid object ok 477 - $x = Math::BigInt->bnorm("E1"); ok 478 - is a valid object ok 479 - $x = Math::BigInt->bnorm("E23"); ok 480 - is a valid object ok 481 - $x = Math::BigInt->bnorm("1.23E1"); ok 482 - is a valid object ok 483 - $x = Math::BigInt->bnorm("1.23E-1"); ok 484 - is a valid object ok 485 - $x = Math::BigInt->bnorm("1e2e3"); ok 486 - is a valid object ok 487 - $x = Math::BigInt->bnorm("1e2r"); ok 488 - is a valid object ok 489 - $x = Math::BigInt->bnorm("1e2.0"); ok 490 - is a valid object ok 491 - $x = Math::BigInt->bnorm("1.2.2"); ok 492 - is a valid object ok 493 - $x = Math::BigInt->bnorm("1.2.3e1"); ok 494 - is a valid object ok 495 - $x = Math::BigInt->bnorm("-1.2.3"); ok 496 - is a valid object ok 497 - $x = Math::BigInt->bnorm("-1.2.3e-4"); ok 498 - is a valid object ok 499 - $x = Math::BigInt->bnorm("1.2e3.4"); ok 500 - is a valid object ok 501 - $x = Math::BigInt->bnorm("1.2e-3.4"); ok 502 - is a valid object ok 503 - $x = Math::BigInt->bnorm("1.2.3.4"); ok 504 - is a valid object ok 505 - $x = Math::BigInt->bnorm("1.2.t"); ok 506 - is a valid object ok 507 - $x = Math::BigInt->bnorm("1..2"); ok 508 - is a valid object ok 509 - $x = Math::BigInt->bnorm("1..2e1"); ok 510 - is a valid object ok 511 - $x = Math::BigInt->bnorm("1..2e1..1"); ok 512 - is a valid object ok 513 - $x = Math::BigInt->bnorm("12e1..1"); ok 514 - is a valid object ok 515 - $x = Math::BigInt->bnorm("..2"); ok 516 - is a valid object ok 517 - $x = Math::BigInt->bnorm(".-2"); ok 518 - is a valid object ok 519 - $x = Math::BigInt->bnorm("012"); ok 520 - is a valid object ok 521 - $x = Math::BigInt->bnorm("0123"); ok 522 - is a valid object ok 523 - $x = Math::BigInt->bnorm("01234"); ok 524 - is a valid object ok 525 - $x = Math::BigInt->bnorm("012345"); ok 526 - is a valid object ok 527 - $x = Math::BigInt->bnorm("0123456"); ok 528 - is a valid object ok 529 - $x = Math::BigInt->bnorm("01234567"); ok 530 - is a valid object ok 531 - $x = Math::BigInt->bnorm("012345678"); ok 532 - is a valid object ok 533 - $x = Math::BigInt->bnorm("0123456789"); ok 534 - is a valid object ok 535 - $x = Math::BigInt->bnorm("01234567891"); ok 536 - is a valid object ok 537 - $x = Math::BigInt->bnorm("012345678912"); ok 538 - is a valid object ok 539 - $x = Math::BigInt->bnorm("0123456789123"); ok 540 - is a valid object ok 541 - $x = Math::BigInt->bnorm("01234567891234"); ok 542 - is a valid object ok 543 - $x = Math::BigInt->bnorm("0e0"); ok 544 - is a valid object ok 545 - $x = Math::BigInt->bnorm("+0e0"); ok 546 - is a valid object ok 547 - $x = Math::BigInt->bnorm("+0e+0"); ok 548 - is a valid object ok 549 - $x = Math::BigInt->bnorm("-0e+0"); ok 550 - is a valid object ok 551 - $x = Math::BigInt->bnorm("0e-0"); ok 552 - is a valid object ok 553 - $x = Math::BigInt->bnorm("-0e-0"); ok 554 - is a valid object ok 555 - $x = Math::BigInt->bnorm("+0e-0"); ok 556 - is a valid object ok 557 - $x = Math::BigInt->bnorm("000"); ok 558 - is a valid object ok 559 - $x = Math::BigInt->bnorm("00e2"); ok 560 - is a valid object ok 561 - $x = Math::BigInt->bnorm("00e02"); ok 562 - is a valid object ok 563 - $x = Math::BigInt->bnorm("000e002"); ok 564 - is a valid object ok 565 - $x = Math::BigInt->bnorm("000e1230"); ok 566 - is a valid object ok 567 - $x = Math::BigInt->bnorm("00e-3"); ok 568 - is a valid object ok 569 - $x = Math::BigInt->bnorm("00e+3"); ok 570 - is a valid object ok 571 - $x = Math::BigInt->bnorm("00e-03"); ok 572 - is a valid object ok 573 - $x = Math::BigInt->bnorm("00e+03"); ok 574 - is a valid object ok 575 - $x = Math::BigInt->bnorm("-000"); ok 576 - is a valid object ok 577 - $x = Math::BigInt->bnorm("-00e2"); ok 578 - is a valid object ok 579 - $x = Math::BigInt->bnorm("-00e02"); ok 580 - is a valid object ok 581 - $x = Math::BigInt->bnorm("-000e002"); ok 582 - is a valid object ok 583 - $x = Math::BigInt->bnorm("-000e1230"); ok 584 - is a valid object ok 585 - $x = Math::BigInt->bnorm("-00e-3"); ok 586 - is a valid object ok 587 - $x = Math::BigInt->bnorm("-00e+3"); ok 588 - is a valid object ok 589 - $x = Math::BigInt->bnorm("-00e-03"); ok 590 - is a valid object ok 591 - $x = Math::BigInt->bnorm("-00e+03"); ok 592 - is a valid object ok 593 - $x = Math::BigInt->bnorm("0"); ok 594 - is a valid object ok 595 - $x = Math::BigInt->bnorm("+0"); ok 596 - is a valid object ok 597 - $x = Math::BigInt->bnorm("+00"); ok 598 - is a valid object ok 599 - $x = Math::BigInt->bnorm("+000"); ok 600 - is a valid object ok 601 - $x = Math::BigInt->bnorm("000000000000000000"); ok 602 - is a valid object ok 603 - $x = Math::BigInt->bnorm("-0"); ok 604 - is a valid object ok 605 - $x = Math::BigInt->bnorm("-0000"); ok 606 - is a valid object ok 607 - $x = Math::BigInt->bnorm("+1"); ok 608 - is a valid object ok 609 - $x = Math::BigInt->bnorm("+01"); ok 610 - is a valid object ok 611 - $x = Math::BigInt->bnorm("+001"); ok 612 - is a valid object ok 613 - $x = Math::BigInt->bnorm("+00000100000"); ok 614 - is a valid object ok 615 - $x = Math::BigInt->bnorm("123456789"); ok 616 - is a valid object ok 617 - $x = Math::BigInt->bnorm("-1"); ok 618 - is a valid object ok 619 - $x = Math::BigInt->bnorm("-01"); ok 620 - is a valid object ok 621 - $x = Math::BigInt->bnorm("-001"); ok 622 - is a valid object ok 623 - $x = Math::BigInt->bnorm("-123456789"); ok 624 - is a valid object ok 625 - $x = Math::BigInt->bnorm("-00000100000"); ok 626 - is a valid object ok 627 - $x = Math::BigInt->bnorm("1_2_3"); ok 628 - is a valid object ok 629 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 630 - is a valid object ok 631 - $x = Math::BigInt->bnorm("1E2"); ok 632 - is a valid object ok 633 - $x = Math::BigInt->bnorm("1E1"); ok 634 - is a valid object ok 635 - $x = Math::BigInt->bnorm("1E0"); ok 636 - is a valid object ok 637 - $x = Math::BigInt->bnorm("1.23E2"); ok 638 - is a valid object ok 639 - $x = Math::BigInt->bnorm("100E-1"); ok 640 - is a valid object ok 641 - $x = Math::BigInt->bnorm("1.E3"); ok 642 - is a valid object ok 643 - $x = Math::BigInt->bnorm("1.01E2"); ok 644 - is a valid object ok 645 - $x = Math::BigInt->bnorm("1010E-1"); ok 646 - is a valid object ok 647 - $x = Math::BigInt->bnorm("-1010E0"); ok 648 - is a valid object ok 649 - $x = Math::BigInt->bnorm("-1010E1"); ok 650 - is a valid object ok 651 - $x = Math::BigInt->bnorm("1234.00"); ok 652 - is a valid object ok 653 - $x = Math::BigInt->bnorm("-1010E-2"); ok 654 - is a valid object ok 655 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 656 - is a valid object ok 657 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 658 - is a valid object ok 659 - $x = Math::BigInt->bnorm("1E-999999"); ok 660 - is a valid object ok 661 - $x = Math::BigInt->bnorm("0.5"); ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("1"); $x->bnan(); ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("2"); $x->bnan(); ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 668 - is a valid object ok 669 - $x = Math::BigInt->new("2"); $x->bone("+"); ok 670 - is a valid object ok 671 - $x = Math::BigInt->new("2"); $x->bone("-"); ok 672 - is a valid object ok 673 - $x = Math::BigInt->new("invalid"); $x->bone("-"); ok 674 - is a valid object ok 675 - $x = Math::BigInt->new("invalid"); $x->bone("+"); ok 676 - is a valid object ok 677 - $x = Math::BigInt->new("3"); $x->bone(""); ok 678 - is a valid object ok 679 - $x = Math::BigInt->new("1"); $x->binf("+"); ok 680 - is a valid object ok 681 - $x = Math::BigInt->new("2"); $x->binf("-"); ok 682 - is a valid object ok 683 - $x = Math::BigInt->new("3"); $x->binf("+inf"); ok 684 - is a valid object ok 685 - $x = Math::BigInt->new("123"); $x->is_nan() || 0; ok 686 - $x = Math::BigInt->new("abc"); $x->is_nan() || 0; ok 687 - $x = Math::BigInt->new("NaN"); $x->is_nan() || 0; ok 688 - $x = Math::BigInt->new("-123"); $x->is_nan() || 0; ok 689 - $x = Math::BigInt->new("+inf"); $x->is_inf(""); ok 690 - $x = Math::BigInt->new("-inf"); $x->is_inf(""); ok 691 - $x = Math::BigInt->new("abc"); $x->is_inf(""); ok 692 - $x = Math::BigInt->new("1"); $x->is_inf(""); ok 693 - $x = Math::BigInt->new("NaN"); $x->is_inf(""); ok 694 - $x = Math::BigInt->new("-1"); $x->is_inf(""); ok 695 - $x = Math::BigInt->new("+inf"); $x->is_inf("-"); ok 696 - $x = Math::BigInt->new("+inf"); $x->is_inf("+"); ok 697 - $x = Math::BigInt->new("-inf"); $x->is_inf("-"); ok 698 - $x = Math::BigInt->new("-inf"); $x->is_inf("+"); ok 699 - $x = Math::BigInt->new("-inf"); $x->is_inf("-inf"); ok 700 - $x = Math::BigInt->new("-inf"); $x->is_inf("+inf"); ok 701 - $x = Math::BigInt->new("+inf"); $x->is_inf("-inf"); ok 702 - $x = Math::BigInt->new("+inf"); $x->is_inf("+inf"); ok 703 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(""); ok 704 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(""); ok 705 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 734 - is a valid object ok 735 - $x = Math::BigInt->new("-102533203"); $y = Math::BigInt->new("1"); $x->blsft($y, 2); ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 738 - is a valid object ok 739 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 742 - is a valid object ok 743 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-15"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("-13"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("-10"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 792 - is a valid object ok 793 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 794 - is a valid object ok 795 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 796 - is a valid object ok 797 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 798 - is a valid object ok 799 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 800 - is a valid object ok 801 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("2"); $x->brsft($y, 2); ok 802 - is a valid object ok 803 - $x = Math::BigInt->new("-1640531254"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 804 - is a valid object ok 805 - $x = Math::BigInt->new("-820265627"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 806 - is a valid object ok 807 - $x = Math::BigInt->new("-205066405"); $y = Math::BigInt->new("1"); $x->brsft($y, 2); ok 808 - is a valid object ok 809 - $x = Math::BigInt->new("+inf"); $x->bsstr(); ok 810 - $x = Math::BigInt->new("-inf"); $x->bsstr(); ok 811 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 812 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 813 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 814 - $x = Math::BigInt->new("bsstrabc"); $x->bsstr(); ok 815 - $x = Math::BigInt->new("-5"); $x->bsstr(); ok 816 - $x = Math::BigInt->new("-100"); $x->bsstr(); ok 817 - $x = Math::BigInt->new("5"); $x->numify(); ok 818 - $x = Math::BigInt->new("-5"); $x->numify(); ok 819 - $x = Math::BigInt->new("100"); $x->numify(); ok 820 - $x = Math::BigInt->new("-100"); $x->numify(); ok 821 - $x = Math::BigInt->new("invalid"); $x->bneg(); ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("0"); $x->bneg(); ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("1"); $x->bneg(); ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("invalid"); $x->babs(); ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("0"); $x->babs(); ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("1"); $x->babs(); ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("-1"); $x->babs(); ok 850 - is a valid object ok 851 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 852 - is a valid object ok 853 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 854 - is a valid object ok 855 - $x = Math::BigInt->new("NaN"); $x->bsgn(); ok 856 - is a valid object ok 857 - $x = Math::BigInt->new("+inf"); $x->bsgn(); ok 858 - is a valid object ok 859 - $x = Math::BigInt->new("-inf"); $x->bsgn(); ok 860 - is a valid object ok 861 - $x = Math::BigInt->new("0"); $x->bsgn(); ok 862 - is a valid object ok 863 - $x = Math::BigInt->new("+123456789"); $x->bsgn(); ok 864 - is a valid object ok 865 - $x = Math::BigInt->new("-123456789"); $x->bsgn(); ok 866 - is a valid object ok 867 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("invalid"); $x->bcmp($y); ok 868 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 869 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("invalid"); $x->bcmp($y); ok 870 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 871 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 872 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 873 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 874 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 875 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 876 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 877 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 878 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 879 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 880 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 881 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 882 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 883 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 884 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 885 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 886 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 887 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 888 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 889 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 890 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 891 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 892 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 893 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 894 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 895 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 896 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 897 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 898 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 899 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 900 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 901 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 902 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 903 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 904 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 905 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 906 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 907 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 908 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 909 - $x = Math::BigInt->new("abc"); $x->binc(); ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("+0"); $x->binc(); ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("+1"); $x->binc(); ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("-1"); $x->binc(); ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x->badd($y); ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->badd($y); ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->badd($y); ok 946 - is a valid object ok 947 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $x->badd($y); ok 950 - is a valid object ok 951 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("invalid"); $x->badd($y); ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("invalid"); $x->badd($y); ok 954 - is a valid object ok 955 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->badd($y); ok 956 - is a valid object ok 957 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 958 - is a valid object ok 959 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->badd($y); ok 960 - is a valid object ok 961 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->badd($y); ok 962 - is a valid object ok 963 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->badd($y); ok 964 - is a valid object ok 965 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 966 - is a valid object ok 967 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 968 - is a valid object ok 969 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 970 - is a valid object ok 971 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 972 - is a valid object ok 973 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 974 - is a valid object ok 975 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 976 - is a valid object ok 977 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 978 - is a valid object ok 979 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 980 - is a valid object ok 981 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 982 - is a valid object ok 983 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 984 - is a valid object ok 985 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 986 - is a valid object ok 987 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->badd($y); ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->badd($y); ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->badd($y); ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->badd($y); ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10001"); $x->badd($y); ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100001"); $x->badd($y); ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000001"); $x->badd($y); ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000001"); $x->badd($y); ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000001"); $x->badd($y); ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000001"); $x->badd($y); ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000001"); $x->badd($y); ok 1036 - is a valid object ok 1037 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("100000000001"); $x->badd($y); ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1000000000001"); $x->badd($y); ok 1040 - is a valid object ok 1041 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("10000000000001"); $x->badd($y); ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10001"); $x->badd($y); ok 1044 - is a valid object ok 1045 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100001"); $x->badd($y); ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000001"); $x->badd($y); ok 1048 - is a valid object ok 1049 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000001"); $x->badd($y); ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000001"); $x->badd($y); ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000001"); $x->badd($y); ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000001"); $x->badd($y); ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-100000000001"); $x->badd($y); ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1000000000001"); $x->badd($y); ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-10000000000001"); $x->badd($y); ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1064 - is a valid object ok 1065 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bsub($y); ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1070 - is a valid object ok 1071 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bsub($y); ok 1074 - is a valid object ok 1075 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bsub($y); ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1078 - is a valid object ok 1079 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1082 - is a valid object ok 1083 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x->bsub($y); ok 1086 - is a valid object ok 1087 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1090 - is a valid object ok 1091 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1094 - is a valid object ok 1095 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1098 - is a valid object ok 1099 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1104 - is a valid object ok 1105 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1108 - is a valid object ok 1109 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1112 - is a valid object ok 1113 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x->bsub($y); ok 1116 - is a valid object ok 1117 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bsub($y); ok 1140 - is a valid object ok 1141 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bsub($y); ok 1144 - is a valid object ok 1145 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1148 - is a valid object ok 1149 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1152 - is a valid object ok 1153 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1156 - is a valid object ok 1157 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1160 - is a valid object ok 1161 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("1"); $x->bsub($y); ok 1164 - is a valid object ok 1165 - $x = Math::BigInt->new("10001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("100001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt->new("1000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("10000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt->new("100000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("1000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt->new("10000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("100000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt->new("1000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("10000000000001"); $y = Math::BigInt->new("-1"); $x->bsub($y); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("abc"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt->new("invalid"); $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("invalid"); $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("-inf"); $y = Math::BigInt->new("invalid"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("invalid"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1204 - is a valid object ok 1205 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $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("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("+0"); $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("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("+0"); $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("+0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1240 - is a valid object ok 1241 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1242 - is a valid object ok 1243 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1244 - is a valid object ok 1245 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1246 - is a valid object ok 1247 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1248 - is a valid object ok 1249 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1258 - is a valid object ok 1259 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1260 - is a valid object ok 1261 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1262 - is a valid object ok 1263 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1264 - is a valid object ok 1265 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1266 - is a valid object ok 1267 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("0"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("11111111111"); $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("22222222222"); $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("33333333333"); $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("44444444444"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $z = Math::BigInt->new("1"); $x->bmuladd($y, $z); ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("-5"); $x->bmuladd($y, $z); ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-4"); $z = Math::BigInt->new("5"); $x->bmuladd($y, $z); ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $z = Math::BigInt->new("1234567890"); $x->bmuladd($y, $z); ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x->bmul($y); ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("invalid"); $x->bmul($y); ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("invalid"); $x->bmul($y); ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bmul($y); ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bmul($y); ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x->bmul($y); ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("+0"); $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("+0"); $x->bmul($y); ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("+0"); $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("+0"); $x->bmul($y); ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x->bmul($y); ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x->bmul($y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bmul($y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x->bmul($y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x->bmul($y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bmul($y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x->bmul($y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x->bmul($y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x->bmul($y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x->bmul($y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x->bmul($y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x->bmul($y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x->bmul($y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x->bmul($y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x->bmul($y); ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x->bmul($y); ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x->bmul($y); ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x->bmul($y); ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x->bmul($y); ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x->bmul($y); ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x->bmul($y); ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x->bmul($y); ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x->bmul($y); ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x->bmul($y); ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x->bmul($y); ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x->bmul($y); ok 1410 - is a valid object ok 1411 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x->bmul($y); ok 1412 - is a valid object ok 1413 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x->bmul($y); ok 1414 - is a valid object ok 1415 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x->bmul($y); ok 1416 - is a valid object ok 1417 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x->bmul($y); ok 1418 - is a valid object ok 1419 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x->bmul($y); ok 1420 - is a valid object ok 1421 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt->new("-2"); $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("0"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1474 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1475 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1476 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 1477 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 1478 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join(",", $x->bdiv($y)); ok 1479 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join(",", $x->bdiv($y)); ok 1480 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 1481 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 1482 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); join(",", $x->bdiv($y)); ok 1483 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); join(",", $x->bdiv($y)); ok 1484 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); join(",", $x->bdiv($y)); ok 1485 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); join(",", $x->bdiv($y)); ok 1486 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); join(",", $x->bdiv($y)); ok 1487 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); join(",", $x->bdiv($y)); ok 1488 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); join(",", $x->bdiv($y)); ok 1489 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); join(",", $x->bdiv($y)); ok 1490 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); join(",", $x->bdiv($y)); ok 1491 - $x = Math::BigInt->new("1267650600228229401496703205375"); $y = Math::BigInt->new("1267650600228229401496703205376"); join(",", $x->bdiv($y)); ok 1492 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); join(",", $x->bdiv($y)); ok 1493 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); join(",", $x->bdiv($y)); ok 1494 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); join(",", $x->bdiv($y)); ok 1495 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); join(",", $x->bdiv($y)); ok 1496 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); join(",", $x->bdiv($y)); ok 1497 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); join(",", $x->bdiv($y)); ok 1498 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); join(",", $x->bdiv($y)); ok 1499 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); join(",", $x->bdiv($y)); ok 1500 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); join(",", $x->bdiv($y)); ok 1501 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); join(",", $x->bdiv($y)); ok 1502 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1503 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1504 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("2000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1505 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1506 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1507 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1508 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1509 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1510 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1511 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1512 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1513 - is a valid object ok 1514 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1515 - is a valid object ok 1516 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1517 - is a valid object ok 1518 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1519 - is a valid object ok 1520 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->bdiv($y); ok 1521 - is a valid object ok 1522 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1523 - is a valid object ok 1524 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1525 - is a valid object ok 1526 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1527 - is a valid object ok 1528 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1529 - is a valid object ok 1530 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1531 - is a valid object ok 1532 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1533 - is a valid object ok 1534 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1535 - is a valid object ok 1536 - $x = Math::BigInt->new("-inf"); $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("inf"); $x->bdiv($y); ok 1539 - is a valid object ok 1540 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1541 - is a valid object ok 1542 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bdiv($y); ok 1543 - is a valid object ok 1544 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1545 - is a valid object ok 1546 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1547 - is a valid object ok 1548 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bdiv($y); ok 1549 - is a valid object ok 1550 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->bdiv($y); ok 1551 - is a valid object ok 1552 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->bdiv($y); ok 1553 - is a valid object ok 1554 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1555 - is a valid object ok 1556 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1557 - is a valid object ok 1558 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1559 - is a valid object ok 1560 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x->bdiv($y); ok 1561 - is a valid object ok 1562 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1563 - is a valid object ok 1564 - $x = Math::BigInt->new("0"); $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("1"); $x->bdiv($y); ok 1567 - is a valid object ok 1568 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1569 - is a valid object ok 1570 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bdiv($y); ok 1571 - is a valid object ok 1572 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1573 - is a valid object ok 1574 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bdiv($y); ok 1575 - is a valid object ok 1576 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 1577 - is a valid object ok 1578 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("26"); $x->bdiv($y); ok 1579 - is a valid object ok 1580 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1581 - is a valid object ok 1582 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1583 - is a valid object ok 1584 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1585 - is a valid object ok 1586 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1587 - is a valid object ok 1588 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1589 - is a valid object ok 1590 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1591 - is a valid object ok 1592 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1593 - is a valid object ok 1594 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1595 - is a valid object ok 1596 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1597 - is a valid object ok 1598 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x->bdiv($y); ok 1599 - is a valid object ok 1600 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x->bdiv($y); ok 1601 - is a valid object ok 1602 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x->bdiv($y); ok 1603 - is a valid object ok 1604 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1605 - is a valid object ok 1606 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x->bdiv($y); ok 1607 - is a valid object ok 1608 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x->bdiv($y); ok 1609 - is a valid object ok 1610 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x->bdiv($y); ok 1611 - is a valid object ok 1612 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x->bdiv($y); ok 1613 - is a valid object ok 1614 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x->bdiv($y); ok 1615 - is a valid object ok 1616 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x->bdiv($y); ok 1617 - is a valid object ok 1618 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x->bdiv($y); ok 1619 - is a valid object ok 1620 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x->bdiv($y); ok 1621 - is a valid object ok 1622 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1623 - is a valid object ok 1624 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x->bdiv($y); ok 1625 - is a valid object ok 1626 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1627 - is a valid object ok 1628 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1629 - is a valid object ok 1630 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1631 - is a valid object ok 1632 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1633 - is a valid object ok 1634 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1635 - is a valid object ok 1636 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1637 - is a valid object ok 1638 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1639 - is a valid object ok 1640 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1641 - is a valid object ok 1642 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1643 - is a valid object ok 1644 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1645 - is a valid object ok 1646 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1647 - is a valid object ok 1648 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1649 - is a valid object ok 1650 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x->bdiv($y); ok 1651 - is a valid object ok 1652 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x->bdiv($y); ok 1653 - is a valid object ok 1654 - $x = Math::BigInt->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt->new("10000000375084540248994272022843165711074"); $x->bdiv($y); ok 1655 - is a valid object ok 1656 - $x = Math::BigInt->new("1234567812345678"); $y = Math::BigInt->new("123456712345678"); $x->bdiv($y); ok 1657 - is a valid object ok 1658 - $x = Math::BigInt->new("12345671234567"); $y = Math::BigInt->new("1234561234567"); $x->bdiv($y); ok 1659 - is a valid object ok 1660 - $x = Math::BigInt->new("123456123456"); $y = Math::BigInt->new("12345123456"); $x->bdiv($y); ok 1661 - is a valid object ok 1662 - $x = Math::BigInt->new("1234512345"); $y = Math::BigInt->new("123412345"); $x->bdiv($y); ok 1663 - is a valid object ok 1664 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1665 - is a valid object ok 1666 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("1234567890"); $x->bdiv($y); ok 1667 - is a valid object ok 1668 - $x = Math::BigInt->new("1234567890999999999"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1669 - is a valid object ok 1670 - $x = Math::BigInt->new("1234567890000000000"); $y = Math::BigInt->new("9876543210"); $x->bdiv($y); ok 1671 - is a valid object ok 1672 - $x = Math::BigInt->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt->new("484848484848484848484848486666666666666689898989898989898989"); $x->bdiv($y); ok 1673 - is a valid object ok 1674 - $x = Math::BigInt->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1675 - is a valid object ok 1676 - $x = Math::BigInt->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1677 - is a valid object ok 1678 - $x = Math::BigInt->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1679 - is a valid object ok 1680 - $x = Math::BigInt->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1681 - is a valid object ok 1682 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("999999999999999999999999999999999"); $x->bdiv($y); ok 1683 - is a valid object ok 1684 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("888888888888888888888888888888888"); $x->bdiv($y); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("777777777777777777777777777777777"); $x->bdiv($y); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("666666666666666666666666666666666"); $x->bdiv($y); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("555555555555555555555555555555555"); $x->bdiv($y); ok 1691 - is a valid object ok 1692 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("444444444444444444444444444444444"); $x->bdiv($y); ok 1693 - is a valid object ok 1694 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("333333333333333333333333333333333"); $x->bdiv($y); ok 1695 - is a valid object ok 1696 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("222222222222222222222222222222222"); $x->bdiv($y); ok 1697 - is a valid object ok 1698 - $x = Math::BigInt->new("999999999999999999999999999999999"); $y = Math::BigInt->new("111111111111111111111111111111111"); $x->bdiv($y); ok 1699 - is a valid object ok 1700 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_3333333_3333333_3333333"); $x->bdiv($y); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("3333333_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("3000000_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("2000000_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("1000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1709 - is a valid object ok 1710 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100000_0000000_0000000_0000000"); $x->bdiv($y); ok 1711 - is a valid object ok 1712 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10000_0000000_0000000_0000000"); $x->bdiv($y); ok 1713 - is a valid object ok 1714 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1000_0000000_0000000_0000000"); $x->bdiv($y); ok 1715 - is a valid object ok 1716 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("100_0000000_0000000_0000000"); $x->bdiv($y); ok 1717 - is a valid object ok 1718 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("10_0000000_0000000_0000000"); $x->bdiv($y); ok 1719 - is a valid object ok 1720 - $x = Math::BigInt->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt->new("1_0000000_0000000_0000000"); $x->bdiv($y); ok 1721 - is a valid object ok 1722 - $x = Math::BigInt->new("949418181818187070707070707070707070"); $y = Math::BigInt->new("181818181853535353535353535353535353"); $x->bdiv($y); ok 1723 - is a valid object ok 1724 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1725 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1726 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1727 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1728 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join (",", $x->btdiv($y)); ok 1729 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1730 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1731 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1732 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1733 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1734 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1735 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1736 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1737 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1738 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1739 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join (",", $x->btdiv($y)); ok 1740 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1741 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1742 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join (",", $x->btdiv($y)); ok 1743 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1744 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1745 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1746 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1747 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1748 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1749 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1750 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1751 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1752 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1753 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1754 - $x = Math::BigInt->new("-2"); $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("0"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1762 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1763 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1764 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1765 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1766 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1767 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1768 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1769 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1770 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1771 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1772 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1773 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1774 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1775 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1776 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1777 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1778 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1779 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); join (",", $x->btdiv($y)); ok 1780 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); join (",", $x->btdiv($y)); ok 1781 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); join (",", $x->btdiv($y)); ok 1782 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); join (",", $x->btdiv($y)); ok 1783 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); join (",", $x->btdiv($y)); ok 1784 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join (",", $x->btdiv($y)); ok 1785 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x->btdiv($y); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt->new("-inf"); $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("inf"); $x->btdiv($y); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->btdiv($y); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->btdiv($y); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-5"); $x->btdiv($y); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-2"); $x->btdiv($y); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-1"); $x->btdiv($y); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->btdiv($y); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->btdiv($y); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->btdiv($y); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $x->bmodinv($y); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-5"); $x->bmodinv($y); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5033"); $x->bmodinv($y); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt->new("-1234567891"); $y = Math::BigInt->new("13"); $x->bmodinv($y); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt->new("2348249874968739"); $x->bmodinv($y); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmodinv($y); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmodinv($y); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmodinv($y); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bmodinv($y); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmodinv($y); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x->bmodinv($y); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("abc"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("abc"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("0"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("2"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("5"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2102 - is a valid object ok 2103 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2104 - is a valid object ok 2105 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2106 - is a valid object ok 2107 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2108 - is a valid object ok 2109 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2110 - is a valid object ok 2111 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2112 - is a valid object ok 2113 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2116 - is a valid object ok 2117 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2118 - is a valid object ok 2119 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2120 - is a valid object ok 2121 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2122 - is a valid object ok 2123 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2124 - is a valid object ok 2125 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2126 - is a valid object ok 2127 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2130 - is a valid object ok 2131 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2132 - is a valid object ok 2133 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2134 - is a valid object ok 2135 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2136 - is a valid object ok 2137 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2138 - is a valid object ok 2139 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2140 - is a valid object ok 2141 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2144 - is a valid object ok 2145 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2146 - is a valid object ok 2147 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2148 - is a valid object ok 2149 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2150 - is a valid object ok 2151 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2152 - is a valid object ok 2153 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2154 - is a valid object ok 2155 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2158 - is a valid object ok 2159 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2160 - is a valid object ok 2161 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2162 - is a valid object ok 2163 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2164 - is a valid object ok 2165 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2166 - is a valid object ok 2167 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2168 - is a valid object ok 2169 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2172 - is a valid object ok 2173 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2174 - is a valid object ok 2175 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2176 - is a valid object ok 2177 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2178 - is a valid object ok 2179 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2180 - is a valid object ok 2181 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2182 - is a valid object ok 2183 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2186 - is a valid object ok 2187 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2188 - is a valid object ok 2189 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2190 - is a valid object ok 2191 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2192 - is a valid object ok 2193 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2194 - is a valid object ok 2195 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("3"); $x->bmodpow($y, $z); ok 2196 - is a valid object ok 2197 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2200 - is a valid object ok 2201 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2202 - is a valid object ok 2203 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2204 - is a valid object ok 2205 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2206 - is a valid object ok 2207 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2208 - is a valid object ok 2209 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2210 - is a valid object ok 2211 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2214 - is a valid object ok 2215 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2216 - is a valid object ok 2217 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2218 - is a valid object ok 2219 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2220 - is a valid object ok 2221 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2222 - is a valid object ok 2223 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2224 - is a valid object ok 2225 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2228 - is a valid object ok 2229 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2230 - is a valid object ok 2231 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2232 - is a valid object ok 2233 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2234 - is a valid object ok 2235 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2236 - is a valid object ok 2237 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("0"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2238 - is a valid object ok 2239 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2242 - is a valid object ok 2243 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2244 - is a valid object ok 2245 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2246 - is a valid object ok 2247 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2248 - is a valid object ok 2249 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2250 - is a valid object ok 2251 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2252 - is a valid object ok 2253 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2256 - is a valid object ok 2257 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2258 - is a valid object ok 2259 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2260 - is a valid object ok 2261 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2262 - is a valid object ok 2263 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2264 - is a valid object ok 2265 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2266 - is a valid object ok 2267 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2270 - is a valid object ok 2271 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2272 - is a valid object ok 2273 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2274 - is a valid object ok 2275 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2276 - is a valid object ok 2277 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2278 - is a valid object ok 2279 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2280 - is a valid object ok 2281 - $x = Math::BigInt->new("-2"); $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("-1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2284 - is a valid object ok 2285 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2286 - is a valid object ok 2287 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2292 - is a valid object ok 2293 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $z = Math::BigInt->new("4"); $x->bmodpow($y, $z); ok 2294 - is a valid object ok 2295 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("16"); $x->bmodpow($y, $z); ok 2296 - is a valid object ok 2297 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $z = Math::BigInt->new("5033"); $x->bmodpow($y, $z); ok 2298 - is a valid object ok 2299 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("7"); $z = Math::BigInt->new("5032"); $x->bmodpow($y, $z); ok 2300 - is a valid object ok 2301 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("8"); $z = Math::BigInt->new("-5"); $x->bmodpow($y, $z); ok 2302 - is a valid object ok 2303 - $x = Math::BigInt->new("1e50"); $y = Math::BigInt->new("1"); $z = Math::BigInt->new("1"); $x->bmodpow($y, $z); ok 2304 - is a valid object ok 2305 - $x = Math::BigInt->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2306 - is a valid object ok 2307 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2308 - is a valid object ok 2309 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $z = Math::BigInt->new("13"); $x->bmodpow($y, $z); ok 2310 - is a valid object ok 2311 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2312 - is a valid object ok 2313 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x % $y; ok 2314 - is a valid object ok 2315 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 2316 - is a valid object ok 2317 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("0"); $x % $y; ok 2318 - is a valid object ok 2319 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 2320 - is a valid object ok 2321 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2322 - is a valid object ok 2323 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2324 - is a valid object ok 2325 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2326 - is a valid object ok 2327 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2328 - is a valid object ok 2329 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2330 - is a valid object ok 2331 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 2332 - is a valid object ok 2333 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 2334 - is a valid object ok 2335 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 2336 - is a valid object ok 2337 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2338 - is a valid object ok 2339 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 2340 - is a valid object ok 2341 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 2342 - is a valid object ok 2343 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2344 - is a valid object ok 2345 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2346 - is a valid object ok 2347 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 2348 - is a valid object ok 2349 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 2350 - is a valid object ok 2351 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 2352 - is a valid object ok 2353 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 2354 - is a valid object ok 2355 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("9"); $x % $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("9"); $x % $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("9"); $x % $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("9"); $x % $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("9"); $x % $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("9"); $x % $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("9"); $x % $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("9"); $x % $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("10"); $x % $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("10"); $x % $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("10"); $x % $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("10"); $x % $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("10"); $x % $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("10"); $x % $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("10"); $x % $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("10"); $x % $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("113"); $x % $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("113"); $x % $y; ok 2478 - is a valid object ok 2479 - $x = Math::BigInt->new("12345678"); $y = Math::BigInt->new("113"); $x % $y; ok 2480 - is a valid object ok 2481 - $x = Math::BigInt->new("1234567891"); $y = Math::BigInt->new("113"); $x % $y; ok 2482 - is a valid object ok 2483 - $x = Math::BigInt->new("123456789123"); $y = Math::BigInt->new("113"); $x % $y; ok 2484 - is a valid object ok 2485 - $x = Math::BigInt->new("12345678912345"); $y = Math::BigInt->new("113"); $x % $y; ok 2486 - is a valid object ok 2487 - $x = Math::BigInt->new("1234567891234567"); $y = Math::BigInt->new("113"); $x % $y; ok 2488 - is a valid object ok 2489 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("113"); $x % $y; ok 2490 - is a valid object ok 2491 - $x = Math::BigInt->new("-629"); $y = Math::BigInt->new("5033"); $x % $y; ok 2492 - is a valid object ok 2493 - $x = Math::BigInt->new("111111111111111111111111111111"); $y = Math::BigInt->new("111111111111111111111111111111"); $x % $y; ok 2494 - is a valid object ok 2495 - $x = Math::BigInt->new("12345678901234567890"); $y = Math::BigInt->new("12345678901234567890"); $x % $y; ok 2496 - is a valid object ok 2497 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("12"); Math::BigInt->bgcd($x, $y); ok 2498 - is a valid object ok 2499 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->bgcd($x, $y); ok 2500 - is a valid object ok 2501 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); Math::BigInt->bgcd($x, $y); ok 2502 - is a valid object ok 2503 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2504 - is a valid object ok 2505 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); Math::BigInt->bgcd($x, $y); ok 2506 - is a valid object ok 2507 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2508 - is a valid object ok 2509 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); Math::BigInt->bgcd($x, $y); ok 2510 - is a valid object ok 2511 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt->bgcd($x, $y); ok 2512 - is a valid object ok 2513 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2514 - is a valid object ok 2515 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt->bgcd($x, $y); ok 2516 - is a valid object ok 2517 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2518 - is a valid object ok 2519 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt->bgcd($x, $y); ok 2520 - is a valid object ok 2521 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt->bgcd($x, $y); ok 2522 - is a valid object ok 2523 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt->bgcd($x, $y); ok 2524 - is a valid object ok 2525 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt->bgcd($x, $y); ok 2526 - is a valid object ok 2527 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt->bgcd($x, $y); ok 2528 - is a valid object ok 2529 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt->bgcd($x, $y); ok 2530 - is a valid object ok 2531 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); Math::BigInt->bgcd($x, $y); ok 2532 - is a valid object ok 2533 - $x = Math::BigInt->new("-144"); $y = Math::BigInt->new("-60"); Math::BigInt->bgcd($x, $y); ok 2534 - is a valid object ok 2535 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("-60"); Math::BigInt->bgcd($x, $y); ok 2536 - is a valid object ok 2537 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("60"); Math::BigInt->bgcd($x, $y); ok 2538 - is a valid object ok 2539 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt->bgcd($x, $y); ok 2540 - is a valid object ok 2541 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt->bgcd($x, $y); ok 2542 - is a valid object ok 2543 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt->bgcd($x, $y); ok 2544 - is a valid object ok 2545 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt->bgcd($x, $y, $z); ok 2546 - is a valid object ok 2547 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt->bgcd($x, $y, $z); ok 2548 - is a valid object ok 2549 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt->blcm($x, $y); ok 2550 - is a valid object ok 2551 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2552 - is a valid object ok 2553 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt->blcm($x, $y); ok 2554 - is a valid object ok 2555 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2556 - is a valid object ok 2557 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt->blcm($x, $y); ok 2558 - is a valid object ok 2559 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt->blcm($x, $y); ok 2560 - is a valid object ok 2561 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt->blcm($x, $y); ok 2562 - is a valid object ok 2563 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt->blcm($x, $y); ok 2564 - is a valid object ok 2565 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt->new("281474976710656"); $y = Math::BigInt->new("-1"); $x & $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x & $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x & $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 2626 - is a valid object ok 2627 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 2628 - is a valid object ok 2629 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 2630 - is a valid object ok 2631 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 2632 - is a valid object ok 2633 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 2634 - is a valid object ok 2635 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 2636 - is a valid object ok 2637 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 2638 - is a valid object ok 2639 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 2640 - is a valid object ok 2641 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 2642 - is a valid object ok 2643 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 2644 - is a valid object ok 2645 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 2646 - is a valid object ok 2647 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 2648 - is a valid object ok 2649 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 2650 - is a valid object ok 2651 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 2652 - is a valid object ok 2653 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 2654 - is a valid object ok 2655 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 2656 - is a valid object ok 2657 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 2658 - is a valid object ok 2659 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("-1"); $x | $y; ok 2660 - is a valid object ok 2661 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x | $y; ok 2662 - is a valid object ok 2663 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x | $y; ok 2664 - is a valid object ok 2665 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x | $y; ok 2666 - is a valid object ok 2667 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x | $y; ok 2668 - is a valid object ok 2669 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2670 - is a valid object ok 2671 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2672 - is a valid object ok 2673 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2674 - is a valid object ok 2675 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2676 - is a valid object ok 2677 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2678 - is a valid object ok 2679 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 2680 - is a valid object ok 2681 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 2682 - is a valid object ok 2683 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 2684 - is a valid object ok 2685 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 2686 - is a valid object ok 2687 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 2688 - is a valid object ok 2689 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2690 - is a valid object ok 2691 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2692 - is a valid object ok 2693 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2694 - is a valid object ok 2695 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2696 - is a valid object ok 2697 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 2698 - is a valid object ok 2699 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 2700 - is a valid object ok 2701 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2702 - is a valid object ok 2703 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 2704 - is a valid object ok 2705 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2706 - is a valid object ok 2707 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 2708 - is a valid object ok 2709 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 2710 - is a valid object ok 2711 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2712 - is a valid object ok 2713 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 2714 - is a valid object ok 2715 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 2716 - is a valid object ok 2717 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2718 - is a valid object ok 2719 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 2720 - is a valid object ok 2721 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 2722 - is a valid object ok 2723 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2724 - is a valid object ok 2725 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 2726 - is a valid object ok 2727 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2728 - is a valid object ok 2729 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 2730 - is a valid object ok 2731 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2732 - is a valid object ok 2733 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2734 - is a valid object ok 2735 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 2736 - is a valid object ok 2737 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 2738 - is a valid object ok 2739 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 2740 - is a valid object ok 2741 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2742 - is a valid object ok 2743 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 2744 - is a valid object ok 2745 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 2746 - is a valid object ok 2747 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2748 - is a valid object ok 2749 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 2750 - is a valid object ok 2751 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 2752 - is a valid object ok 2753 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 2754 - is a valid object ok 2755 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 2756 - is a valid object ok 2757 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2758 - is a valid object ok 2759 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 2760 - is a valid object ok 2761 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 2762 - is a valid object ok 2763 - $x = Math::BigInt->new("30"); $y = Math::BigInt->new("-4"); $x ^ $y; ok 2764 - is a valid object ok 2765 - $x = Math::BigInt->new("300"); $y = Math::BigInt->new("-76"); $x ^ $y; ok 2766 - is a valid object ok 2767 - $x = Math::BigInt->new("-76"); $y = Math::BigInt->new("300"); $x ^ $y; ok 2768 - is a valid object ok 2769 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2770 - is a valid object ok 2771 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2772 - is a valid object ok 2773 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2774 - is a valid object ok 2775 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2776 - is a valid object ok 2777 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2778 - is a valid object ok 2779 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 2780 - is a valid object ok 2781 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 2782 - is a valid object ok 2783 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 2784 - is a valid object ok 2785 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 2786 - is a valid object ok 2787 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2788 - is a valid object ok 2789 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2790 - is a valid object ok 2791 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2792 - is a valid object ok 2793 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2794 - is a valid object ok 2795 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2796 - is a valid object ok 2797 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 2798 - is a valid object ok 2799 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 2800 - is a valid object ok 2801 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2802 - is a valid object ok 2803 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 2804 - is a valid object ok 2805 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2806 - is a valid object ok 2807 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 2808 - is a valid object ok 2809 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 2810 - is a valid object ok 2811 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2812 - is a valid object ok 2813 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 2814 - is a valid object ok 2815 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 2816 - is a valid object ok 2817 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2818 - is a valid object ok 2819 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 2820 - is a valid object ok 2821 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 2822 - is a valid object ok 2823 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2824 - is a valid object ok 2825 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2826 - is a valid object ok 2827 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2828 - is a valid object ok 2829 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 2830 - is a valid object ok 2831 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 2832 - is a valid object ok 2833 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 2834 - is a valid object ok 2835 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 2836 - is a valid object ok 2837 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 2838 - is a valid object ok 2839 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 2840 - is a valid object ok 2841 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 2842 - is a valid object ok 2843 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2844 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2845 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2846 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2847 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2848 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2849 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2850 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2851 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2852 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2853 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2854 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x->digit($y); ok 2855 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("3"); $x->digit($y); ok 2856 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); $x->digit($y); ok 2857 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); $x->digit($y); ok 2858 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-1"); $x->digit($y); ok 2859 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-2"); $x->digit($y); ok 2860 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2861 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("-3"); $x->digit($y); ok 2862 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("0"); $x->digit($y); ok 2863 - $x = Math::BigInt->new("100000"); $y = Math::BigInt->new("1"); $x->digit($y); ok 2864 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 2865 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 2866 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 2867 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 2868 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 2869 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 2870 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 2871 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 2872 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 2873 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 2874 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 2875 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 2876 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 2877 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 2878 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 2879 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 2880 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 2881 - $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 2882 - $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 2883 - $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 2884 - $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 2885 - $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 2886 - $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 2887 - $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 2888 - $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 2889 - $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 2890 - $x = Math::BigInt->new("NaN"); $x->bfac(); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt->new("+inf"); $x->bfac(); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt->new("-inf"); $x->bfac(); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt->new("-1"); $x->bfac(); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt->new("0"); $x->bfac(); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt->new("1"); $x->bfac(); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt->new("2"); $x->bfac(); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt->new("3"); $x->bfac(); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt->new("4"); $x->bfac(); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt->new("5"); $x->bfac(); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt->new("6"); $x->bfac(); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt->new("7"); $x->bfac(); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt->new("8"); $x->bfac(); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt->new("9"); $x->bfac(); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt->new("10"); $x->bfac(); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt->new("11"); $x->bfac(); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt->new("12"); $x->bfac(); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt->new("20"); $x->bfac(); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt->new("22"); $x->bfac(); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt->new("69"); $x->bfac(); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt->new("NaN"); $x->bdfac(); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt->new("+inf"); $x->bdfac(); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt->new("-inf"); $x->bdfac(); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt->new("-2"); $x->bdfac(); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt->new("-1"); $x->bdfac(); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt->new("0"); $x->bdfac(); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt->new("1"); $x->bdfac(); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt->new("2"); $x->bdfac(); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt->new("3"); $x->bdfac(); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt->new("4"); $x->bdfac(); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt->new("5"); $x->bdfac(); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt->new("6"); $x->bdfac(); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt->new("7"); $x->bdfac(); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt->new("8"); $x->bdfac(); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt->new("9"); $x->bdfac(); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt->new("10"); $x->bdfac(); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt->new("11"); $x->bdfac(); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt->new("12"); $x->bdfac(); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt->new("NaN"); $x->btfac(); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt->new("+inf"); $x->btfac(); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt->new("-inf"); $x->btfac(); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt->new("-3"); $x->btfac(); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt->new("-2"); $x->btfac(); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt->new("-1"); $x->btfac(); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt->new("0"); $x->btfac(); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt->new("1"); $x->btfac(); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt->new("2"); $x->btfac(); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt->new("3"); $x->btfac(); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt->new("4"); $x->btfac(); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt->new("5"); $x->btfac(); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt->new("6"); $x->btfac(); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt->new("7"); $x->btfac(); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt->new("8"); $x->btfac(); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt->new("9"); $x->btfac(); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt->new("10"); $x->btfac(); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt->new("11"); $x->btfac(); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt->new("12"); $x->btfac(); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("-inf"); $x->bmfac($y); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("-1"); $x->bmfac($y); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bmfac($y); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("inf"); $x->bmfac($y); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("NaN"); $x->bmfac($y); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("1"); $x->bmfac($y); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x->bmfac($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x->bmfac($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x->bmfac($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3165 - is a valid object ok 3166 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3167 - is a valid object ok 3168 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3169 - is a valid object ok 3170 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3171 - is a valid object ok 3172 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3173 - is a valid object ok 3174 - $x = Math::BigInt->new("6"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3175 - is a valid object ok 3176 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3177 - is a valid object ok 3178 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3179 - is a valid object ok 3180 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3181 - is a valid object ok 3182 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x->bmfac($y); ok 3183 - is a valid object ok 3184 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 3185 - is a valid object ok 3186 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 3187 - is a valid object ok 3188 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3189 - is a valid object ok 3190 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3191 - is a valid object ok 3192 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3193 - is a valid object ok 3194 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3195 - is a valid object ok 3196 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 3197 - is a valid object ok 3198 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x ** $y; ok 3199 - is a valid object ok 3200 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 3201 - is a valid object ok 3202 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("3"); $x ** $y; ok 3203 - is a valid object ok 3204 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3205 - is a valid object ok 3206 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3207 - is a valid object ok 3208 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3209 - is a valid object ok 3210 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3211 - is a valid object ok 3212 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3213 - is a valid object ok 3214 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3215 - is a valid object ok 3216 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("0"); $x ** $y; ok 3217 - is a valid object ok 3218 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("1"); $x ** $y; ok 3219 - is a valid object ok 3220 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3221 - is a valid object ok 3222 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3223 - is a valid object ok 3224 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3225 - is a valid object ok 3226 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3227 - is a valid object ok 3228 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3229 - is a valid object ok 3230 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3231 - is a valid object ok 3232 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3233 - is a valid object ok 3234 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3235 - is a valid object ok 3236 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3237 - is a valid object ok 3238 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("1"); $x ** $y; ok 3239 - is a valid object ok 3240 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3241 - is a valid object ok 3242 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3243 - is a valid object ok 3244 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3245 - is a valid object ok 3246 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3247 - is a valid object ok 3248 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3249 - is a valid object ok 3250 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3251 - is a valid object ok 3252 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3253 - is a valid object ok 3254 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3255 - is a valid object ok 3256 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3257 - is a valid object ok 3258 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3259 - is a valid object ok 3260 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3261 - is a valid object ok 3262 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3263 - is a valid object ok 3264 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3265 - is a valid object ok 3266 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3267 - is a valid object ok 3268 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3269 - is a valid object ok 3270 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3271 - is a valid object ok 3272 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3273 - is a valid object ok 3274 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3275 - is a valid object ok 3276 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 3277 - is a valid object ok 3278 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 3279 - is a valid object ok 3280 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 3281 - is a valid object ok 3282 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("3"); $x ** $y; ok 3283 - is a valid object ok 3284 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3285 - is a valid object ok 3286 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3287 - is a valid object ok 3288 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3289 - is a valid object ok 3290 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3291 - is a valid object ok 3292 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3293 - is a valid object ok 3294 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3295 - is a valid object ok 3296 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 3297 - is a valid object ok 3298 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 3299 - is a valid object ok 3300 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 3301 - is a valid object ok 3302 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 3303 - is a valid object ok 3304 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3305 - is a valid object ok 3306 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3307 - is a valid object ok 3308 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3309 - is a valid object ok 3310 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3311 - is a valid object ok 3312 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3313 - is a valid object ok 3314 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3315 - is a valid object ok 3316 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 3317 - is a valid object ok 3318 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 3319 - is a valid object ok 3320 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 3321 - is a valid object ok 3322 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 3323 - is a valid object ok 3324 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3325 - is a valid object ok 3326 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3327 - is a valid object ok 3328 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3329 - is a valid object ok 3330 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3331 - is a valid object ok 3332 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3333 - is a valid object ok 3334 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3335 - is a valid object ok 3336 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("0"); $x ** $y; ok 3337 - is a valid object ok 3338 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("1"); $x ** $y; ok 3339 - is a valid object ok 3340 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x ** $y; ok 3341 - is a valid object ok 3342 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3343 - is a valid object ok 3344 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3345 - is a valid object ok 3346 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3347 - is a valid object ok 3348 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3349 - is a valid object ok 3350 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3351 - is a valid object ok 3352 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3353 - is a valid object ok 3354 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3355 - is a valid object ok 3356 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x ** $y; ok 3357 - is a valid object ok 3358 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x ** $y; ok 3359 - is a valid object ok 3360 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("2"); $x ** $y; ok 3361 - is a valid object ok 3362 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("3"); $x ** $y; ok 3363 - is a valid object ok 3364 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3365 - is a valid object ok 3366 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3367 - is a valid object ok 3368 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x ** $y; ok 3369 - is a valid object ok 3370 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-3"); $x ** $y; ok 3371 - is a valid object ok 3372 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-2"); $x ** $y; ok 3373 - is a valid object ok 3374 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $x ** $y; ok 3375 - is a valid object ok 3376 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x ** $y; ok 3377 - is a valid object ok 3378 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x ** $y; ok 3379 - is a valid object ok 3380 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x ** $y; ok 3381 - is a valid object ok 3382 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("3"); $x ** $y; ok 3383 - is a valid object ok 3384 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x ** $y; ok 3385 - is a valid object ok 3386 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x ** $y; ok 3387 - is a valid object ok 3388 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 3389 - is a valid object ok 3390 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 3391 - is a valid object ok 3392 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 3393 - is a valid object ok 3394 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 3395 - is a valid object ok 3396 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 3397 - is a valid object ok 3398 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 3399 - is a valid object ok 3400 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 3401 - is a valid object ok 3402 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 3403 - is a valid object ok 3404 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 3405 - is a valid object ok 3406 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 3407 - is a valid object ok 3408 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 3409 - is a valid object ok 3410 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 3411 - is a valid object ok 3412 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 3413 - is a valid object ok 3414 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 3415 - is a valid object ok 3416 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 3417 - is a valid object ok 3418 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 3419 - is a valid object ok 3420 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 3421 - is a valid object ok 3422 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 3423 - is a valid object ok 3424 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 3425 - is a valid object ok 3426 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 3427 - is a valid object ok 3428 - $x = Math::BigInt->new("100"); $x->length(); ok 3429 - $x = Math::BigInt->new("10"); $x->length(); ok 3430 - $x = Math::BigInt->new("1"); $x->length(); ok 3431 - $x = Math::BigInt->new("0"); $x->length(); ok 3432 - $x = Math::BigInt->new("12345"); $x->length(); ok 3433 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 3434 - $x = Math::BigInt->new("-123"); $x->length(); ok 3435 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 3436 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3437 - is a valid object ok 3438 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3439 - is a valid object ok 3440 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3441 - is a valid object ok 3442 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3443 - is a valid object ok 3444 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3445 - is a valid object ok 3446 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3447 - is a valid object ok 3448 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3449 - is a valid object ok 3450 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3451 - is a valid object ok 3452 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3453 - is a valid object ok 3454 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3455 - is a valid object ok 3456 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3457 - is a valid object ok 3458 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3459 - is a valid object ok 3460 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3461 - is a valid object ok 3462 - $x = Math::BigInt->new("15241"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3463 - is a valid object ok 3464 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3465 - is a valid object ok 3466 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3467 - is a valid object ok 3468 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3469 - is a valid object ok 3470 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3471 - is a valid object ok 3472 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3473 - is a valid object ok 3474 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3475 - is a valid object ok 3476 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->broot($y); ok 3477 - is a valid object ok 3478 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3479 - is a valid object ok 3480 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("2"); $x->broot($y); ok 3481 - is a valid object ok 3482 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3483 - is a valid object ok 3484 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3485 - is a valid object ok 3486 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("-inf"); $x->broot($y); ok 3487 - is a valid object ok 3488 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("inf"); $x->broot($y); ok 3489 - is a valid object ok 3490 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3491 - is a valid object ok 3492 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3493 - is a valid object ok 3494 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3495 - is a valid object ok 3496 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3497 - is a valid object ok 3498 - $x = Math::BigInt->new("-123.45"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3499 - is a valid object ok 3500 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("0"); $x->broot($y); ok 3501 - is a valid object ok 3502 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3503 - is a valid object ok 3504 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("1"); $x->broot($y); ok 3505 - is a valid object ok 3506 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3507 - is a valid object ok 3508 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("-1"); $x->broot($y); ok 3509 - is a valid object ok 3510 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3511 - is a valid object ok 3512 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("3"); $x->broot($y); ok 3513 - is a valid object ok 3514 - $x = Math::BigInt->new("16"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3515 - is a valid object ok 3516 - $x = Math::BigInt->new("81"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3517 - is a valid object ok 3518 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("4"); $x->broot($y); ok 3519 - is a valid object ok 3520 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("8"); $x->broot($y); ok 3521 - is a valid object ok 3522 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("16"); $x->broot($y); ok 3523 - is a valid object ok 3524 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("32"); $x->broot($y); ok 3525 - is a valid object ok 3526 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("64"); $x->broot($y); ok 3527 - is a valid object ok 3528 - $x = Math::BigInt->new("18446744073709551616"); $y = Math::BigInt->new("128"); $x->broot($y); ok 3529 - is a valid object ok 3530 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $y = Math::BigInt->new("15"); $x->broot($y); ok 3531 - is a valid object ok 3532 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 3533 - is a valid object ok 3534 - $x = Math::BigInt->new("144"); $x->bsqrt(); ok 3535 - is a valid object ok 3536 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 3537 - is a valid object ok 3538 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 3539 - is a valid object ok 3540 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 3541 - is a valid object ok 3542 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 3543 - is a valid object ok 3544 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 3545 - is a valid object ok 3546 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 3547 - is a valid object ok 3548 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 3549 - is a valid object ok 3550 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 3551 - is a valid object ok 3552 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 3553 - is a valid object ok 3554 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 3555 - is a valid object ok 3556 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 3557 - is a valid object ok 3558 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 3559 - is a valid object ok 3560 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 3561 - is a valid object ok 3562 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 3563 - is a valid object ok 3564 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 3565 - is a valid object ok 3566 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 3567 - is a valid object ok 3568 - $x = Math::BigInt->new("18446744073709551616"); $x->bsqrt(); ok 3569 - is a valid object ok 3570 - $x = Math::BigInt->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3571 - is a valid object ok 3572 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 3573 - is a valid object ok 3574 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 3575 - is a valid object ok 3576 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 3577 - is a valid object ok 3578 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 3579 - is a valid object ok 3580 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 3581 - is a valid object ok 3582 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 3583 - is a valid object ok 3584 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 3585 - is a valid object ok 3586 - $x = Math::BigInt->new("NaN"); $x->bexp(); ok 3587 - is a valid object ok 3588 - $x = Math::BigInt->new("inf"); $x->bexp(); ok 3589 - is a valid object ok 3590 - $x = Math::BigInt->new("1"); $x->bexp(); ok 3591 - is a valid object ok 3592 - $x = Math::BigInt->new("2"); $x->bexp(); ok 3593 - is a valid object ok 3594 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3595 - is a valid object ok 3596 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3597 - is a valid object ok 3598 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->batan2($y); ok 3599 - is a valid object ok 3600 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3601 - is a valid object ok 3602 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3603 - is a valid object ok 3604 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3605 - is a valid object ok 3606 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3607 - is a valid object ok 3608 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3609 - is a valid object ok 3610 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x->batan2($y); ok 3611 - is a valid object ok 3612 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3613 - is a valid object ok 3614 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->batan2($y); ok 3615 - is a valid object ok 3616 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3617 - is a valid object ok 3618 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->batan2($y); ok 3619 - is a valid object ok 3620 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3621 - is a valid object ok 3622 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3623 - is a valid object ok 3624 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3625 - is a valid object ok 3626 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3627 - is a valid object ok 3628 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x->batan2($y); ok 3629 - is a valid object ok 3630 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3631 - is a valid object ok 3632 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3633 - is a valid object ok 3634 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3635 - is a valid object ok 3636 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3637 - is a valid object ok 3638 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->batan2($y); ok 3639 - is a valid object ok 3640 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3641 - is a valid object ok 3642 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("5"); $x->batan2($y); ok 3643 - is a valid object ok 3644 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3645 - is a valid object ok 3646 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("8"); $x->batan2($y); ok 3647 - is a valid object ok 3648 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->batan2($y); ok 3649 - is a valid object ok 3650 - $x = Math::BigInt->new("77"); Math::BigInt->bpi($x); ok 3651 - is a valid object ok 3652 - $x = Math::BigInt->new("+0"); Math::BigInt->bpi($x); ok 3653 - is a valid object ok 3654 - $x = Math::BigInt->new("11"); Math::BigInt->bpi($x); ok 3655 - is a valid object ok 3656 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("10"); $x->bnok($y); ok 3657 - is a valid object ok 3658 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3659 - is a valid object ok 3660 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3661 - is a valid object ok 3662 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $x->bnok($y); ok 3663 - is a valid object ok 3664 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3665 - is a valid object ok 3666 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x->bnok($y); ok 3667 - is a valid object ok 3668 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3669 - is a valid object ok 3670 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x->bnok($y); ok 3671 - is a valid object ok 3672 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("3"); $x->bnok($y); ok 3673 - is a valid object ok 3674 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("6"); $x->bnok($y); ok 3675 - is a valid object ok 3676 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("90"); $x->bnok($y); ok 3677 - is a valid object ok 3678 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("95"); $x->bnok($y); ok 3679 - is a valid object ok 3680 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3681 - is a valid object ok 3682 - $x = Math::BigInt->new("7"); $y = Math::BigInt->new("0"); $x->bnok($y); ok 3683 - is a valid object ok 3684 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x->bnok($y); ok 3685 - is a valid object ok 3686 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3687 - is a valid object ok 3688 - $x = Math::BigInt->new("invalid"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3689 - is a valid object ok 3690 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3691 - is a valid object ok 3692 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3693 - is a valid object ok 3694 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3695 - is a valid object ok 3696 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3697 - is a valid object ok 3698 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3699 - is a valid object ok 3700 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3701 - is a valid object ok 3702 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3703 - is a valid object ok 3704 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3705 - is a valid object ok 3706 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3707 - is a valid object ok 3708 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3709 - is a valid object ok 3710 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3711 - is a valid object ok 3712 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3713 - is a valid object ok 3714 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("trunc"); $x->bround($y); ok 3715 - is a valid object ok 3716 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3717 - is a valid object ok 3718 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3719 - is a valid object ok 3720 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3721 - is a valid object ok 3722 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3723 - is a valid object ok 3724 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3725 - is a valid object ok 3726 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3727 - is a valid object ok 3728 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3729 - is a valid object ok 3730 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("zero"); $x->bround($y); ok 3731 - is a valid object ok 3732 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3733 - is a valid object ok 3734 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3735 - is a valid object ok 3736 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3737 - is a valid object ok 3738 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3739 - is a valid object ok 3740 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3741 - is a valid object ok 3742 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3743 - is a valid object ok 3744 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3745 - is a valid object ok 3746 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("+inf"); $x->bround($y); ok 3747 - is a valid object ok 3748 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3749 - is a valid object ok 3750 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3751 - is a valid object ok 3752 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3753 - is a valid object ok 3754 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3755 - is a valid object ok 3756 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3757 - is a valid object ok 3758 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3759 - is a valid object ok 3760 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3761 - is a valid object ok 3762 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("-inf"); $x->bround($y); ok 3763 - is a valid object ok 3764 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3765 - is a valid object ok 3766 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3767 - is a valid object ok 3768 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3769 - is a valid object ok 3770 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3771 - is a valid object ok 3772 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3773 - is a valid object ok 3774 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3775 - is a valid object ok 3776 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3777 - is a valid object ok 3778 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("odd"); $x->bround($y); ok 3779 - is a valid object ok 3780 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3781 - is a valid object ok 3782 - $x = Math::BigInt->new("+60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3783 - is a valid object ok 3784 - $x = Math::BigInt->new("+60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3785 - is a valid object ok 3786 - $x = Math::BigInt->new("+60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3787 - is a valid object ok 3788 - $x = Math::BigInt->new("+60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3789 - is a valid object ok 3790 - $x = Math::BigInt->new("+60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3791 - is a valid object ok 3792 - $x = Math::BigInt->new("+60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3793 - is a valid object ok 3794 - $x = Math::BigInt->new("+60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3795 - is a valid object ok 3796 - $x = Math::BigInt->new("+60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3797 - is a valid object ok 3798 - $x = Math::BigInt->new("+60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3799 - is a valid object ok 3800 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3801 - is a valid object ok 3802 - $x = Math::BigInt->new("-60123199999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3803 - is a valid object ok 3804 - $x = Math::BigInt->new("-60123299999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3805 - is a valid object ok 3806 - $x = Math::BigInt->new("-60123399999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3807 - is a valid object ok 3808 - $x = Math::BigInt->new("-60123499999"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3809 - is a valid object ok 3810 - $x = Math::BigInt->new("-60123500000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3811 - is a valid object ok 3812 - $x = Math::BigInt->new("-60123600000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3813 - is a valid object ok 3814 - $x = Math::BigInt->new("-60123700000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3815 - is a valid object ok 3816 - $x = Math::BigInt->new("-60123800000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3817 - is a valid object ok 3818 - $x = Math::BigInt->new("-60123900000"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("common"); $x->bround($y); ok 3819 - is a valid object ok 3820 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3821 - is a valid object ok 3822 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3823 - is a valid object ok 3824 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3825 - is a valid object ok 3826 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3827 - is a valid object ok 3828 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3829 - is a valid object ok 3830 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3831 - is a valid object ok 3832 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3833 - is a valid object ok 3834 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3835 - is a valid object ok 3836 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3837 - is a valid object ok 3838 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode("even"); $x->bround($y); ok 3839 - is a valid object ok 3840 - $x = Math::BigInt->new("0"); $x->is_zero() || 0; ok 3841 - $x = Math::BigInt->new("invalid"); $x->is_zero() || 0; ok 3842 - $x = Math::BigInt->new("+inf"); $x->is_zero() || 0; ok 3843 - $x = Math::BigInt->new("-inf"); $x->is_zero() || 0; ok 3844 - $x = Math::BigInt->new("123"); $x->is_zero() || 0; ok 3845 - $x = Math::BigInt->new("-1"); $x->is_zero() || 0; ok 3846 - $x = Math::BigInt->new("1"); $x->is_zero() || 0; ok 3847 - $x = Math::BigInt->new("0"); $x->is_one() || 0; ok 3848 - $x = Math::BigInt->new("invalid"); $x->is_one() || 0; ok 3849 - $x = Math::BigInt->new("+inf"); $x->is_one() || 0; ok 3850 - $x = Math::BigInt->new("-inf"); $x->is_one() || 0; ok 3851 - $x = Math::BigInt->new("1"); $x->is_one() || 0; ok 3852 - $x = Math::BigInt->new("2"); $x->is_one() || 0; ok 3853 - $x = Math::BigInt->new("-1"); $x->is_one() || 0; ok 3854 - $x = Math::BigInt->new("-2"); $x->is_one() || 0; ok 3855 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 3856 - is a valid object ok 3857 - $x = Math::BigInt->new("invalid"); $x->bfloor(); ok 3858 - is a valid object ok 3859 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 3860 - is a valid object ok 3861 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 3862 - is a valid object ok 3863 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 3864 - is a valid object ok 3865 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 3866 - is a valid object ok 3867 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 3868 - is a valid object ok 3869 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 3870 - is a valid object ok 3871 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 3872 - is a valid object ok 3873 - $x = Math::BigInt->new("invalid"); $x->bceil(); ok 3874 - is a valid object ok 3875 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 3876 - is a valid object ok 3877 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 3878 - is a valid object ok 3879 - $x = Math::BigInt->new("0"); $x->bceil(); ok 3880 - is a valid object ok 3881 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 3882 - is a valid object ok 3883 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 3884 - is a valid object ok 3885 - $x = Math::BigInt->new("2"); $x->bceil(); ok 3886 - is a valid object ok 3887 - $x = Math::BigInt->new("3"); $x->bceil(); ok 3888 - is a valid object ok 3889 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 3890 - is a valid object ok 3891 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 3892 - is a valid object ok 3893 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 3894 - is a valid object ok 3895 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 3896 - is a valid object ok 3897 - $x = Math::BigInt->new("0"); $x->bint(); ok 3898 - is a valid object ok 3899 - $x = Math::BigInt->new("-1"); $x->bint(); ok 3900 - is a valid object ok 3901 - $x = Math::BigInt->new("-2"); $x->bint(); ok 3902 - is a valid object ok 3903 - $x = Math::BigInt->new("2"); $x->bint(); ok 3904 - is a valid object ok 3905 - $x = Math::BigInt->new("3"); $x->bint(); ok 3906 - is a valid object ok 3907 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 3908 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 3909 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 3910 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 3911 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 3912 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 3913 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 3914 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 3915 - $x = Math::BigInt->new("invalid"); $x->as_hex(); ok 3916 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 3917 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 3918 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 3919 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 3920 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 3921 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3922 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_bin(); ok 3923 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 3924 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 3925 - $x = Math::BigInt->new("invalid"); $x->as_bin(); ok 3926 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 3927 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 3928 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 3929 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 3930 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 3931 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3932 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 3933 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 3934 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 3935 - $x = Math::BigInt->new("invalid"); $x->as_oct(); ok 3936 - $x = Math::BigInt->new("128"); $x->to_hex(); ok 3937 - $x = Math::BigInt->new("-128"); $x->to_hex(); ok 3938 - $x = Math::BigInt->new("0"); $x->to_hex(); ok 3939 - $x = Math::BigInt->new("-0"); $x->to_hex(); ok 3940 - $x = Math::BigInt->new("1"); $x->to_hex(); ok 3941 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_hex(); ok 3942 - $x = Math::BigInt->new("+inf"); $x->to_hex(); ok 3943 - $x = Math::BigInt->new("-inf"); $x->to_hex(); ok 3944 - $x = Math::BigInt->new("invalid"); $x->to_hex(); ok 3945 - $x = Math::BigInt->new("128"); $x->to_bin(); ok 3946 - $x = Math::BigInt->new("-128"); $x->to_bin(); ok 3947 - $x = Math::BigInt->new("0"); $x->to_bin(); ok 3948 - $x = Math::BigInt->new("-0"); $x->to_bin(); ok 3949 - $x = Math::BigInt->new("1"); $x->to_bin(); ok 3950 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 3951 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_bin(); ok 3952 - $x = Math::BigInt->new("+inf"); $x->to_bin(); ok 3953 - $x = Math::BigInt->new("-inf"); $x->to_bin(); ok 3954 - $x = Math::BigInt->new("invalid"); $x->to_bin(); ok 3955 - $x = Math::BigInt->new("128"); $x->to_oct(); ok 3956 - $x = Math::BigInt->new("-128"); $x->to_oct(); ok 3957 - $x = Math::BigInt->new("0"); $x->to_oct(); ok 3958 - $x = Math::BigInt->new("-0"); $x->to_oct(); ok 3959 - $x = Math::BigInt->new("1"); $x->to_oct(); ok 3960 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 3961 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_oct(); ok 3962 - $x = Math::BigInt->new("+inf"); $x->to_oct(); ok 3963 - $x = Math::BigInt->new("-inf"); $x->to_oct(); ok 3964 - $x = Math::BigInt->new("invalid"); $x->to_oct(); ok 3965 - $x = Math::BigInt->new("-1"); $x = log($x); ok 3966 - is a valid object ok 3967 - $x = Math::BigInt->new("0"); $x = log($x); ok 3968 - is a valid object ok 3969 - $x = Math::BigInt->new("1"); $x = log($x); ok 3970 - is a valid object ok 3971 - $x = Math::BigInt->new("2"); $x = log($x); ok 3972 - is a valid object ok 3973 - $x = Math::BigInt->new("3"); $x = log($x); ok 3974 - is a valid object ok 3975 - $x = Math::BigInt->new("123456789"); $x = log($x); ok 3976 - is a valid object ok 3977 - $x = Math::BigInt->new("1234567890987654321"); $x = log($x); ok 3978 - is a valid object ok 3979 - $x = Math::BigInt->new("-inf"); $x = log($x); ok 3980 - is a valid object ok 3981 - $x = Math::BigInt->new("inf"); $x = log($x); ok 3982 - is a valid object ok 3983 - $x = Math::BigInt->new("NaN"); $x = log($x); ok 3984 - is a valid object ok 3985 - $x = Math::BigInt->new("4294967296"); $a = $x->bmul($x); ok 3986 - $x = Math::BigInt->new(10); $a = $x->bpow($x); ok 3987 - $z = $x & $y; $x ok 3988 - $z = $x & $y; $y ok 3989 - $z = $x & $y; $z ok 3990 - $z = $x | $y; $x ok 3991 - $z = $x | $y; $y ok 3992 - $z = $x | $y; $z ok 3993 - $z = $x | $y; $x ok 3994 - $z = $x | $y; $y ok 3995 - $z = $x | $y; $z ok 3996 - $z = $x ^ $y; $x ok 3997 - $z = $x ^ $y; $y ok 3998 - $z = $x ^ $y; $z ok 3999 - $y = -$x; $x ok 4000 - $y = abs($x); $x ok 4001 - $x->copy()->bmodpow($y, $z); $u ok 4002 - $x->copy()->bmodpow($y, $z); $y ok 4003 - $x->copy()->bmodpow($y, $z); $z ok 4004 - $y = -$x; $x ok 4005 - $y = -$x; $y ok 4006 - $y = $x->copy()->bneg(); $x ok 4007 - $y = $x->copy()->bneg(); $y ok 4008 - $x->bmul($y); $x ok 4009 - $x->bmul($y); $y ok 4010 - $x->badd($y); $x ok 4011 - $x->badd($y); $y ok 4012 - $x->bsub($y); $x ok 4013 - $x->bsub($y); $y ok 4014 - $x->bdiv($y); $x ok 4015 - $x->bdiv($y); $y ok 4016 - $x->bmod($y); $x ok 4017 - $x->bmod($y); $y ok 4018 - $x->bmul($y); $x ok 4019 - $x->bmul($y); $y ok 4020 - $x->badd($y); $x ok 4021 - $x->badd($y); $y ok 4022 - $x->bsub($y); $x ok 4023 - $x->bsub($y); $y ok 4024 - $x->bdiv($y); $x ok 4025 - $x->bdiv($y); $y ok 4026 - $x->bmod($y); $x ok 4027 - $x->bmod($y); $y ok 4028 - $x->bmul($y); $x ok 4029 - $x->bmul($y); $y ok 4030 - $x->badd($y); $x ok 4031 - $x->badd($y); $y ok 4032 - $x->bsub($y); $x ok 4033 - $x->bsub($y); $y ok 4034 - $x->bdiv($y); $x ok 4035 - $x->bdiv($y); $y ok 4036 - $x->bmod($y); $x ok 4037 - $x->bmod($y); $y ok 4038 - overloading cmp works ok 4039 - $x = Math::BigInt->new(10); $x = 2 ** $x; $x == 1024; ok 4040 - $x = Math::BigInt->new(10); $x = 2 * $x; $x == 20; ok 4041 - $x = Math::BigInt->new(10); $x = 2 + $x; $x == 12; ok 4042 - $x = Math::BigInt->new(10); $x = 2 - $x; $x == -8; ok 4043 - $x = Math::BigInt->new(10); $x = 20 / $x; $x == 2; ok 4044 - $x = Math::BigInt->new(3); $x = 20 % $x; $x == 2; ok 4045 - $x = Math::BigInt->new(7); $x = 20 & $x; $x == 4; ok 4046 - $x = Math::BigInt->new(7); $x = 0x20 | $x; $x == 0x27; ok 4047 - $x = Math::BigInt->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 4048 - $x = Math::BigInt->badd(4, 5); $x == 9; ok 4049 - $x = Math::BigInt->new(1); $x is true ok 4050 - $x = Math::BigInt->new(0); !$x is false ok 4051 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 4052 - first arg matches /^Math::BigInt/ ok 4053 - second arg is 4 ok 4054 - third arg is 5 ok 4055 - objectify(0, 4, 5) gives Math::BigInt, 4, 5 ok 4056 - first arg matches /^Math::BigInt/ ok 4057 - second arg is 4 ok 4058 - third arg is 5 ok 4059 - objectify(2, 4, 5) gives Math::BigInt, 4, 5 ok 4060 - first arg matches /^Math::BigInt/ ok 4061 - second arg is 4 ok 4062 - third arg is 5 ok 4063 - objectify(2, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 4064 - first arg matches /^Math::BigInt/ ok 4065 - second arg is 4 ok 4066 - second arg is a Math::BigInt object ok 4067 - third arg is 5 ok 4068 - third arg is a Math::BigInt object ok 4069 - fourth arg is 6 ok 4070 - fourth arg is a scalar ok 4071 - fifth arg is 7 ok 4072 - fifth arg is a scalar ok 4073 - objectify(2, Math::BigInt, 4, 5, 6, 7) gives Math::BigInt, 4, 5, 6, 7 ok 4074 - first arg is Math::BigInt ok 4075 - second arg is 4 ok 4076 - second arg is a Math::BigInt object ok 4077 - third arg is 5 ok 4078 - third arg is a Math::BigInt object ok 4079 - fourth arg is 6 ok 4080 - fourth arg is a scalar ok 4081 - fifth arg is 7 ok 4082 - fifth arg is a scalar ok 4083 - Math::BigInt->new(123)->badd(123) = 246 ok 4084 - Math::BigInt->badd(123, 321) = 444 ok 4085 - Math::BigInt->badd(123, Math::BigInt->new(321)) = 444 ok 4086 - Math::BigInt->new(123)->bsub(122) = 1 ok 4087 - Math::BigInt->bsub(321, 123) = 198 ok 4088 - Math::BigInt->bsub(321, Math::BigInt->new(123)) = 198 ok 4089 - Math::BigInt->new(123)->bmul(123) = 15129 ok 4090 - Math::BigInt->bmul(123, 123) = 15129 ok 4091 - Math::BigInt->bmul(123, Math::BigInt->new(123)) = 15129 ok 4092 - Math::BigInt->new(15129)->bdiv(123) = 123 ok 4093 - Math::BigInt->bdiv(15129, 123) = 123 ok 4094 - Math::BigInt->bdiv(15129, Math::BigInt->new(123)) = 123 ok 4095 - Math::BigInt->new(15131)->bmod(123) = 2 ok 4096 - Math::BigInt->bmod(15131, 123) = 2 ok 4097 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) = 2 ok 4098 - Math::BigInt->new(2)->bpow(16) = 65536 ok 4099 - Math::BigInt->bpow(2, 16) = 65536 ok 4100 - Math::BigInt->bpow(2, Math::BigInt->new(16)) = 65536 ok 4101 - Math::BigInt->new(2**15)->brsft(1) = 2**14 ok 4102 - Math::BigInt->brsft(2**15, 1) = 2**14 ok 4103 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) = 2**14 ok 4104 - Math::BigInt->new(2**13)->blsft(1) = 2**14 ok 4105 - Math::BigInt->blsft(2**13, 1) = 2**14 ok 4106 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) = 2**14 ok 4107 - $x = Math::BigInt->new(1050000000000000); $x->bsstr() = "105e+13" ok 4108 - $x = Math::BigInt->new(1e+129); $x->bsstr() = "1e+129" ok 4109 - Math::BigInt->new("1") = 1 ok 4110 - Math::BigInt->new(" 1") = 1 ok 4111 - Math::BigInt->new("1 ") = 1 ok 4112 - Math::BigInt->new(" 1 ") = 1 ok 4113 - Math::BigInt->new("\n1") = 1 ok 4114 - Math::BigInt->new("1\n") = 1 ok 4115 - Math::BigInt->new("\n1\n") = 1 ok 4116 - Math::BigInt->new(" \n1\n") = 1 ok 4117 - Math::BigInt->new(" \n1 \n") = 1 ok 4118 - Math::BigInt->new(" \n1\n ") = 1 ok 4119 - Math::BigInt->new(" \n1\n1") = 'NaN' ok 4120 - Math::BigInt->new("1 \n1\n1") = 'NaN' ok 4121 - Math::BigInt->new("12") = 12 ok 4122 - Math::BigInt->new(" 12") = 12 ok 4123 - Math::BigInt->new("12 ") = 12 ok 4124 - Math::BigInt->new(" 12 ") = 12 ok 4125 - Math::BigInt->new("\n12") = 12 ok 4126 - Math::BigInt->new("12\n") = 12 ok 4127 - Math::BigInt->new("\n12\n") = 12 ok 4128 - Math::BigInt->new(" \n12\n") = 12 ok 4129 - Math::BigInt->new(" \n12 \n") = 12 ok 4130 - Math::BigInt->new(" \n12\n ") = 12 ok 4131 - Math::BigInt->new(" \n12\n1") = 'NaN' ok 4132 - Math::BigInt->new("1 \n12\n1") = 'NaN' ok 4133 - Math::BigInt->new("123") = 123 ok 4134 - Math::BigInt->new(" 123") = 123 ok 4135 - Math::BigInt->new("123 ") = 123 ok 4136 - Math::BigInt->new(" 123 ") = 123 ok 4137 - Math::BigInt->new("\n123") = 123 ok 4138 - Math::BigInt->new("123\n") = 123 ok 4139 - Math::BigInt->new("\n123\n") = 123 ok 4140 - Math::BigInt->new(" \n123\n") = 123 ok 4141 - Math::BigInt->new(" \n123 \n") = 123 ok 4142 - Math::BigInt->new(" \n123\n ") = 123 ok 4143 - Math::BigInt->new(" \n123\n1") = 'NaN' ok 4144 - Math::BigInt->new("1 \n123\n1") = 'NaN' ok 4145 - Math::BigInt->new("1234") = 1234 ok 4146 - Math::BigInt->new(" 1234") = 1234 ok 4147 - Math::BigInt->new("1234 ") = 1234 ok 4148 - Math::BigInt->new(" 1234 ") = 1234 ok 4149 - Math::BigInt->new("\n1234") = 1234 ok 4150 - Math::BigInt->new("1234\n") = 1234 ok 4151 - Math::BigInt->new("\n1234\n") = 1234 ok 4152 - Math::BigInt->new(" \n1234\n") = 1234 ok 4153 - Math::BigInt->new(" \n1234 \n") = 1234 ok 4154 - Math::BigInt->new(" \n1234\n ") = 1234 ok 4155 - Math::BigInt->new(" \n1234\n1") = 'NaN' ok 4156 - Math::BigInt->new("1 \n1234\n1") = 'NaN' ok 4157 - Math::BigInt->new("12345") = 12345 ok 4158 - Math::BigInt->new(" 12345") = 12345 ok 4159 - Math::BigInt->new("12345 ") = 12345 ok 4160 - Math::BigInt->new(" 12345 ") = 12345 ok 4161 - Math::BigInt->new("\n12345") = 12345 ok 4162 - Math::BigInt->new("12345\n") = 12345 ok 4163 - Math::BigInt->new("\n12345\n") = 12345 ok 4164 - Math::BigInt->new(" \n12345\n") = 12345 ok 4165 - Math::BigInt->new(" \n12345 \n") = 12345 ok 4166 - Math::BigInt->new(" \n12345\n ") = 12345 ok 4167 - Math::BigInt->new(" \n12345\n1") = 'NaN' ok 4168 - Math::BigInt->new("1 \n12345\n1") = 'NaN' ok 4169 - Math::BigInt->new("123456") = 123456 ok 4170 - Math::BigInt->new(" 123456") = 123456 ok 4171 - Math::BigInt->new("123456 ") = 123456 ok 4172 - Math::BigInt->new(" 123456 ") = 123456 ok 4173 - Math::BigInt->new("\n123456") = 123456 ok 4174 - Math::BigInt->new("123456\n") = 123456 ok 4175 - Math::BigInt->new("\n123456\n") = 123456 ok 4176 - Math::BigInt->new(" \n123456\n") = 123456 ok 4177 - Math::BigInt->new(" \n123456 \n") = 123456 ok 4178 - Math::BigInt->new(" \n123456\n ") = 123456 ok 4179 - Math::BigInt->new(" \n123456\n1") = 'NaN' ok 4180 - Math::BigInt->new("1 \n123456\n1") = 'NaN' ok 4181 - Math::BigInt->new("1234567") = 1234567 ok 4182 - Math::BigInt->new(" 1234567") = 1234567 ok 4183 - Math::BigInt->new("1234567 ") = 1234567 ok 4184 - Math::BigInt->new(" 1234567 ") = 1234567 ok 4185 - Math::BigInt->new("\n1234567") = 1234567 ok 4186 - Math::BigInt->new("1234567\n") = 1234567 ok 4187 - Math::BigInt->new("\n1234567\n") = 1234567 ok 4188 - Math::BigInt->new(" \n1234567\n") = 1234567 ok 4189 - Math::BigInt->new(" \n1234567 \n") = 1234567 ok 4190 - Math::BigInt->new(" \n1234567\n ") = 1234567 ok 4191 - Math::BigInt->new(" \n1234567\n1") = 'NaN' ok 4192 - Math::BigInt->new("1 \n1234567\n1") = 'NaN' ok 4193 - Math::BigInt->new("12345678") = 12345678 ok 4194 - Math::BigInt->new(" 12345678") = 12345678 ok 4195 - Math::BigInt->new("12345678 ") = 12345678 ok 4196 - Math::BigInt->new(" 12345678 ") = 12345678 ok 4197 - Math::BigInt->new("\n12345678") = 12345678 ok 4198 - Math::BigInt->new("12345678\n") = 12345678 ok 4199 - Math::BigInt->new("\n12345678\n") = 12345678 ok 4200 - Math::BigInt->new(" \n12345678\n") = 12345678 ok 4201 - Math::BigInt->new(" \n12345678 \n") = 12345678 ok 4202 - Math::BigInt->new(" \n12345678\n ") = 12345678 ok 4203 - Math::BigInt->new(" \n12345678\n1") = 'NaN' ok 4204 - Math::BigInt->new("1 \n12345678\n1") = 'NaN' ok 4205 - Math::BigInt->new("123456789") = 123456789 ok 4206 - Math::BigInt->new(" 123456789") = 123456789 ok 4207 - Math::BigInt->new("123456789 ") = 123456789 ok 4208 - Math::BigInt->new(" 123456789 ") = 123456789 ok 4209 - Math::BigInt->new("\n123456789") = 123456789 ok 4210 - Math::BigInt->new("123456789\n") = 123456789 ok 4211 - Math::BigInt->new("\n123456789\n") = 123456789 ok 4212 - Math::BigInt->new(" \n123456789\n") = 123456789 ok 4213 - Math::BigInt->new(" \n123456789 \n") = 123456789 ok 4214 - Math::BigInt->new(" \n123456789\n ") = 123456789 ok 4215 - Math::BigInt->new(" \n123456789\n1") = 'NaN' ok 4216 - Math::BigInt->new("1 \n123456789\n1") = 'NaN' ok 4217 - Math::BigInt->new("1234567890") = 1234567890 ok 4218 - Math::BigInt->new(" 1234567890") = 1234567890 ok 4219 - Math::BigInt->new("1234567890 ") = 1234567890 ok 4220 - Math::BigInt->new(" 1234567890 ") = 1234567890 ok 4221 - Math::BigInt->new("\n1234567890") = 1234567890 ok 4222 - Math::BigInt->new("1234567890\n") = 1234567890 ok 4223 - Math::BigInt->new("\n1234567890\n") = 1234567890 ok 4224 - Math::BigInt->new(" \n1234567890\n") = 1234567890 ok 4225 - Math::BigInt->new(" \n1234567890 \n") = 1234567890 ok 4226 - Math::BigInt->new(" \n1234567890\n ") = 1234567890 ok 4227 - Math::BigInt->new(" \n1234567890\n1") = 'NaN' ok 4228 - Math::BigInt->new("1 \n1234567890\n1") = 'NaN' ok 4229 - value of ((2^148)+1)/17 ok 4230 - number of digits in ((2^148)+1)/17 ok 4231 - value of 2^127-1 ok 4232 - number of digits in 2^127-1 ok 4233 - number of digits in fraction part of 2^127-1 ok 4234 - number of digits in 1_000_000_000_000 ok 4235 - number of digits in fraction part of 1_000_000_000_000 ok 4236 - 2 <<= 18 with Math::BigInt objects ok 4237 - 2 <<= 18 with Math::BigInt objects ok 4238 - 2 >>= 18 with Math::BigInt objects ok 4239 - 2 >>= 18 with Math::BigInt objects ok 4240 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 4241 - $x is an object of class "Math::Foo" ok 4242 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 4243 - $x is an object of class "Math::Foo" ok 4244 - Math::BigInt->new("+inf") = "inf" ok 4245 - bigint 2**64-1 as string ok 4246 - bigint 2**64-1 as number ok 4247 - bigint -2**63 as string ok 4248 - bigint -2**63 as number ok 4249 - is a valid object ok 4250 - $x == 1000000000 ok 4251 - is a valid object ok 4252 - $x == 999999999 ok 4253 - is a valid object ok 4254 - $x->numify() = $BASE-1 ok 4255 - $x->numify() = -($BASE-1) ok 4256 - $x->numify()+0 = $BASE+0 ok 4257 - $x->numify() = -$BASE ok 4258 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 4259 - $x > $BASE ok 4260 - $x > $BASE ok 4261 - $x->length() = length($MAX) ok 4262 - Math::BigInt->digit(123, 2) = 1 ok 4263 - testing bug in sub ok 4264 - testing bug in sub ok 4265 - testing number with a zero-hole of BASE_LEN_SMALL ok 4266 - see if mul shortcut for small numbers works (999999999 * 999999999 = 999999998000000001) ok 4267 - -322056000 / -12882240 has remainder 0 ok 4268 - is a valid object ok 4269 - $x->bmod(5033) = 4404 ok 4270 - Math::BigInt->bzero() = 0 ok 4271 - Math::BigInt->bone() = 1 ok 4272 - Math::BigInt->bone("+") = 1 ok 4273 - Math::BigInt->bone("-") = -1 ok 4274 - Math::BigInt->bnan() = "NaN" ok 4275 - Math::BigInt->binf() = "inf" ok 4276 - Math::BigInt->binf("+") = "inf" ok 4277 - Math::BigInt->binf("-") = "-inf" ok 4278 - Math::BigInt->binf("-inf") = "-inf" ok 4279 - Math::BigInt->new(1)->is_one("-") = 0 ok 4280 - Math::BigInt->new(-1)->is_one("-") = 1 ok 4281 - Math::BigInt->new(1)->is_one() = 1 ok 4282 - Math::BigInt->new(-1)->is_one() = 0 ok 4283 - $x = Math::BigInt->new(3); $x -= $x; = 0 ok 4284 - $x = Math::BigInt->new(-3); $x -= $x; = 0 ok 4285 - $x = Math::BigInt->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 4286 - $x = Math::BigInt->new("inf"); $x -= $x; $x->is_nan() = 1 ok 4287 - $x = Math::BigInt->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 4288 - $x = Math::BigInt->new("NaN"); $x += $x; $x->is_nan() = 1 ok 4289 - $x = Math::BigInt->new("inf"); $x += $x; $x->is_inf() = 1 ok 4290 - $x = Math::BigInt->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 4291 - $x = Math::BigInt->new(3); $x += $x; $x = 6 ok 4292 - $x = Math::BigInt->new(-3); $x += $x; $x = -6 ok 4293 - $x = Math::BigInt->new(3); $x *= $x; $x = 9 ok 4294 - $x = Math::BigInt->new(-3); $x *= $x; $x = 9 ok 4295 - $x = Math::BigInt->new(3); $x /= $x; $x = 1 ok 4296 - $x = Math::BigInt->new(-3); $x /= $x; $x = 1 ok 4297 - $x = Math::BigInt->new(3); $x %= $x; $x = 0 ok 4298 - $x = Math::BigInt->new(-3); $x %= $x; $x = 0 ok t/bigints.t ................... 1..50 ok 1 - ref($x) ok 2 - Math::BigInt::Scalar->_str($x) ok 3 - Math::BigInt::Scalar->_str($y) ok 4 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_add($x, $y) ok 5 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_sub($x, $y) ok 6 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_mul($x, $y)) ok 7 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_div($x, $y) ok 8 - Math::BigInt::Scalar->_str($x) ok 9 - Math::BigInt::Scalar->_str($y) ok 10 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_add($x, $z) ok 11 - Math::BigInt::Scalar->_str($re) ok 12 - Math::BigInt::Scalar->_str($rr) ok 13 - Math::BigInt::Scalar->_is_zero(SCALAR(0x55855bd166c0)) ok 14 - Math::BigInt::Scalar->_is_one(SCALAR(0x55855bd166c0)) ok 15 - Math::BigInt::Scalar->_is_one(Math::BigInt::Scalar->_one()) ok 16 - Math::BigInt::Scalar->_is_one(Math::BigInt::Scalar->_zero()) ok 17 - Math::BigInt::Scalar->_is_zero(Math::BigInt::Scalar->_zero()) ok 18 - Math::BigInt::Scalar->_is_zero(Math::BigInt::Scalar->_one()) ok 19 - Math::BigInt::Scalar->_is_odd(Math::BigInt::Scalar->_one()) ok 20 - Math::BigInt::Scalar->_is_odd(Math::BigInt::Scalar->_zero()) ok 21 - Math::BigInt::Scalar->_is_even(Math::BigInt::Scalar->_one()) ok 22 - Math::BigInt::Scalar->_is_even(Math::BigInt::Scalar->_zero()) ok 23 - Math::BigInt::Scalar->_digit($x, 0) ok 24 - Math::BigInt::Scalar->_digit($x, 1) ok 25 - Math::BigInt::Scalar->_digit($x, 2) ok 26 - Math::BigInt::Scalar->_digit($x, -1) ok 27 - Math::BigInt::Scalar->_digit($x, -2) ok 28 - Math::BigInt::Scalar->_digit($x, -3) ok 29 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_copy($x)) ok 30 - Math::BigInt::Scalar->_acmp($x, $y) ok 31 - Math::BigInt::Scalar->_acmp($y, $x) ok 32 - Math::BigInt::Scalar->_acmp($x, $x) ok 33 - Math::BigInt::Scalar->_acmp($y, $y) ok 34 - Math::BigInt::Scalar->_str(scalar Math::BigInt::Scalar->_div($x, $y)) ok 35 - Math::BigInt::Scalar->_str($x) ok 36 - Math::BigInt::Scalar->_str($y) ok 37 - Math::BigInt::Scalar->_str($x) ok 38 - Math::BigInt::Scalar->_str($y) ok 39 - ref($x) || "" ok 40 - $x ok 41 - ref($x) || "" ok 42 - $x ok 43 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_or(SCALAR(0x55855c44f508), SCALAR(0x55855bcea718))) ok 44 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_xor(SCALAR(0x55855bce9c80), SCALAR(0x55855bce9d40))) ok 45 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_and(SCALAR(0x55855c44f508), SCALAR(0x55855bcea718))) ok 46 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x55855bce9c80), SCALAR(0x55855bce9d40))) ok 47 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x55855c44f508), SCALAR(0x55855bcea718))) ok 48 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x55855bce9c80), SCALAR(0x55855bce9d40))) ok 49 - Math::BigInt::Scalar->_check($x) ok 50 - Math::BigInt::Scalar->_check(123) ok t/biglog.t .................... 1..73 ok 1 - Math::BigInt->new(2)->blog() ok 2 - Math::BigInt->new(288)->blog() ok 3 - Math::BigInt->new(2000)->blog() ok 4 - Math::BigInt->new(1)->bexp() ok 5 - Math::BigInt->new(2)->bexp() ok 6 - Math::BigInt->new(3)->bexp() ok 7 - Math::BigFloat->new(5)->blog(undef, 71) ok 8 - Math::BigFloat->new(2)->blog(undef, 71) ok 9 - Math::BigFloat->new(11)->blog(undef, 71) ok 10 - Math::BigFloat->new(21)->blog(undef, 71) ok 11 - Math::BigFloat->new(-2)->blog() ok 12 - Math::BigFloat->new(-1)->blog() ok 13 - Math::BigFloat->new(-10)->blog() ok 14 - Math::BigFloat->new(-2, 2)->blog() ok 15 - Math::BigFloat->new(10)->blog() ok 16 - Math::BigFloat->new("0.1")->blog() ok 17 - Math::BigFloat->new("0.01")->blog() ok 18 - Math::BigFloat->new("0.001")->blog() ok 19 - Math::BigFloat->new("0.0001")->blog() ok 20 - Math::BigFloat->new(2)->blog() ok 21 - Math::BigFloat->new(4)->blog() ok 22 - Math::BigFloat->new("0.2")->blog(undef, 10) ok 23 - Math::BigFloat->new("0.3")->blog(undef, 10) ok 24 - Math::BigFloat->new("0.4")->blog(undef, 10) ok 25 - Math::BigFloat->new("0.5")->blog(undef, 10) ok 26 - Math::BigFloat->new("0.6")->blog(undef, 10) ok 27 - Math::BigFloat->new("0.7")->blog(undef, 10) ok 28 - Math::BigFloat->new("0.8")->blog(undef, 10) ok 29 - Math::BigFloat->new("0.9")->blog(undef, 10) ok 30 - Math::BigFloat->new("9")->blog(undef, 10) ok 31 - Math::BigFloat->new("10")->blog(10, 10) ok 32 - Math::BigFloat->new("20")->blog(20, 10) ok 33 - Math::BigFloat->new("100")->blog(100, 10) ok 34 - Math::BigFloat->new("100")->blog(10, 10) ok 35 - Math::BigFloat->new("400")->blog(20, 10) ok 36 - Math::BigFloat->new("4")->blog(2, 10) ok 37 - Math::BigFloat->new("16")->blog(2, 10) ok 38 - Math::BigFloat->new("1.2")->bpow("0.3", 10) ok 39 - Math::BigFloat->new("10")->bpow("0.6", 10) ok 40 - blog(100) ok 41 - 2 ** 32 ok 42 - 3 ** 32 ok 43 - 2 ** 65 ok 44 - blog(777**256, 12345678901234) ok 45 - blog(777**777, 777) ok 46 - Math::BigFloat->new(200)->bpow(0.5, 10) ok 47 - Math::BigFloat->new(20)->bpow(0.5, 10) ok 48 - Math::BigFloat->new(2)->bpow(0.5, 10) ok 49 - Math::BigFloat->new(0.2)->bpow(0.5, 10) ok 50 - Math::BigFloat->new(0.02)->bpow(0.5, 10) ok 51 - Math::BigFloat->new(0.49)->bpow(0.5, undef) ok 52 - Math::BigFloat->new(0.49)->bpow(0.5, 10) ok 53 - Math::BigFloat->new(0.002)->bpow(0.5, 10) ok 54 - Math::BigFloat->new(0.0002)->bpow(0.5, 10) ok 55 - Math::BigFloat->new(0.0049)->bpow(0.5, undef) ok 56 - Math::BigFloat->new(0.0049)->bpow(0.5, 10) ok 57 - Math::BigFloat->new(0.000002)->bpow(0.5, 10) ok 58 - Math::BigFloat->new(0.021)->bpow(0.5, 10) ok 59 - Math::BigFloat->new(1.2)->bpow(0.5, 10) ok 60 - Math::BigFloat->new(1.23)->bpow(0.5, 10) ok 61 - Math::BigFloat->new(12.3)->bpow(0.5, 10) ok 62 - Math::BigFloat->new(9.9)->bpow(0.5, 10) ok 63 - Math::BigFloat->new(9.86902225)->bpow(0.5, 10) ok 64 - Math::BigFloat->new(9.86902225)->bpow(0.5, undef) ok 65 - Math::BigFloat->new(0.2)->bpow(0.41, 10) ok 66 - Math::BigFloat->new("0.1")->bpow("28.4", 40)->bsstr() ok 67 - bexp(1) ok 68 - bexp(2) ok 69 - bexp(12.5) ok 70 - Math::BigFloat->new(1)->bexp(100) ok 71 - Math::BigFloat->new("12.5")->bexp(91) ok 72 - Math::BigFloat->new("-118.5")->bexp(20)->bsstr() ok 73 - Math::BigFloat->new("-118.5")->bexp(20)->bsstr() ok t/bigrat.t .................... 1..203 ok 1 - value of $x ok 2 - An object of class 'Math::BigRat' isa 'Math::BigRat' ok 3 - An object of class 'Math::BigRat' isn't a 'Math::BigInt' ok 4 - An object of class 'Math::BigRat' isn't a 'Math::BigFloat' ok 5 - $x = Math::BigRat->new(1234) ok 6 - $x = Math::BigRat->new("1234/1") ok 7 - $x = Math::BigRat->new("1234/2") ok 8 - $x = Math::BigRat->new("100/1.0") ok 9 - $x = Math::BigRat->new("10.0/1.0") ok 10 - $x = Math::BigRat->new("0.1/10") ok 11 - $x = Math::BigRat->new("0.1/0.1") ok 12 - $x = Math::BigRat->new("1e2/10") ok 13 - $x = Math::BigRat->new("5/1e2") ok 14 - $x = Math::BigRat->new("1e2/1e1") ok 15 - $x = Math::BigRat->new("1 / 3") ok 16 - $x = Math::BigRat->new("-1 / 3") ok 17 - $x = Math::BigRat->new("NaN") ok 18 - $x = Math::BigRat->new("inf") ok 19 - $x = Math::BigRat->new("-inf") ok 20 - $x = Math::BigRat->new("1/") ok 21 - $x = Math::BigRat->new("0x7e") ok 22 - $x = Math::BigRat->new("1+1/3") ok 23 - $x = Math::BigRat->new("1/1.2") ok 24 - $x = Math::BigRat->new("1.3/1.2") ok 25 - $x = Math::BigRat->new("1.2/1") ok 26 - $x = Math::BigRat->new(Math::BigInt->new(1231)) ok 27 - $x = Math::BigRat->new(Math::BigFloat->new(1232)) ok 28 - $x = Math::BigRat->new(Math::BigFloat->new(1232.3)) ok 29 - $x = Math::BigRat->bnorm(1234) ok 30 - $x = Math::BigRat->bnorm("1234/1") ok 31 - $x = Math::BigRat->bnorm("1234/2") ok 32 - $x = Math::BigRat->bnorm("100/1.0") ok 33 - $x = Math::BigRat->bnorm("10.0/1.0") ok 34 - $x = Math::BigRat->bnorm("0.1/10") ok 35 - $x = Math::BigRat->bnorm("0.1/0.1") ok 36 - $x = Math::BigRat->bnorm("1e2/10") ok 37 - $x = Math::BigRat->bnorm("5/1e2") ok 38 - $x = Math::BigRat->bnorm("1e2/1e1") ok 39 - $x = Math::BigRat->bnorm("1 / 3") ok 40 - $x = Math::BigRat->bnorm("-1 / 3") ok 41 - $x = Math::BigRat->bnorm("NaN") ok 42 - $x = Math::BigRat->bnorm("inf") ok 43 - $x = Math::BigRat->bnorm("-inf") ok 44 - $x = Math::BigRat->bnorm("1/") ok 45 - $x = Math::BigRat->bnorm("0x7e") ok 46 - $x = Math::BigRat->bnorm("1+1/3") ok 47 - $x = Math::BigRat->bnorm("1/1.2") ok 48 - $x = Math::BigRat->bnorm("1.3/1.2") ok 49 - $x = Math::BigRat->bnorm("1.2/1") ok 50 - $x = Math::BigRat->bnorm(Math::BigInt->new(1231)) ok 51 - $x = Math::BigRat->bnorm(Math::BigFloat->new(1232)) ok 52 - $x = Math::BigRat->bnorm(Math::BigFloat->new(1232.3)) 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 # binc() ok 153 # bdec() ok 154 # bfloor() ok 155 ok 156 ok 157 ok 158 ok 159 ok 160 # numify() ok 161 ok 162 ok 163 ok 164 ok 165 ok 166 # Subtest: Math::BigRat -> new("33/8") -> numify() 1..3 ok 1 - $x is a scalar ok 2 - $x is numeric ok 3 - $x has the right value ok 167 - Math::BigRat -> new("33/8") -> numify() # Subtest: Math::BigRat -> new("-33/8") -> numify() 1..3 ok 1 - $x is a scalar ok 2 - $x is numeric ok 3 - $x has the right value ok 168 - Math::BigRat -> new("-33/8") -> numify() # Subtest: Math::BigRat -> new("inf") -> numify() 1..3 ok 1 - $x is a scalar ok 2 - $x is numeric ok 3 - $x has the right value ok 169 - Math::BigRat -> new("inf") -> numify() # Subtest: Math::BigRat -> new("-inf") -> numify() 1..3 ok 1 - $x is a scalar ok 2 - $x is numeric ok 3 - $x has the right value ok 170 - Math::BigRat -> new("-inf") -> numify() # Subtest: Math::BigRat -> new("NaN") -> numify() 1..3 ok 1 - $x is a scalar ok 2 - $x is numeric ok 3 - $x has the right value ok 171 - Math::BigRat -> new("NaN") -> numify() # as_hex(), as_bin(), as_oct() ok 172 ok 173 ok 174 ok 175 ok 176 ok 177 # broot(), blog(), bmodpow(), bmodinv() ok 178 ok 179 - $x is a Math::BigRat ok 180 ok 181 - $x is a Math::BigRat ok 182 ok 183 - $x is a Math::BigRat ok 184 ok 185 - $x is a Math::BigRat ok 186 - $x = Math::BigRat->new('256.1')->blog(2) ok 187 - $x is a Math::BigRat ok 188 - v/144 = 12 ok 189 - (12*12*12) ** 1/3 = 12 # from_hex(), from_bin(), from_oct() ok 190 - from_hex ok 191 - from_hex ok 192 - from_bin ok 193 - from_bin ok 194 - from_oct ok 195 - from_oct ok 196 - $x unmodified ok 197 - as_float(0.5) ok 198 - $x unmodified ok 199 - as_float(2/3, 5) ok 200 - $x unmodified ok 201 - as_float(3141592653589793238462643383279502884197169399375106, 5) ok 202 - 5/2 converted to integer ok 203 - -1/2 converted to integer ok t/bigratpm.t .................. 1..899 ok 1 ok 2 - $x = Math::BigRat->new("123"); $x->digit(2); ok 3 - $x = Math::BigRat->new("1234"); $x->digit(0); ok 4 - $x = Math::BigRat->new("1234"); $x->digit(1); ok 5 - $x = Math::BigRat->new("1234"); $x->digit(2); ok 6 - $x = Math::BigRat->new("1234"); $x->digit(3); ok 7 - $x = Math::BigRat->new("1234"); $x->digit(-1); ok 8 - $x = Math::BigRat->new("1234"); $x->digit(-2); ok 9 - $x = Math::BigRat->new("1234"); $x->digit(-3); ok 10 - $x = Math::BigRat->new("1234"); $x->digit(-4); ok 11 - $x = Math::BigRat->new("0"); $x->digit(0); ok 12 - $x = Math::BigRat->new("0"); $x->digit(1); ok 13 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x->bmodinv($y); ok 14 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 15 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $x->bmodinv($y); ok 16 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 17 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 18 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-5"); $x->bmodinv($y); ok 19 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 20 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("5033"); $x->bmodinv($y); ok 21 - $x = Math::BigRat->new("1234567891"); $y = Math::BigRat->new("13"); $x->bmodinv($y); ok 22 - $x = Math::BigRat->new("-1234567891"); $y = Math::BigRat->new("13"); $x->bmodinv($y); ok 23 - $x = Math::BigRat->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigRat->new("2348249874968739"); $x->bmodinv($y); ok 24 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 25 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("inf"); $x->bmodinv($y); ok 26 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("5"); $x->bmodinv($y); ok 27 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("-inf"); $x->bmodinv($y); ok 28 - $x = Math::BigRat->new("144/7"); $x->as_number(); ok 29 - $x = Math::BigRat->new("12/1"); $x->as_number(); ok 30 - $x = Math::BigRat->new("-12/1"); $x->as_number(); ok 31 - $x = Math::BigRat->new("-12/3"); $x->as_number(); ok 32 - $x = Math::BigRat->new("NaN"); $x->as_number(); ok 33 - $x = Math::BigRat->new("+inf"); $x->as_number(); ok 34 - $x = Math::BigRat->new("-inf"); $x->as_number(); ok 35 - $x = Math::BigRat->new("144/7"); $x->as_int(); ok 36 - $x = Math::BigRat->new("12/1"); $x->as_int(); ok 37 - $x = Math::BigRat->new("-12/1"); $x->as_int(); ok 38 - $x = Math::BigRat->new("-12/3"); $x->as_int(); ok 39 - $x = Math::BigRat->new("NaN"); $x->as_int(); ok 40 - $x = Math::BigRat->new("+inf"); $x->as_int(); ok 41 - $x = Math::BigRat->new("-inf"); $x->as_int(); ok 42 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 43 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 44 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 45 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 46 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("abc"); $x->bmodpow($y, $z); ok 47 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("abc"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 48 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("5"); $x->bmodpow($y, $z); ok 49 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("2"); $x->bmodpow($y, $z); ok 50 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("2"); $x->bmodpow($y, $z); ok 51 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $z = Math::BigRat->new("1"); $x->bmodpow($y, $z); ok 52 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("7"); $z = Math::BigRat->new("5032"); $x->bmodpow($y, $z); ok 53 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("-1"); $z = Math::BigRat->new("5033"); $x->bmodpow($y, $z); ok 54 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("8"); $z = Math::BigRat->new("-5"); $x->bmodpow($y, $z); ok 55 - $x = Math::BigRat->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigRat->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigRat->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 56 - $x = Math::BigRat->new("8"); $y = Math::BigRat->new("-1"); $z = Math::BigRat->new("16"); $x->bmodpow($y, $z); ok 57 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("5"); $z = Math::BigRat->new("13"); $x->bmodpow($y, $z); ok 58 - $x = Math::BigRat->new("5"); $y = Math::BigRat->new("inf"); $z = Math::BigRat->new("13"); $x->bmodpow($y, $z); ok 59 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x % $y; ok 60 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x % $y; ok 61 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1"); $x % $y; ok 62 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("2"); $x % $y; ok 63 - $x = Math::BigRat->new("12"); $y = Math::BigRat->new("6"); $x % $y; ok 64 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/14"); $x % $y; ok 65 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/16"); $x % $y; ok 66 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/16"); $x % $y; ok 67 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/16"); $x % $y; ok 68 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/16"); $x % $y; ok 69 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/32"); $x % $y; ok 70 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/32"); $x % $y; ok 71 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/32"); $x % $y; ok 72 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/32"); $x % $y; ok 73 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("4/28"); $x % $y; ok 74 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("4/28"); $x % $y; ok 75 - $x = Math::BigRat->new("7/4"); $y = Math::BigRat->new("-4/28"); $x % $y; ok 76 - $x = Math::BigRat->new("-7/4"); $y = Math::BigRat->new("-4/28"); $x % $y; ok 77 - $x = Math::BigRat->new("1"); ; $x->bsqrt(); ok 78 - $x = Math::BigRat->new("0"); ; $x->bsqrt(); ok 79 - $x = Math::BigRat->new("NaN"); ; $x->bsqrt(); ok 80 - $x = Math::BigRat->new("+inf"); ; $x->bsqrt(); ok 81 - $x = Math::BigRat->new("-inf"); ; $x->bsqrt(); ok 82 - $x = Math::BigRat->new("144"); ; $x->bsqrt(); ok 83 - $x = Math::BigRat->new("144/4"); ; $x->bsqrt(); ok 84 - $x = Math::BigRat->new("25/16"); ; $x->bsqrt(); ok 85 - $x = Math::BigRat->new("-3"); ; $x->bsqrt(); ok 86 - $x = Math::BigRat->new("4/9"); ; $x->bsqrt(); ok 87 - $x = Math::BigRat->new("36/49"); ; $x->bsqrt(); ok 88 - $x = Math::BigRat->new("49/121"); ; $x->bsqrt(); ok 89 - $x = Math::BigRat->new("999966000289/99999820000081"); ; $x->bsqrt(); ok 90 - $x = Math::BigRat->new("NaN"); ; $x->blog(); ok 91 - $x = Math::BigRat->new("0"); ; $x->blog(); ok 92 - $x = Math::BigRat->new("-2"); ; $x->blog(); ok 93 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 94 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 95 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("0"); $x->blog($y); ok 96 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x->blog($y); ok 97 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x->blog($y); ok 98 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("2"); $x->blog($y); ok 99 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-2"); $x->blog($y); ok 100 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-2"); $x->blog($y); ok 101 - $x = Math::BigRat->new("1"); $x->binf("+"); ok 102 - $x = Math::BigRat->new("2"); $x->binf("-"); ok 103 - $x = Math::BigRat->new("3"); $x->binf("abc"); ok 104 - $x = Math::BigRat->new("0"); $x->numify(); ok 105 - $x = Math::BigRat->new("+1"); $x->numify(); ok 106 - $x = Math::BigRat->new("1234"); $x->numify(); ok 107 - $x = Math::BigRat->new("3/4"); $x->numify(); ok 108 - $x = Math::BigRat->new("5/2"); $x->numify(); ok 109 - $x = Math::BigRat->new("3/2"); $x->numify(); ok 110 - $x = Math::BigRat->new("5/4"); $x->numify(); ok 111 - $x = Math::BigRat->new("abc"); $x->bnan(); ok 112 - $x = Math::BigRat->new("2"); $x->bnan(); ok 113 - $x = Math::BigRat->new("-2"); $x->bnan(); ok 114 - $x = Math::BigRat->new("0"); $x->bnan(); ok 115 - $x = Math::BigRat->new("2"); $x->bone("+"); ok 116 - $x = Math::BigRat->new("-2"); $x->bone("-"); ok 117 - $x = Math::BigRat->new("-2"); $x->bone("+"); ok 118 - $x = Math::BigRat->new("2"); $x->bone("-"); ok 119 - $x = Math::BigRat->new("0"); $x->bone(""); ok 120 - $x = Math::BigRat->new("-2"); $x->bone(""); ok 121 - $x = Math::BigRat->new("abc"); $x->bone(""); ok 122 - $x = Math::BigRat->new("2"); $x->bone("abc"); ok 123 - $x = Math::BigRat->new("+inf"); $x->bsstr(); ok 124 - $x = Math::BigRat->new("-inf"); $x->bsstr(); ok 125 - $x = Math::BigRat->new("abcfsstr"); $x->bsstr(); ok 126 - $x = Math::BigRat->new("1"); $x->bsstr(); ok 127 - $x = Math::BigRat->new("3/1"); $x->bsstr(); ok 128 - $x = Math::BigRat->new("0.1"); $x->bsstr(); ok 129 - $x = Math::BigRat->new("1"); $x; ok 130 - $x = Math::BigRat->new("-0"); $x; ok 131 - $x = Math::BigRat->new("bnormNaN"); $x; ok 132 - $x = Math::BigRat->new("+inf"); $x; ok 133 - $x = Math::BigRat->new("-inf"); $x; ok 134 - $x = Math::BigRat->new("inf/inf"); $x; ok 135 - $x = Math::BigRat->new("5/inf"); $x; ok 136 - $x = Math::BigRat->new("5/-inf"); $x; ok 137 - $x = Math::BigRat->new("inf/5"); $x; ok 138 - $x = Math::BigRat->new("-inf/5"); $x; ok 139 - $x = Math::BigRat->new("inf/-5"); $x; ok 140 - $x = Math::BigRat->new("-inf/-5"); $x; ok 141 - $x = Math::BigRat->new("123"); $x; ok 142 - $x = Math::BigRat->new("-123.4567"); $x; ok 143 - $x = Math::BigRat->new(".2E-3."); $x; ok 144 - $x = Math::BigRat->new(".2E2"); $x; ok 145 - $x = Math::BigRat->new("inf"); $x; ok 146 - $x = Math::BigRat->new("+inf"); $x; ok 147 - $x = Math::BigRat->new("-inf"); $x; ok 148 - $x = Math::BigRat->new("+InFiNiTy"); $x; ok 149 - $x = Math::BigRat->new("+-inf"); $x; ok 150 - $x = Math::BigRat->new("abc"); $x; ok 151 - $x = Math::BigRat->new(" 1 a"); $x; ok 152 - $x = Math::BigRat->new("1bcd2"); $x; ok 153 - $x = Math::BigRat->new("11111b"); $x; ok 154 - $x = Math::BigRat->new("+1z"); $x; ok 155 - $x = Math::BigRat->new("-1z"); $x; ok 156 - $x = Math::BigRat->new("0"); $x; ok 157 - $x = Math::BigRat->new("+0"); $x; ok 158 - $x = Math::BigRat->new("+00"); $x; ok 159 - $x = Math::BigRat->new("+0_0_0"); $x; ok 160 - $x = Math::BigRat->new("000000_0000000_00000"); $x; ok 161 - $x = Math::BigRat->new("-0"); $x; ok 162 - $x = Math::BigRat->new("-0000"); $x; ok 163 - $x = Math::BigRat->new("+1"); $x; ok 164 - $x = Math::BigRat->new("+01"); $x; ok 165 - $x = Math::BigRat->new("+001"); $x; ok 166 - $x = Math::BigRat->new("+00000100000"); $x; ok 167 - $x = Math::BigRat->new("+00000800/00000010"); $x; ok 168 - $x = Math::BigRat->new("-00000800/00000010"); $x; ok 169 - $x = Math::BigRat->new("+00000800/-00000010"); $x; ok 170 - $x = Math::BigRat->new("-00000800/-00000010"); $x; ok 171 - $x = Math::BigRat->new("123456789"); $x; ok 172 - $x = Math::BigRat->new("-1"); $x; ok 173 - $x = Math::BigRat->new("-01"); $x; ok 174 - $x = Math::BigRat->new("-001"); $x; ok 175 - $x = Math::BigRat->new("-123456789"); $x; ok 176 - $x = Math::BigRat->new("-00000100000"); $x; ok 177 - $x = Math::BigRat->new("123.456a"); $x; ok 178 - $x = Math::BigRat->new("123.456"); $x; ok 179 - $x = Math::BigRat->new("0.01"); $x; ok 180 - $x = Math::BigRat->new(".002"); $x; ok 181 - $x = Math::BigRat->new("+.2"); $x; ok 182 - $x = Math::BigRat->new("-0.0003"); $x; ok 183 - $x = Math::BigRat->new("-.0000000004"); $x; ok 184 - $x = Math::BigRat->new("123456E2"); $x; ok 185 - $x = Math::BigRat->new("123456E-2"); $x; ok 186 - $x = Math::BigRat->new("-123456E2"); $x; ok 187 - $x = Math::BigRat->new("-123456E-2"); $x; ok 188 - $x = Math::BigRat->new("1e1"); $x; ok 189 - $x = Math::BigRat->new("2e-11"); $x; ok 190 - $x = Math::BigRat->new("12/10"); $x; ok 191 - $x = Math::BigRat->new("0.1/0.1"); $x; ok 192 - $x = Math::BigRat->new("100/0.1"); $x; ok 193 - $x = Math::BigRat->new("0.1/10"); $x; ok 194 - $x = Math::BigRat->new("1 / 3"); $x; ok 195 - $x = Math::BigRat->new("1/ 3"); $x; ok 196 - $x = Math::BigRat->new("1 /3"); $x; ok 197 - $x = Math::BigRat->new("fnegNaN"); $x->bneg(); ok 198 - $x = Math::BigRat->new("+inf"); $x->bneg(); ok 199 - $x = Math::BigRat->new("-inf"); $x->bneg(); ok 200 - $x = Math::BigRat->new("+0"); $x->bneg(); ok 201 - $x = Math::BigRat->new("+1"); $x->bneg(); ok 202 - $x = Math::BigRat->new("-1"); $x->bneg(); ok 203 - $x = Math::BigRat->new("+123456789"); $x->bneg(); ok 204 - $x = Math::BigRat->new("-123456789"); $x->bneg(); ok 205 - $x = Math::BigRat->new("+123.456789"); $x->bneg(); ok 206 - $x = Math::BigRat->new("-123456.789"); $x->bneg(); ok 207 - $x = Math::BigRat->new("123/7"); $x->bneg(); ok 208 - $x = Math::BigRat->new("-123/7"); $x->bneg(); ok 209 - $x = Math::BigRat->new("123/-7"); $x->bneg(); ok 210 - $x = Math::BigRat->new("fabsNaN"); $x->babs(); ok 211 - $x = Math::BigRat->new("+inf"); $x->babs(); ok 212 - $x = Math::BigRat->new("-inf"); $x->babs(); ok 213 - $x = Math::BigRat->new("+0"); $x->babs(); ok 214 - $x = Math::BigRat->new("+1"); $x->babs(); ok 215 - $x = Math::BigRat->new("-1"); $x->babs(); ok 216 - $x = Math::BigRat->new("+123456789"); $x->babs(); ok 217 - $x = Math::BigRat->new("-123456789"); $x->babs(); ok 218 - $x = Math::BigRat->new("+123.456789"); $x->babs(); ok 219 - $x = Math::BigRat->new("-123456.789"); $x->babs(); ok 220 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x + $y; ok 221 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x + $y; ok 222 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x + $y; ok 223 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x + $y; ok 224 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x + $y; ok 225 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x + $y; ok 226 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x + $y; ok 227 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x + $y; ok 228 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x + $y; ok 229 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("baddNaN"); $x + $y; ok 230 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("baddNaN"); $x + $y; ok 231 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x + $y; ok 232 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x + $y; ok 233 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x + $y; ok 234 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x + $y; ok 235 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x + $y; ok 236 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x + $y; ok 237 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x + $y; ok 238 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x + $y; ok 239 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x + $y; ok 240 - $x = Math::BigRat->new("+9"); $y = Math::BigRat->new("+1"); $x + $y; ok 241 - $x = Math::BigRat->new("+99"); $y = Math::BigRat->new("+1"); $x + $y; ok 242 - $x = Math::BigRat->new("+999"); $y = Math::BigRat->new("+1"); $x + $y; ok 243 - $x = Math::BigRat->new("+9999"); $y = Math::BigRat->new("+1"); $x + $y; ok 244 - $x = Math::BigRat->new("+99999"); $y = Math::BigRat->new("+1"); $x + $y; ok 245 - $x = Math::BigRat->new("+999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 246 - $x = Math::BigRat->new("+9999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 247 - $x = Math::BigRat->new("+99999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 248 - $x = Math::BigRat->new("+999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 249 - $x = Math::BigRat->new("+9999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 250 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+1"); $x + $y; ok 251 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("-1"); $x + $y; ok 252 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("-1"); $x + $y; ok 253 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("-1"); $x + $y; ok 254 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-1"); $x + $y; ok 255 - $x = Math::BigRat->new("+100000"); $y = Math::BigRat->new("-1"); $x + $y; ok 256 - $x = Math::BigRat->new("+1000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 257 - $x = Math::BigRat->new("+10000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 258 - $x = Math::BigRat->new("+100000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 259 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 260 - $x = Math::BigRat->new("+10000000000"); $y = Math::BigRat->new("-1"); $x + $y; ok 261 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("+987654321"); $x + $y; ok 262 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x + $y; ok 263 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("-987654321"); $x + $y; ok 264 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x + $y; ok 265 - $x = Math::BigRat->new("1/3"); $y = Math::BigRat->new("1/3"); $x + $y; ok 266 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("-1/3"); $x + $y; ok 267 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x - $y; ok 268 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x - $y; ok 269 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x - $y; ok 270 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x - $y; ok 271 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x - $y; ok 272 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x - $y; ok 273 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x - $y; ok 274 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x - $y; ok 275 - $x = Math::BigRat->new("baddNaN"); $y = Math::BigRat->new("+inf"); $x - $y; ok 276 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("baddNaN"); $x - $y; ok 277 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("baddNaN"); $x - $y; ok 278 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x - $y; ok 279 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x - $y; ok 280 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x - $y; ok 281 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x - $y; ok 282 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x - $y; ok 283 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x - $y; ok 284 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x - $y; ok 285 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x - $y; ok 286 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x - $y; ok 287 - $x = Math::BigRat->new("+9"); $y = Math::BigRat->new("+1"); $x - $y; ok 288 - $x = Math::BigRat->new("+99"); $y = Math::BigRat->new("+1"); $x - $y; ok 289 - $x = Math::BigRat->new("+999"); $y = Math::BigRat->new("+1"); $x - $y; ok 290 - $x = Math::BigRat->new("+9999"); $y = Math::BigRat->new("+1"); $x - $y; ok 291 - $x = Math::BigRat->new("+99999"); $y = Math::BigRat->new("+1"); $x - $y; ok 292 - $x = Math::BigRat->new("+999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 293 - $x = Math::BigRat->new("+9999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 294 - $x = Math::BigRat->new("+99999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 295 - $x = Math::BigRat->new("+999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 296 - $x = Math::BigRat->new("+9999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 297 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+1"); $x - $y; ok 298 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("-1"); $x - $y; ok 299 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("-1"); $x - $y; ok 300 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("-1"); $x - $y; ok 301 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-1"); $x - $y; ok 302 - $x = Math::BigRat->new("+100000"); $y = Math::BigRat->new("-1"); $x - $y; ok 303 - $x = Math::BigRat->new("+1000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 304 - $x = Math::BigRat->new("+10000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 305 - $x = Math::BigRat->new("+100000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 306 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 307 - $x = Math::BigRat->new("+10000000000"); $y = Math::BigRat->new("-1"); $x - $y; ok 308 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("+987654321"); $x - $y; ok 309 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x - $y; ok 310 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("-987654321"); $x - $y; ok 311 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x - $y; ok 312 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("1/3"); $x - $y; ok 313 - $x = Math::BigRat->new("7/27"); $y = Math::BigRat->new("3/54"); $x - $y; ok 314 - $x = Math::BigRat->new("-2/3"); $y = Math::BigRat->new("+2/3"); $x - $y; ok 315 - $x = Math::BigRat->new("-2/3"); $y = Math::BigRat->new("-2/3"); $x - $y; ok 316 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-123"); $x - $y; ok 317 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("123"); $x - $y; ok 318 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $x * $y; ok 319 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+0"); $x * $y; ok 320 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("abc"); $x * $y; ok 321 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaNmul"); $x * $y; ok 322 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaNmul"); $x * $y; ok 323 - $x = Math::BigRat->new("NaNmul"); $y = Math::BigRat->new("+inf"); $x * $y; ok 324 - $x = Math::BigRat->new("NaNmul"); $y = Math::BigRat->new("-inf"); $x * $y; ok 325 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x * $y; ok 326 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x * $y; ok 327 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x * $y; ok 328 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x * $y; ok 329 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("123.34"); $x * $y; ok 330 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-123.34"); $x * $y; ok 331 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("123.34"); $x * $y; ok 332 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-123.34"); $x * $y; ok 333 - $x = Math::BigRat->new("123.34"); $y = Math::BigRat->new("+inf"); $x * $y; ok 334 - $x = Math::BigRat->new("-123.34"); $y = Math::BigRat->new("+inf"); $x * $y; ok 335 - $x = Math::BigRat->new("123.34"); $y = Math::BigRat->new("-inf"); $x * $y; ok 336 - $x = Math::BigRat->new("-123.34"); $y = Math::BigRat->new("-inf"); $x * $y; ok 337 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $x * $y; ok 338 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x * $y; ok 339 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $x * $y; ok 340 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $x * $y; ok 341 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $x * $y; ok 342 - $x = Math::BigRat->new("+123456789123456789"); $y = Math::BigRat->new("+0"); $x * $y; ok 343 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+123456789123456789"); $x * $y; ok 344 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x * $y; ok 345 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x * $y; ok 346 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x * $y; ok 347 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $x * $y; ok 348 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("+3"); $x * $y; ok 349 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("+3"); $x * $y; ok 350 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("-3"); $x * $y; ok 351 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3"); $x * $y; ok 352 - $x = Math::BigRat->new("+111"); $y = Math::BigRat->new("+111"); $x * $y; ok 353 - $x = Math::BigRat->new("+10101"); $y = Math::BigRat->new("+10101"); $x * $y; ok 354 - $x = Math::BigRat->new("+1001001"); $y = Math::BigRat->new("+1001001"); $x * $y; ok 355 - $x = Math::BigRat->new("+100010001"); $y = Math::BigRat->new("+100010001"); $x * $y; ok 356 - $x = Math::BigRat->new("+10000100001"); $y = Math::BigRat->new("+10000100001"); $x * $y; ok 357 - $x = Math::BigRat->new("+11111111111"); $y = Math::BigRat->new("+9"); $x * $y; ok 358 - $x = Math::BigRat->new("+22222222222"); $y = Math::BigRat->new("+9"); $x * $y; ok 359 - $x = Math::BigRat->new("+33333333333"); $y = Math::BigRat->new("+9"); $x * $y; ok 360 - $x = Math::BigRat->new("+44444444444"); $y = Math::BigRat->new("+9"); $x * $y; ok 361 - $x = Math::BigRat->new("+55555555555"); $y = Math::BigRat->new("+9"); $x * $y; ok 362 - $x = Math::BigRat->new("+66666666666"); $y = Math::BigRat->new("+9"); $x * $y; ok 363 - $x = Math::BigRat->new("+77777777777"); $y = Math::BigRat->new("+9"); $x * $y; ok 364 - $x = Math::BigRat->new("+88888888888"); $y = Math::BigRat->new("+9"); $x * $y; ok 365 - $x = Math::BigRat->new("+99999999999"); $y = Math::BigRat->new("+9"); $x * $y; ok 366 - $x = Math::BigRat->new("6"); $y = Math::BigRat->new("120"); $x * $y; ok 367 - $x = Math::BigRat->new("10"); $y = Math::BigRat->new("10000"); $x * $y; ok 368 - $x = Math::BigRat->new("1/4"); $y = Math::BigRat->new("1/3"); $x * $y; ok 369 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 370 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1"); ; join(",", $x->bdiv($y)); ok 371 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 372 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("0"); ; join(",", $x->bdiv($y)); ok 373 - $x = Math::BigRat->new("9"); $y = Math::BigRat->new("4"); ; join(",", $x->bdiv($y)); ok 374 - $x = Math::BigRat->new("-9"); $y = Math::BigRat->new("4"); ; join(",", $x->bdiv($y)); ok 375 - $x = Math::BigRat->new("9"); $y = Math::BigRat->new("-4"); ; join(",", $x->bdiv($y)); ok 376 - $x = Math::BigRat->new("-9"); $y = Math::BigRat->new("-4"); ; join(",", $x->bdiv($y)); ok 377 - $x = Math::BigRat->new("11/7"); $y = Math::BigRat->new("2/3"); ; join(",", $x->bdiv($y)); ok 378 - $x = Math::BigRat->new("-11/7"); $y = Math::BigRat->new("2/3"); ; join(",", $x->bdiv($y)); ok 379 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 380 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 381 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 382 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 383 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("abc"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 384 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 385 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 386 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 387 - $x = Math::BigRat->new("+3214"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 388 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 389 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 390 - $x = Math::BigRat->new("-3214"); $y = Math::BigRat->new("+0"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 391 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 392 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 393 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 394 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 395 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("+2"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 396 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("+1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 397 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("+inf"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 398 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("-inf"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 399 - $x = Math::BigRat->new("+10"); $y = Math::BigRat->new("+5"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 400 - $x = Math::BigRat->new("+100"); $y = Math::BigRat->new("+4"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 401 - $x = Math::BigRat->new("+1000"); $y = Math::BigRat->new("+8"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 402 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("+16"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 403 - $x = Math::BigRat->new("+10000"); $y = Math::BigRat->new("-16"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 404 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 405 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+99"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 406 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 407 - $x = Math::BigRat->new("+999999999999"); $y = Math::BigRat->new("+9999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 408 - $x = Math::BigRat->new("+999999999999999"); $y = Math::BigRat->new("+99999"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 409 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 410 - $x = Math::BigRat->new("+2000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 411 - $x = Math::BigRat->new("+3000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 412 - $x = Math::BigRat->new("+4000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 413 - $x = Math::BigRat->new("+5000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 414 - $x = Math::BigRat->new("+6000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 415 - $x = Math::BigRat->new("+7000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 416 - $x = Math::BigRat->new("+8000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 417 - $x = Math::BigRat->new("+9000000000"); $y = Math::BigRat->new("+9"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 418 - $x = Math::BigRat->new("+35500000"); $y = Math::BigRat->new("+113"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 419 - $x = Math::BigRat->new("+71000000"); $y = Math::BigRat->new("+226"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 420 - $x = Math::BigRat->new("+106500000"); $y = Math::BigRat->new("+339"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 421 - $x = Math::BigRat->new("+1000000000"); $y = Math::BigRat->new("+3"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 422 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("25.024996000799840031993601279744051189762"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 423 - $x = Math::BigRat->new("123456"); $y = Math::BigRat->new("1"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 424 - $x = Math::BigRat->new("1/4"); $y = Math::BigRat->new("1/3"); $Math::BigRat::div_scale = 40; $Math::BigRat::round_mode = "even"; $x / $y; ok 425 - $x = Math::BigRat->new("123"); $x->is_nan(); ok 426 - $x = Math::BigRat->new("abc"); $x->is_nan(); ok 427 - $x = Math::BigRat->new("NaN"); $x->is_nan(); ok 428 - $x = Math::BigRat->new("-123"); $x->is_nan(); ok 429 - $x = Math::BigRat->new("abc"); $x->is_inf(); ok 430 - $x = Math::BigRat->new("NaN"); $x->is_inf(); ok 431 - $x = Math::BigRat->new("+inf"); $x->is_inf(); ok 432 - $x = Math::BigRat->new("-inf"); $x->is_inf(); ok 433 - $x = Math::BigRat->new("-1"); $x->is_inf(); ok 434 - $x = Math::BigRat->new("0"); $x->is_inf(); ok 435 - $x = Math::BigRat->new("1"); $x->is_inf(); ok 436 - $x = Math::BigRat->new("abc"); $x->is_inf("+"); ok 437 - $x = Math::BigRat->new("NaN"); $x->is_inf("+"); ok 438 - $x = Math::BigRat->new("+inf"); $x->is_inf("+"); ok 439 - $x = Math::BigRat->new("-inf"); $x->is_inf("+"); ok 440 - $x = Math::BigRat->new("-1"); $x->is_inf("+"); ok 441 - $x = Math::BigRat->new("0"); $x->is_inf("+"); ok 442 - $x = Math::BigRat->new("1"); $x->is_inf("+"); ok 443 - $x = Math::BigRat->new("abc"); $x->is_inf("-"); ok 444 - $x = Math::BigRat->new("NaN"); $x->is_inf("-"); ok 445 - $x = Math::BigRat->new("+inf"); $x->is_inf("-"); ok 446 - $x = Math::BigRat->new("-inf"); $x->is_inf("-"); ok 447 - $x = Math::BigRat->new("-1"); $x->is_inf("-"); ok 448 - $x = Math::BigRat->new("0"); $x->is_inf("-"); ok 449 - $x = Math::BigRat->new("1"); $x->is_inf("-"); ok 450 - $x = Math::BigRat->new("+infinity"); $x->is_inf(); ok 451 - $x = Math::BigRat->new("-infinity"); $x->is_inf(); ok 452 - $x = Math::BigRat->new("abc"); $x->is_odd(); ok 453 - $x = Math::BigRat->new("0"); $x->is_odd(); ok 454 - $x = Math::BigRat->new("-1"); $x->is_odd(); ok 455 - $x = Math::BigRat->new("-3"); $x->is_odd(); ok 456 - $x = Math::BigRat->new("1"); $x->is_odd(); ok 457 - $x = Math::BigRat->new("3"); $x->is_odd(); ok 458 - $x = Math::BigRat->new("1000001"); $x->is_odd(); ok 459 - $x = Math::BigRat->new("1000002"); $x->is_odd(); ok 460 - $x = Math::BigRat->new("+inf"); $x->is_odd(); ok 461 - $x = Math::BigRat->new("-inf"); $x->is_odd(); ok 462 - $x = Math::BigRat->new("123.45"); $x->is_odd(); ok 463 - $x = Math::BigRat->new("-123.45"); $x->is_odd(); ok 464 - $x = Math::BigRat->new("2"); $x->is_odd(); ok 465 - $x = Math::BigRat->new("NaNis_int"); $x->is_int(); ok 466 - $x = Math::BigRat->new("0"); $x->is_int(); ok 467 - $x = Math::BigRat->new("1"); $x->is_int(); ok 468 - $x = Math::BigRat->new("2"); $x->is_int(); ok 469 - $x = Math::BigRat->new("-2"); $x->is_int(); ok 470 - $x = Math::BigRat->new("-1"); $x->is_int(); ok 471 - $x = Math::BigRat->new("-inf"); $x->is_int(); ok 472 - $x = Math::BigRat->new("+inf"); $x->is_int(); ok 473 - $x = Math::BigRat->new("123.4567"); $x->is_int(); ok 474 - $x = Math::BigRat->new("-0.1"); $x->is_int(); ok 475 - $x = Math::BigRat->new("-0.002"); $x->is_int(); ok 476 - $x = Math::BigRat->new("1/3"); $x->is_int(); ok 477 - $x = Math::BigRat->new("3/1"); $x->is_int(); ok 478 - $x = Math::BigRat->new("abc"); $x->is_even(); ok 479 - $x = Math::BigRat->new("0"); $x->is_even(); ok 480 - $x = Math::BigRat->new("-1"); $x->is_even(); ok 481 - $x = Math::BigRat->new("-3"); $x->is_even(); ok 482 - $x = Math::BigRat->new("1"); $x->is_even(); ok 483 - $x = Math::BigRat->new("3"); $x->is_even(); ok 484 - $x = Math::BigRat->new("1000001"); $x->is_even(); ok 485 - $x = Math::BigRat->new("1000002"); $x->is_even(); ok 486 - $x = Math::BigRat->new("2"); $x->is_even(); ok 487 - $x = Math::BigRat->new("+inf"); $x->is_even(); ok 488 - $x = Math::BigRat->new("-inf"); $x->is_even(); ok 489 - $x = Math::BigRat->new("123.456"); $x->is_even(); ok 490 - $x = Math::BigRat->new("-123.456"); $x->is_even(); ok 491 - $x = Math::BigRat->new("0.01"); $x->is_even(); ok 492 - $x = Math::BigRat->new("-0.01"); $x->is_even(); ok 493 - $x = Math::BigRat->new("120"); $x->is_even(); ok 494 - $x = Math::BigRat->new("1200"); $x->is_even(); ok 495 - $x = Math::BigRat->new("-1200"); $x->is_even(); ok 496 - $x = Math::BigRat->new("0"); $x->is_pos(); ok 497 - $x = Math::BigRat->new("1"); $x->is_pos(); ok 498 - $x = Math::BigRat->new("-1"); $x->is_pos(); ok 499 - $x = Math::BigRat->new("-123"); $x->is_pos(); ok 500 - $x = Math::BigRat->new("NaN"); $x->is_pos(); ok 501 - $x = Math::BigRat->new("-inf"); $x->is_pos(); ok 502 - $x = Math::BigRat->new("+inf"); $x->is_pos(); ok 503 - $x = Math::BigRat->new("0"); $x->is_positive(); ok 504 - $x = Math::BigRat->new("1"); $x->is_positive(); ok 505 - $x = Math::BigRat->new("-1"); $x->is_positive(); ok 506 - $x = Math::BigRat->new("-123"); $x->is_positive(); ok 507 - $x = Math::BigRat->new("NaN"); $x->is_positive(); ok 508 - $x = Math::BigRat->new("-inf"); $x->is_positive(); ok 509 - $x = Math::BigRat->new("+inf"); $x->is_positive(); ok 510 - $x = Math::BigRat->new("0"); $x->is_neg(); ok 511 - $x = Math::BigRat->new("1"); $x->is_neg(); ok 512 - $x = Math::BigRat->new("-1"); $x->is_neg(); ok 513 - $x = Math::BigRat->new("-123"); $x->is_neg(); ok 514 - $x = Math::BigRat->new("NaN"); $x->is_neg(); ok 515 - $x = Math::BigRat->new("-inf"); $x->is_neg(); ok 516 - $x = Math::BigRat->new("+inf"); $x->is_neg(); ok 517 - $x = Math::BigRat->new("0"); $x->is_negative(); ok 518 - $x = Math::BigRat->new("1"); $x->is_negative(); ok 519 - $x = Math::BigRat->new("-1"); $x->is_negative(); ok 520 - $x = Math::BigRat->new("-123"); $x->is_negative(); ok 521 - $x = Math::BigRat->new("NaN"); $x->is_negative(); ok 522 - $x = Math::BigRat->new("-inf"); $x->is_negative(); ok 523 - $x = Math::BigRat->new("+inf"); $x->is_negative(); ok 524 - $x = Math::BigRat->new("0"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 525 - $x = Math::BigRat->new("1"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 526 - $x = Math::BigRat->new("123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 527 - $x = Math::BigRat->new("-123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 528 - $x = Math::BigRat->new("-1200"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 529 - $x = Math::BigRat->new("5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 530 - $x = Math::BigRat->new("-5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 531 - $x = Math::BigRat->new("NaNparts"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 532 - $x = Math::BigRat->new("+inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 533 - $x = Math::BigRat->new("-inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 534 - $x = Math::BigRat->new("123"); $x->length(); ok 535 - $x = Math::BigRat->new("-123"); $x->length(); ok 536 - $x = Math::BigRat->new("0"); $x->length(); ok 537 - $x = Math::BigRat->new("1"); $x->length(); ok 538 - $x = Math::BigRat->new("12345678901234567890"); $x->length(); ok 539 - $x = Math::BigRat->new("NaNzero"); $x->is_zero(); ok 540 - $x = Math::BigRat->new("+inf"); $x->is_zero(); ok 541 - $x = Math::BigRat->new("-inf"); $x->is_zero(); ok 542 - $x = Math::BigRat->new("0"); $x->is_zero(); ok 543 - $x = Math::BigRat->new("-1"); $x->is_zero(); ok 544 - $x = Math::BigRat->new("1"); $x->is_zero(); ok 545 - $x = Math::BigRat->new("0/3"); $x->is_zero(); ok 546 - $x = Math::BigRat->new("1/3"); $x->is_zero(); ok 547 - $x = Math::BigRat->new("-0/3"); $x->is_zero(); ok 548 - $x = Math::BigRat->new("5/inf"); $x->is_zero(); ok 549 - $x = Math::BigRat->new("invalid"); $x->is_one(); ok 550 - $x = Math::BigRat->new("NaN"); $x->is_one(); ok 551 - $x = Math::BigRat->new("+inf"); $x->is_one(); ok 552 - $x = Math::BigRat->new("-inf"); $x->is_one(); ok 553 - $x = Math::BigRat->new("-2"); $x->is_one(); ok 554 - $x = Math::BigRat->new("-1"); $x->is_one(); ok 555 - $x = Math::BigRat->new("0"); $x->is_one(); ok 556 - $x = Math::BigRat->new("1"); $x->is_one(); ok 557 - $x = Math::BigRat->new("-2"); $x->is_one(); ok 558 - $x = Math::BigRat->new("invalid"); $x->is_one("+"); ok 559 - $x = Math::BigRat->new("NaN"); $x->is_one("+"); ok 560 - $x = Math::BigRat->new("+inf"); $x->is_one("+"); ok 561 - $x = Math::BigRat->new("-inf"); $x->is_one("+"); ok 562 - $x = Math::BigRat->new("-2"); $x->is_one("+"); ok 563 - $x = Math::BigRat->new("-1"); $x->is_one("+"); ok 564 - $x = Math::BigRat->new("0"); $x->is_one("+"); ok 565 - $x = Math::BigRat->new("1"); $x->is_one("+"); ok 566 - $x = Math::BigRat->new("-2"); $x->is_one("+"); ok 567 - $x = Math::BigRat->new("invalid"); $x->is_one("-"); ok 568 - $x = Math::BigRat->new("NaN"); $x->is_one("-"); ok 569 - $x = Math::BigRat->new("+inf"); $x->is_one("-"); ok 570 - $x = Math::BigRat->new("-inf"); $x->is_one("-"); ok 571 - $x = Math::BigRat->new("-2"); $x->is_one("-"); ok 572 - $x = Math::BigRat->new("-1"); $x->is_one("-"); ok 573 - $x = Math::BigRat->new("0"); $x->is_one("-"); ok 574 - $x = Math::BigRat->new("1"); $x->is_one("-"); ok 575 - $x = Math::BigRat->new("-2"); $x->is_one("-"); ok 576 - $x = Math::BigRat->new("1/3"); $x->is_one(); ok 577 - $x = Math::BigRat->new("100/100"); $x->is_one(); ok 578 - $x = Math::BigRat->new("0.1/0.1"); $x->is_one(); ok 579 - $x = Math::BigRat->new("5/inf"); $x->is_one(); ok 580 - $x = Math::BigRat->new("0"); $x->bfloor(); ok 581 - $x = Math::BigRat->new("abc"); $x->bfloor(); ok 582 - $x = Math::BigRat->new("+inf"); $x->bfloor(); ok 583 - $x = Math::BigRat->new("-inf"); $x->bfloor(); ok 584 - $x = Math::BigRat->new("1"); $x->bfloor(); ok 585 - $x = Math::BigRat->new("-51"); $x->bfloor(); ok 586 - $x = Math::BigRat->new("-51.2"); $x->bfloor(); ok 587 - $x = Math::BigRat->new("12.2"); $x->bfloor(); ok 588 - $x = Math::BigRat->new("3/7"); $x->bfloor(); ok 589 - $x = Math::BigRat->new("6/7"); $x->bfloor(); ok 590 - $x = Math::BigRat->new("7/7"); $x->bfloor(); ok 591 - $x = Math::BigRat->new("8/7"); $x->bfloor(); ok 592 - $x = Math::BigRat->new("13/7"); $x->bfloor(); ok 593 - $x = Math::BigRat->new("14/7"); $x->bfloor(); ok 594 - $x = Math::BigRat->new("15/7"); $x->bfloor(); ok 595 - $x = Math::BigRat->new("-3/7"); $x->bfloor(); ok 596 - $x = Math::BigRat->new("-6/7"); $x->bfloor(); ok 597 - $x = Math::BigRat->new("-7/1"); $x->bfloor(); ok 598 - $x = Math::BigRat->new("-8/7"); $x->bfloor(); ok 599 - $x = Math::BigRat->new("-13/7"); $x->bfloor(); ok 600 - $x = Math::BigRat->new("-14/7"); $x->bfloor(); ok 601 - $x = Math::BigRat->new("-15/7"); $x->bfloor(); ok 602 - $x = Math::BigRat->new("0"); $x->bceil(); ok 603 - $x = Math::BigRat->new("abc"); $x->bceil(); ok 604 - $x = Math::BigRat->new("+inf"); $x->bceil(); ok 605 - $x = Math::BigRat->new("-inf"); $x->bceil(); ok 606 - $x = Math::BigRat->new("1"); $x->bceil(); ok 607 - $x = Math::BigRat->new("-51"); $x->bceil(); ok 608 - $x = Math::BigRat->new("-51.2"); $x->bceil(); ok 609 - $x = Math::BigRat->new("12.2"); $x->bceil(); ok 610 - $x = Math::BigRat->new("3/7"); $x->bceil(); ok 611 - $x = Math::BigRat->new("6/7"); $x->bceil(); ok 612 - $x = Math::BigRat->new("8/7"); $x->bceil(); ok 613 - $x = Math::BigRat->new("13/7"); $x->bceil(); ok 614 - $x = Math::BigRat->new("14/7"); $x->bceil(); ok 615 - $x = Math::BigRat->new("15/7"); $x->bceil(); ok 616 - $x = Math::BigRat->new("-3/7"); $x->bceil(); ok 617 - $x = Math::BigRat->new("-6/7"); $x->bceil(); ok 618 - $x = Math::BigRat->new("-8/7"); $x->bceil(); ok 619 - $x = Math::BigRat->new("-13/7"); $x->bceil(); ok 620 - $x = Math::BigRat->new("-14/7"); $x->bceil(); ok 621 - $x = Math::BigRat->new("-15/7"); $x->bceil(); ok 622 - $x = Math::BigRat->new("NaN"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 623 - $x = Math::BigRat->new("1"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 624 - $x = Math::BigRat->new("-1"); $Math::BigRat::div_scale = 40; $x->bfac(); ok 625 - $x = Math::BigRat->new("abc"); $y = Math::BigRat->new("123"); $x->bpow($y); ok 626 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("abc"); $x->bpow($y); ok 627 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 628 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 629 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 630 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 631 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 632 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 633 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 634 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 635 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 636 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 637 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 638 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 639 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 640 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 641 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 642 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 643 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 644 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 645 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 646 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 647 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 648 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 649 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 650 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 651 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 652 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 653 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 654 - $x = Math::BigRat->new("-3"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 655 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 656 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 657 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 658 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 659 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 660 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 661 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 662 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 663 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 664 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 665 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 666 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 667 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 668 - $x = Math::BigRat->new("-2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 669 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 670 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 671 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 672 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 673 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 674 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 675 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 676 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 677 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 678 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 679 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 680 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 681 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 682 - $x = Math::BigRat->new("-3/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 683 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 684 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 685 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 686 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 687 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 688 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 689 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 690 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 691 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 692 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 693 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 694 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 695 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 696 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 697 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 698 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 699 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 700 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 701 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 702 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 703 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 704 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 705 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 706 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 707 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 708 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 709 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 710 - $x = Math::BigRat->new("-1/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 711 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 712 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 713 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 714 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 715 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 716 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 717 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 718 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 719 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 720 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 721 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 722 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 723 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 724 - $x = Math::BigRat->new("0"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 725 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 726 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 727 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 728 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 729 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 730 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 731 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 732 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 733 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 734 - $x = Math::BigRat->new("1/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 735 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 736 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 737 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 738 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 739 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 740 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 741 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 742 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 743 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 744 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 745 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 746 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 747 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 748 - $x = Math::BigRat->new("1"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 749 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 750 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 751 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 752 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 753 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 754 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 755 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 756 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 757 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 758 - $x = Math::BigRat->new("3/2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 759 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 760 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 761 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 763 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 764 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 765 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 766 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 767 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 768 - $x = Math::BigRat->new("2"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 769 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 770 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 771 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 772 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 773 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 774 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 775 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 776 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 777 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 778 - $x = Math::BigRat->new("3"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 779 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 780 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 781 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 782 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 783 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 784 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 785 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 786 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 787 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 788 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 789 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 790 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 791 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 792 - $x = Math::BigRat->new("inf"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 793 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-inf"); $x->bpow($y); ok 794 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-3"); $x->bpow($y); ok 795 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-2"); $x->bpow($y); ok 796 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-3/2"); $x->bpow($y); ok 797 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-1"); $x->bpow($y); ok 798 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-1/2"); $x->bpow($y); ok 799 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("0"); $x->bpow($y); ok 800 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1/2"); $x->bpow($y); ok 801 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("1"); $x->bpow($y); ok 802 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("3/2"); $x->bpow($y); ok 803 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("2"); $x->bpow($y); ok 804 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("3"); $x->bpow($y); ok 805 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("inf"); $x->bpow($y); ok 806 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("NaN"); $x->bpow($y); ok 807 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("-0"); $x->bacmp($y); ok 808 - $x = Math::BigRat->new("+0"); $y = Math::BigRat->new("+1"); $x->bacmp($y); ok 809 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+1"); $x->bacmp($y); ok 810 - $x = Math::BigRat->new("+1"); $y = Math::BigRat->new("-1"); $x->bacmp($y); ok 811 - $x = Math::BigRat->new("-1"); $y = Math::BigRat->new("+2"); $x->bacmp($y); ok 812 - $x = Math::BigRat->new("+2"); $y = Math::BigRat->new("-1"); $x->bacmp($y); ok 813 - $x = Math::BigRat->new("-123456789"); $y = Math::BigRat->new("+987654321"); $x->bacmp($y); ok 814 - $x = Math::BigRat->new("+123456789"); $y = Math::BigRat->new("-987654321"); $x->bacmp($y); ok 815 - $x = Math::BigRat->new("+987654321"); $y = Math::BigRat->new("+123456789"); $x->bacmp($y); ok 816 - $x = Math::BigRat->new("-987654321"); $y = Math::BigRat->new("+123456789"); $x->bacmp($y); ok 817 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("+4567889"); $x->bacmp($y); ok 818 - $x = Math::BigRat->new("acmpNaN"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 819 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("acmpNaN"); $x->bacmp($y); ok 820 - $x = Math::BigRat->new("acmpNaN"); $y = Math::BigRat->new("acmpNaN"); $x->bacmp($y); ok 821 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("+inf"); $x->bacmp($y); ok 822 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 823 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 824 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("+inf"); $x->bacmp($y); ok 825 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 826 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("123"); $x->bacmp($y); ok 827 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-123"); $x->bacmp($y); ok 828 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-123"); $x->bacmp($y); ok 829 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("1/23"); $x->bacmp($y); ok 830 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("1/23"); $x->bacmp($y); ok 831 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-1/23"); $x->bacmp($y); ok 832 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-1/23"); $x->bacmp($y); ok 833 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("12/3"); $x->bacmp($y); ok 834 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("12/3"); $x->bacmp($y); ok 835 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("-12/3"); $x->bacmp($y); ok 836 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("-12/3"); $x->bacmp($y); ok 837 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 838 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 839 - $x = Math::BigRat->new("123"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 840 - $x = Math::BigRat->new("-123"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 841 - $x = Math::BigRat->new("1/23"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 842 - $x = Math::BigRat->new("-1/23"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 843 - $x = Math::BigRat->new("1/23"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 844 - $x = Math::BigRat->new("-1/23"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 845 - $x = Math::BigRat->new("12/3"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 846 - $x = Math::BigRat->new("-12/3"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 847 - $x = Math::BigRat->new("12/3"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 848 - $x = Math::BigRat->new("-12/3"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 849 - $x = Math::BigRat->new("+inf"); $y = Math::BigRat->new("NaN"); $x->bacmp($y); ok 850 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("inf"); $x->bacmp($y); ok 851 - $x = Math::BigRat->new("-inf"); $y = Math::BigRat->new("NaN"); $x->bacmp($y); ok 852 - $x = Math::BigRat->new("NaN"); $y = Math::BigRat->new("-inf"); $x->bacmp($y); ok 853 - $x = Math::BigRat->new("1/3"); $y = Math::BigRat->new("2/3"); $x->bacmp($y); ok 854 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("1/3"); $x->bacmp($y); ok 855 - $x = Math::BigRat->new("2/3"); $y = Math::BigRat->new("2/3"); $x->bacmp($y); ok 856 - $x = Math::BigRat->new("NaN"); $x->numerator()->bstr(); ok 857 - $x = Math::BigRat->new("inf"); $x->numerator()->bstr(); ok 858 - $x = Math::BigRat->new("-inf"); $x->numerator()->bstr(); ok 859 - $x = Math::BigRat->new("3/7"); $x->numerator()->bstr(); ok 860 - $x = Math::BigRat->new("-3/7"); $x->numerator()->bstr(); ok 861 - $x = Math::BigRat->new("0"); $x->numerator()->bstr(); ok 862 - $x = Math::BigRat->new("1"); $x->numerator()->bstr(); ok 863 - $x = Math::BigRat->new("5/-3"); $x->numerator()->bstr(); ok 864 - $x = Math::BigRat->new("NaN"); $x->denominator()->bstr(); ok 865 - $x = Math::BigRat->new("inf"); $x->denominator()->bstr(); ok 866 - $x = Math::BigRat->new("-inf"); $x->denominator()->bstr(); ok 867 - $x = Math::BigRat->new("3/7"); $x->denominator()->bstr(); ok 868 - $x = Math::BigRat->new("0"); $x->denominator()->bstr(); ok 869 - $x = Math::BigRat->new("1/1"); $x->denominator()->bstr(); ok 870 - $x = Math::BigRat->new("-1/1"); $x->denominator()->bstr(); ok 871 - $x = Math::BigRat->new("-3/7"); $x->denominator()->bstr(); ok 872 - $x = Math::BigRat->new("4/-5"); $x->denominator()->bstr(); ok 873 - $x = Math::BigRat->new("3/2"); ++$x; ok 874 - $x = Math::BigRat->new("-15/6"); ++$x; ok 875 - $x = Math::BigRat->new("NaN"); ++$x; ok 876 - $x = Math::BigRat->new("-1/3"); ++$x; ok 877 - $x = Math::BigRat->new("-2/7"); ++$x; ok 878 - $x = Math::BigRat->new("15/6"); --$x; ok 879 - $x = Math::BigRat->new("-3/2"); --$x; ok 880 - $x = Math::BigRat->new("1/3"); --$x; ok 881 - $x = Math::BigRat->new("2/7"); --$x; ok 882 - $x = Math::BigRat->new("NaN"); --$x; ok 883 - $x = Math::BigRat->new("-1"); $x = log($x); ok 884 - $x = Math::BigRat->new("0"); $x = log($x); ok 885 - $x = Math::BigRat->new("1"); $x = log($x); ok 886 - $x = Math::BigRat->new("34803"); $x = log($x); ok 887 - $x = Math::BigRat->new("-inf"); $x = log($x); ok 888 - $x = Math::BigRat->new("inf"); $x = log($x); ok 889 - $x = Math::BigRat->new("NaN"); $x = log($x); ok 890 - $x = Math::BigInt->new(1200); $y = Math::BigRat->new($x); 1200 ok 891 - $x = Math::BigInt->new(1200); $y = Math::BigRat->new($x); 1200 ok 892 - $x = Math::BigRat->new(2); $x->bzero(); $x->{accuracy} ok 893 - $x = Math::BigRat->new(2); $x->bzero(); $x->{precision} ok 894 - $x = Math::BigRat->new(2); $x->binf(); $x->{accuracy} ok 895 - $x = Math::BigRat->new(2); $x->binf(); $x->{precision} ok 896 - $x = Math::BigRat->new(2); $x->bone(); $x->{accuracy} ok 897 - $x = Math::BigRat->new(2); $x->bone(); $x->{precision} ok 898 - $x = Math::BigRat->new(2); $x->bnan(); $x->{accuracy} ok 899 - $x = Math::BigRat->new(2); $x->bnan(); $x->{precision} ok t/bigratup.t .................. 1..5 ok 1 - floor(49/4) ok 2 - ceil(49/4) ok 3 - bsqrt(144) ok 4 - bsqrt(144/16) ok 5 - bsqrt(1/3) ok t/bigroot.t ................... 1..16 ok 1 - Try: Math::BigFloat->new(2)->bpow(240)->broot(8, undef) == 1073741824 ok 2 - Try: Math::BigInt->new(2)->bpow(240)->broot(8, undef) == 1073741824 ok 3 - Try: Math::BigFloat->new(2)->bpow(240)->broot(9, undef) == 106528681.3099908308759836475139583940127 ok 4 - Try: Math::BigInt->new(2)->bpow(240)->broot(9, undef) == 106528681 ok 5 - Try: Math::BigFloat->new(2)->bpow(120)->broot(9, undef) == 10321.27324073880096577298929482324664787 ok 6 - Try: Math::BigInt->new(2)->bpow(120)->broot(9, undef) == 10321 ok 7 - Try: Math::BigFloat->new(2)->bpow(120)->broot(17, undef) == 133.3268493632747279600707813049418888729 ok 8 - Try: Math::BigInt->new(2)->bpow(120)->broot(17, undef) == 133 ok 9 - Try: Math::BigFloat->new(2)->bpow(120)->broot(8, undef) == 32768 ok 10 - Try: Math::BigInt->new(2)->bpow(120)->broot(8, undef) == 32768 ok 11 - Try: Math::BigFloat->new(2)->bpow(60)->broot(8, undef) == 181.0193359837561662466161566988413540569 ok 12 - Try: Math::BigInt->new(2)->bpow(60)->broot(8, undef) == 181 ok 13 - Try: Math::BigFloat->new(2)->bpow(60)->broot(9, undef) == 101.5936673259647663841091609134277286651 ok 14 - Try: Math::BigInt->new(2)->bpow(60)->broot(9, undef) == 101 ok 15 - Try: Math::BigFloat->new(2)->bpow(60)->broot(17, undef) == 11.54672461623965153271017217302844672562 ok 16 - Try: Math::BigInt->new(2)->bpow(60)->broot(17, undef) == 11 ok t/bitwise-mbr.t ............... 1..2602 ok 1 - use Math::BigRat; ok 2 - is $@ empty ok 3 - '0 & 0' isa 'Math::BigRat' ok 4 - 0 & 0 = 0 & 0 = 0 ok 5 - is $@ empty ok 6 - '0 & 1/2' isa 'Math::BigRat' ok 7 - 0 & 1/2 = 0 & 0 = 0 ok 8 - is $@ empty ok 9 - '0 & 1' isa 'Math::BigRat' ok 10 - 0 & 1 = 0 & 1 = 0 ok 11 - is $@ empty ok 12 - '0 & 3/2' isa 'Math::BigRat' ok 13 - 0 & 3/2 = 0 & 1 = 0 ok 14 - is $@ empty ok 15 - '0 & 2' isa 'Math::BigRat' ok 16 - 0 & 2 = 0 & 2 = 0 ok 17 - is $@ empty ok 18 - '0 & 5/2' isa 'Math::BigRat' ok 19 - 0 & 5/2 = 0 & 2 = 0 ok 20 - is $@ empty ok 21 - '0 & 3' isa 'Math::BigRat' ok 22 - 0 & 3 = 0 & 3 = 0 ok 23 - is $@ empty ok 24 - '0 & 7/2' isa 'Math::BigRat' ok 25 - 0 & 7/2 = 0 & 3 = 0 ok 26 - is $@ empty ok 27 - '0 & 4' isa 'Math::BigRat' ok 28 - 0 & 4 = 0 & 4 = 0 ok 29 - is $@ empty ok 30 - '0 & 9/2' isa 'Math::BigRat' ok 31 - 0 & 9/2 = 0 & 4 = 0 ok 32 - is $@ empty ok 33 - '0 & 5' isa 'Math::BigRat' ok 34 - 0 & 5 = 0 & 5 = 0 ok 35 - is $@ empty ok 36 - '0 & 11/2' isa 'Math::BigRat' ok 37 - 0 & 11/2 = 0 & 5 = 0 ok 38 - is $@ empty ok 39 - '0 & 6' isa 'Math::BigRat' ok 40 - 0 & 6 = 0 & 6 = 0 ok 41 - is $@ empty ok 42 - '0 & 13/2' isa 'Math::BigRat' ok 43 - 0 & 13/2 = 0 & 6 = 0 ok 44 - is $@ empty ok 45 - '0 & 7' isa 'Math::BigRat' ok 46 - 0 & 7 = 0 & 7 = 0 ok 47 - is $@ empty ok 48 - '0 & 15/2' isa 'Math::BigRat' ok 49 - 0 & 15/2 = 0 & 7 = 0 ok 50 - is $@ empty ok 51 - '0 & 8' isa 'Math::BigRat' ok 52 - 0 & 8 = 0 & 8 = 0 ok 53 - is $@ empty ok 54 - '1/2 & 0' isa 'Math::BigRat' ok 55 - 1/2 & 0 = 0 & 0 = 0 ok 56 - is $@ empty ok 57 - '1/2 & 1/2' isa 'Math::BigRat' ok 58 - 1/2 & 1/2 = 0 & 0 = 0 ok 59 - is $@ empty ok 60 - '1/2 & 1' isa 'Math::BigRat' ok 61 - 1/2 & 1 = 0 & 1 = 0 ok 62 - is $@ empty ok 63 - '1/2 & 3/2' isa 'Math::BigRat' ok 64 - 1/2 & 3/2 = 0 & 1 = 0 ok 65 - is $@ empty ok 66 - '1/2 & 2' isa 'Math::BigRat' ok 67 - 1/2 & 2 = 0 & 2 = 0 ok 68 - is $@ empty ok 69 - '1/2 & 5/2' isa 'Math::BigRat' ok 70 - 1/2 & 5/2 = 0 & 2 = 0 ok 71 - is $@ empty ok 72 - '1/2 & 3' isa 'Math::BigRat' ok 73 - 1/2 & 3 = 0 & 3 = 0 ok 74 - is $@ empty ok 75 - '1/2 & 7/2' isa 'Math::BigRat' ok 76 - 1/2 & 7/2 = 0 & 3 = 0 ok 77 - is $@ empty ok 78 - '1/2 & 4' isa 'Math::BigRat' ok 79 - 1/2 & 4 = 0 & 4 = 0 ok 80 - is $@ empty ok 81 - '1/2 & 9/2' isa 'Math::BigRat' ok 82 - 1/2 & 9/2 = 0 & 4 = 0 ok 83 - is $@ empty ok 84 - '1/2 & 5' isa 'Math::BigRat' ok 85 - 1/2 & 5 = 0 & 5 = 0 ok 86 - is $@ empty ok 87 - '1/2 & 11/2' isa 'Math::BigRat' ok 88 - 1/2 & 11/2 = 0 & 5 = 0 ok 89 - is $@ empty ok 90 - '1/2 & 6' isa 'Math::BigRat' ok 91 - 1/2 & 6 = 0 & 6 = 0 ok 92 - is $@ empty ok 93 - '1/2 & 13/2' isa 'Math::BigRat' ok 94 - 1/2 & 13/2 = 0 & 6 = 0 ok 95 - is $@ empty ok 96 - '1/2 & 7' isa 'Math::BigRat' ok 97 - 1/2 & 7 = 0 & 7 = 0 ok 98 - is $@ empty ok 99 - '1/2 & 15/2' isa 'Math::BigRat' ok 100 - 1/2 & 15/2 = 0 & 7 = 0 ok 101 - is $@ empty ok 102 - '1/2 & 8' isa 'Math::BigRat' ok 103 - 1/2 & 8 = 0 & 8 = 0 ok 104 - is $@ empty ok 105 - '1 & 0' isa 'Math::BigRat' ok 106 - 1 & 0 = 1 & 0 = 0 ok 107 - is $@ empty ok 108 - '1 & 1/2' isa 'Math::BigRat' ok 109 - 1 & 1/2 = 1 & 0 = 0 ok 110 - is $@ empty ok 111 - '1 & 1' isa 'Math::BigRat' ok 112 - 1 & 1 = 1 & 1 = 1 ok 113 - is $@ empty ok 114 - '1 & 3/2' isa 'Math::BigRat' ok 115 - 1 & 3/2 = 1 & 1 = 1 ok 116 - is $@ empty ok 117 - '1 & 2' isa 'Math::BigRat' ok 118 - 1 & 2 = 1 & 2 = 0 ok 119 - is $@ empty ok 120 - '1 & 5/2' isa 'Math::BigRat' ok 121 - 1 & 5/2 = 1 & 2 = 0 ok 122 - is $@ empty ok 123 - '1 & 3' isa 'Math::BigRat' ok 124 - 1 & 3 = 1 & 3 = 1 ok 125 - is $@ empty ok 126 - '1 & 7/2' isa 'Math::BigRat' ok 127 - 1 & 7/2 = 1 & 3 = 1 ok 128 - is $@ empty ok 129 - '1 & 4' isa 'Math::BigRat' ok 130 - 1 & 4 = 1 & 4 = 0 ok 131 - is $@ empty ok 132 - '1 & 9/2' isa 'Math::BigRat' ok 133 - 1 & 9/2 = 1 & 4 = 0 ok 134 - is $@ empty ok 135 - '1 & 5' isa 'Math::BigRat' ok 136 - 1 & 5 = 1 & 5 = 1 ok 137 - is $@ empty ok 138 - '1 & 11/2' isa 'Math::BigRat' ok 139 - 1 & 11/2 = 1 & 5 = 1 ok 140 - is $@ empty ok 141 - '1 & 6' isa 'Math::BigRat' ok 142 - 1 & 6 = 1 & 6 = 0 ok 143 - is $@ empty ok 144 - '1 & 13/2' isa 'Math::BigRat' ok 145 - 1 & 13/2 = 1 & 6 = 0 ok 146 - is $@ empty ok 147 - '1 & 7' isa 'Math::BigRat' ok 148 - 1 & 7 = 1 & 7 = 1 ok 149 - is $@ empty ok 150 - '1 & 15/2' isa 'Math::BigRat' ok 151 - 1 & 15/2 = 1 & 7 = 1 ok 152 - is $@ empty ok 153 - '1 & 8' isa 'Math::BigRat' ok 154 - 1 & 8 = 1 & 8 = 0 ok 155 - is $@ empty ok 156 - '3/2 & 0' isa 'Math::BigRat' ok 157 - 3/2 & 0 = 1 & 0 = 0 ok 158 - is $@ empty ok 159 - '3/2 & 1/2' isa 'Math::BigRat' ok 160 - 3/2 & 1/2 = 1 & 0 = 0 ok 161 - is $@ empty ok 162 - '3/2 & 1' isa 'Math::BigRat' ok 163 - 3/2 & 1 = 1 & 1 = 1 ok 164 - is $@ empty ok 165 - '3/2 & 3/2' isa 'Math::BigRat' ok 166 - 3/2 & 3/2 = 1 & 1 = 1 ok 167 - is $@ empty ok 168 - '3/2 & 2' isa 'Math::BigRat' ok 169 - 3/2 & 2 = 1 & 2 = 0 ok 170 - is $@ empty ok 171 - '3/2 & 5/2' isa 'Math::BigRat' ok 172 - 3/2 & 5/2 = 1 & 2 = 0 ok 173 - is $@ empty ok 174 - '3/2 & 3' isa 'Math::BigRat' ok 175 - 3/2 & 3 = 1 & 3 = 1 ok 176 - is $@ empty ok 177 - '3/2 & 7/2' isa 'Math::BigRat' ok 178 - 3/2 & 7/2 = 1 & 3 = 1 ok 179 - is $@ empty ok 180 - '3/2 & 4' isa 'Math::BigRat' ok 181 - 3/2 & 4 = 1 & 4 = 0 ok 182 - is $@ empty ok 183 - '3/2 & 9/2' isa 'Math::BigRat' ok 184 - 3/2 & 9/2 = 1 & 4 = 0 ok 185 - is $@ empty ok 186 - '3/2 & 5' isa 'Math::BigRat' ok 187 - 3/2 & 5 = 1 & 5 = 1 ok 188 - is $@ empty ok 189 - '3/2 & 11/2' isa 'Math::BigRat' ok 190 - 3/2 & 11/2 = 1 & 5 = 1 ok 191 - is $@ empty ok 192 - '3/2 & 6' isa 'Math::BigRat' ok 193 - 3/2 & 6 = 1 & 6 = 0 ok 194 - is $@ empty ok 195 - '3/2 & 13/2' isa 'Math::BigRat' ok 196 - 3/2 & 13/2 = 1 & 6 = 0 ok 197 - is $@ empty ok 198 - '3/2 & 7' isa 'Math::BigRat' ok 199 - 3/2 & 7 = 1 & 7 = 1 ok 200 - is $@ empty ok 201 - '3/2 & 15/2' isa 'Math::BigRat' ok 202 - 3/2 & 15/2 = 1 & 7 = 1 ok 203 - is $@ empty ok 204 - '3/2 & 8' isa 'Math::BigRat' ok 205 - 3/2 & 8 = 1 & 8 = 0 ok 206 - is $@ empty ok 207 - '2 & 0' isa 'Math::BigRat' ok 208 - 2 & 0 = 2 & 0 = 0 ok 209 - is $@ empty ok 210 - '2 & 1/2' isa 'Math::BigRat' ok 211 - 2 & 1/2 = 2 & 0 = 0 ok 212 - is $@ empty ok 213 - '2 & 1' isa 'Math::BigRat' ok 214 - 2 & 1 = 2 & 1 = 0 ok 215 - is $@ empty ok 216 - '2 & 3/2' isa 'Math::BigRat' ok 217 - 2 & 3/2 = 2 & 1 = 0 ok 218 - is $@ empty ok 219 - '2 & 2' isa 'Math::BigRat' ok 220 - 2 & 2 = 2 & 2 = 2 ok 221 - is $@ empty ok 222 - '2 & 5/2' isa 'Math::BigRat' ok 223 - 2 & 5/2 = 2 & 2 = 2 ok 224 - is $@ empty ok 225 - '2 & 3' isa 'Math::BigRat' ok 226 - 2 & 3 = 2 & 3 = 2 ok 227 - is $@ empty ok 228 - '2 & 7/2' isa 'Math::BigRat' ok 229 - 2 & 7/2 = 2 & 3 = 2 ok 230 - is $@ empty ok 231 - '2 & 4' isa 'Math::BigRat' ok 232 - 2 & 4 = 2 & 4 = 0 ok 233 - is $@ empty ok 234 - '2 & 9/2' isa 'Math::BigRat' ok 235 - 2 & 9/2 = 2 & 4 = 0 ok 236 - is $@ empty ok 237 - '2 & 5' isa 'Math::BigRat' ok 238 - 2 & 5 = 2 & 5 = 0 ok 239 - is $@ empty ok 240 - '2 & 11/2' isa 'Math::BigRat' ok 241 - 2 & 11/2 = 2 & 5 = 0 ok 242 - is $@ empty ok 243 - '2 & 6' isa 'Math::BigRat' ok 244 - 2 & 6 = 2 & 6 = 2 ok 245 - is $@ empty ok 246 - '2 & 13/2' isa 'Math::BigRat' ok 247 - 2 & 13/2 = 2 & 6 = 2 ok 248 - is $@ empty ok 249 - '2 & 7' isa 'Math::BigRat' ok 250 - 2 & 7 = 2 & 7 = 2 ok 251 - is $@ empty ok 252 - '2 & 15/2' isa 'Math::BigRat' ok 253 - 2 & 15/2 = 2 & 7 = 2 ok 254 - is $@ empty ok 255 - '2 & 8' isa 'Math::BigRat' ok 256 - 2 & 8 = 2 & 8 = 0 ok 257 - is $@ empty ok 258 - '5/2 & 0' isa 'Math::BigRat' ok 259 - 5/2 & 0 = 2 & 0 = 0 ok 260 - is $@ empty ok 261 - '5/2 & 1/2' isa 'Math::BigRat' ok 262 - 5/2 & 1/2 = 2 & 0 = 0 ok 263 - is $@ empty ok 264 - '5/2 & 1' isa 'Math::BigRat' ok 265 - 5/2 & 1 = 2 & 1 = 0 ok 266 - is $@ empty ok 267 - '5/2 & 3/2' isa 'Math::BigRat' ok 268 - 5/2 & 3/2 = 2 & 1 = 0 ok 269 - is $@ empty ok 270 - '5/2 & 2' isa 'Math::BigRat' ok 271 - 5/2 & 2 = 2 & 2 = 2 ok 272 - is $@ empty ok 273 - '5/2 & 5/2' isa 'Math::BigRat' ok 274 - 5/2 & 5/2 = 2 & 2 = 2 ok 275 - is $@ empty ok 276 - '5/2 & 3' isa 'Math::BigRat' ok 277 - 5/2 & 3 = 2 & 3 = 2 ok 278 - is $@ empty ok 279 - '5/2 & 7/2' isa 'Math::BigRat' ok 280 - 5/2 & 7/2 = 2 & 3 = 2 ok 281 - is $@ empty ok 282 - '5/2 & 4' isa 'Math::BigRat' ok 283 - 5/2 & 4 = 2 & 4 = 0 ok 284 - is $@ empty ok 285 - '5/2 & 9/2' isa 'Math::BigRat' ok 286 - 5/2 & 9/2 = 2 & 4 = 0 ok 287 - is $@ empty ok 288 - '5/2 & 5' isa 'Math::BigRat' ok 289 - 5/2 & 5 = 2 & 5 = 0 ok 290 - is $@ empty ok 291 - '5/2 & 11/2' isa 'Math::BigRat' ok 292 - 5/2 & 11/2 = 2 & 5 = 0 ok 293 - is $@ empty ok 294 - '5/2 & 6' isa 'Math::BigRat' ok 295 - 5/2 & 6 = 2 & 6 = 2 ok 296 - is $@ empty ok 297 - '5/2 & 13/2' isa 'Math::BigRat' ok 298 - 5/2 & 13/2 = 2 & 6 = 2 ok 299 - is $@ empty ok 300 - '5/2 & 7' isa 'Math::BigRat' ok 301 - 5/2 & 7 = 2 & 7 = 2 ok 302 - is $@ empty ok 303 - '5/2 & 15/2' isa 'Math::BigRat' ok 304 - 5/2 & 15/2 = 2 & 7 = 2 ok 305 - is $@ empty ok 306 - '5/2 & 8' isa 'Math::BigRat' ok 307 - 5/2 & 8 = 2 & 8 = 0 ok 308 - is $@ empty ok 309 - '3 & 0' isa 'Math::BigRat' ok 310 - 3 & 0 = 3 & 0 = 0 ok 311 - is $@ empty ok 312 - '3 & 1/2' isa 'Math::BigRat' ok 313 - 3 & 1/2 = 3 & 0 = 0 ok 314 - is $@ empty ok 315 - '3 & 1' isa 'Math::BigRat' ok 316 - 3 & 1 = 3 & 1 = 1 ok 317 - is $@ empty ok 318 - '3 & 3/2' isa 'Math::BigRat' ok 319 - 3 & 3/2 = 3 & 1 = 1 ok 320 - is $@ empty ok 321 - '3 & 2' isa 'Math::BigRat' ok 322 - 3 & 2 = 3 & 2 = 2 ok 323 - is $@ empty ok 324 - '3 & 5/2' isa 'Math::BigRat' ok 325 - 3 & 5/2 = 3 & 2 = 2 ok 326 - is $@ empty ok 327 - '3 & 3' isa 'Math::BigRat' ok 328 - 3 & 3 = 3 & 3 = 3 ok 329 - is $@ empty ok 330 - '3 & 7/2' isa 'Math::BigRat' ok 331 - 3 & 7/2 = 3 & 3 = 3 ok 332 - is $@ empty ok 333 - '3 & 4' isa 'Math::BigRat' ok 334 - 3 & 4 = 3 & 4 = 0 ok 335 - is $@ empty ok 336 - '3 & 9/2' isa 'Math::BigRat' ok 337 - 3 & 9/2 = 3 & 4 = 0 ok 338 - is $@ empty ok 339 - '3 & 5' isa 'Math::BigRat' ok 340 - 3 & 5 = 3 & 5 = 1 ok 341 - is $@ empty ok 342 - '3 & 11/2' isa 'Math::BigRat' ok 343 - 3 & 11/2 = 3 & 5 = 1 ok 344 - is $@ empty ok 345 - '3 & 6' isa 'Math::BigRat' ok 346 - 3 & 6 = 3 & 6 = 2 ok 347 - is $@ empty ok 348 - '3 & 13/2' isa 'Math::BigRat' ok 349 - 3 & 13/2 = 3 & 6 = 2 ok 350 - is $@ empty ok 351 - '3 & 7' isa 'Math::BigRat' ok 352 - 3 & 7 = 3 & 7 = 3 ok 353 - is $@ empty ok 354 - '3 & 15/2' isa 'Math::BigRat' ok 355 - 3 & 15/2 = 3 & 7 = 3 ok 356 - is $@ empty ok 357 - '3 & 8' isa 'Math::BigRat' ok 358 - 3 & 8 = 3 & 8 = 0 ok 359 - is $@ empty ok 360 - '7/2 & 0' isa 'Math::BigRat' ok 361 - 7/2 & 0 = 3 & 0 = 0 ok 362 - is $@ empty ok 363 - '7/2 & 1/2' isa 'Math::BigRat' ok 364 - 7/2 & 1/2 = 3 & 0 = 0 ok 365 - is $@ empty ok 366 - '7/2 & 1' isa 'Math::BigRat' ok 367 - 7/2 & 1 = 3 & 1 = 1 ok 368 - is $@ empty ok 369 - '7/2 & 3/2' isa 'Math::BigRat' ok 370 - 7/2 & 3/2 = 3 & 1 = 1 ok 371 - is $@ empty ok 372 - '7/2 & 2' isa 'Math::BigRat' ok 373 - 7/2 & 2 = 3 & 2 = 2 ok 374 - is $@ empty ok 375 - '7/2 & 5/2' isa 'Math::BigRat' ok 376 - 7/2 & 5/2 = 3 & 2 = 2 ok 377 - is $@ empty ok 378 - '7/2 & 3' isa 'Math::BigRat' ok 379 - 7/2 & 3 = 3 & 3 = 3 ok 380 - is $@ empty ok 381 - '7/2 & 7/2' isa 'Math::BigRat' ok 382 - 7/2 & 7/2 = 3 & 3 = 3 ok 383 - is $@ empty ok 384 - '7/2 & 4' isa 'Math::BigRat' ok 385 - 7/2 & 4 = 3 & 4 = 0 ok 386 - is $@ empty ok 387 - '7/2 & 9/2' isa 'Math::BigRat' ok 388 - 7/2 & 9/2 = 3 & 4 = 0 ok 389 - is $@ empty ok 390 - '7/2 & 5' isa 'Math::BigRat' ok 391 - 7/2 & 5 = 3 & 5 = 1 ok 392 - is $@ empty ok 393 - '7/2 & 11/2' isa 'Math::BigRat' ok 394 - 7/2 & 11/2 = 3 & 5 = 1 ok 395 - is $@ empty ok 396 - '7/2 & 6' isa 'Math::BigRat' ok 397 - 7/2 & 6 = 3 & 6 = 2 ok 398 - is $@ empty ok 399 - '7/2 & 13/2' isa 'Math::BigRat' ok 400 - 7/2 & 13/2 = 3 & 6 = 2 ok 401 - is $@ empty ok 402 - '7/2 & 7' isa 'Math::BigRat' ok 403 - 7/2 & 7 = 3 & 7 = 3 ok 404 - is $@ empty ok 405 - '7/2 & 15/2' isa 'Math::BigRat' ok 406 - 7/2 & 15/2 = 3 & 7 = 3 ok 407 - is $@ empty ok 408 - '7/2 & 8' isa 'Math::BigRat' ok 409 - 7/2 & 8 = 3 & 8 = 0 ok 410 - is $@ empty ok 411 - '4 & 0' isa 'Math::BigRat' ok 412 - 4 & 0 = 4 & 0 = 0 ok 413 - is $@ empty ok 414 - '4 & 1/2' isa 'Math::BigRat' ok 415 - 4 & 1/2 = 4 & 0 = 0 ok 416 - is $@ empty ok 417 - '4 & 1' isa 'Math::BigRat' ok 418 - 4 & 1 = 4 & 1 = 0 ok 419 - is $@ empty ok 420 - '4 & 3/2' isa 'Math::BigRat' ok 421 - 4 & 3/2 = 4 & 1 = 0 ok 422 - is $@ empty ok 423 - '4 & 2' isa 'Math::BigRat' ok 424 - 4 & 2 = 4 & 2 = 0 ok 425 - is $@ empty ok 426 - '4 & 5/2' isa 'Math::BigRat' ok 427 - 4 & 5/2 = 4 & 2 = 0 ok 428 - is $@ empty ok 429 - '4 & 3' isa 'Math::BigRat' ok 430 - 4 & 3 = 4 & 3 = 0 ok 431 - is $@ empty ok 432 - '4 & 7/2' isa 'Math::BigRat' ok 433 - 4 & 7/2 = 4 & 3 = 0 ok 434 - is $@ empty ok 435 - '4 & 4' isa 'Math::BigRat' ok 436 - 4 & 4 = 4 & 4 = 4 ok 437 - is $@ empty ok 438 - '4 & 9/2' isa 'Math::BigRat' ok 439 - 4 & 9/2 = 4 & 4 = 4 ok 440 - is $@ empty ok 441 - '4 & 5' isa 'Math::BigRat' ok 442 - 4 & 5 = 4 & 5 = 4 ok 443 - is $@ empty ok 444 - '4 & 11/2' isa 'Math::BigRat' ok 445 - 4 & 11/2 = 4 & 5 = 4 ok 446 - is $@ empty ok 447 - '4 & 6' isa 'Math::BigRat' ok 448 - 4 & 6 = 4 & 6 = 4 ok 449 - is $@ empty ok 450 - '4 & 13/2' isa 'Math::BigRat' ok 451 - 4 & 13/2 = 4 & 6 = 4 ok 452 - is $@ empty ok 453 - '4 & 7' isa 'Math::BigRat' ok 454 - 4 & 7 = 4 & 7 = 4 ok 455 - is $@ empty ok 456 - '4 & 15/2' isa 'Math::BigRat' ok 457 - 4 & 15/2 = 4 & 7 = 4 ok 458 - is $@ empty ok 459 - '4 & 8' isa 'Math::BigRat' ok 460 - 4 & 8 = 4 & 8 = 0 ok 461 - is $@ empty ok 462 - '9/2 & 0' isa 'Math::BigRat' ok 463 - 9/2 & 0 = 4 & 0 = 0 ok 464 - is $@ empty ok 465 - '9/2 & 1/2' isa 'Math::BigRat' ok 466 - 9/2 & 1/2 = 4 & 0 = 0 ok 467 - is $@ empty ok 468 - '9/2 & 1' isa 'Math::BigRat' ok 469 - 9/2 & 1 = 4 & 1 = 0 ok 470 - is $@ empty ok 471 - '9/2 & 3/2' isa 'Math::BigRat' ok 472 - 9/2 & 3/2 = 4 & 1 = 0 ok 473 - is $@ empty ok 474 - '9/2 & 2' isa 'Math::BigRat' ok 475 - 9/2 & 2 = 4 & 2 = 0 ok 476 - is $@ empty ok 477 - '9/2 & 5/2' isa 'Math::BigRat' ok 478 - 9/2 & 5/2 = 4 & 2 = 0 ok 479 - is $@ empty ok 480 - '9/2 & 3' isa 'Math::BigRat' ok 481 - 9/2 & 3 = 4 & 3 = 0 ok 482 - is $@ empty ok 483 - '9/2 & 7/2' isa 'Math::BigRat' ok 484 - 9/2 & 7/2 = 4 & 3 = 0 ok 485 - is $@ empty ok 486 - '9/2 & 4' isa 'Math::BigRat' ok 487 - 9/2 & 4 = 4 & 4 = 4 ok 488 - is $@ empty ok 489 - '9/2 & 9/2' isa 'Math::BigRat' ok 490 - 9/2 & 9/2 = 4 & 4 = 4 ok 491 - is $@ empty ok 492 - '9/2 & 5' isa 'Math::BigRat' ok 493 - 9/2 & 5 = 4 & 5 = 4 ok 494 - is $@ empty ok 495 - '9/2 & 11/2' isa 'Math::BigRat' ok 496 - 9/2 & 11/2 = 4 & 5 = 4 ok 497 - is $@ empty ok 498 - '9/2 & 6' isa 'Math::BigRat' ok 499 - 9/2 & 6 = 4 & 6 = 4 ok 500 - is $@ empty ok 501 - '9/2 & 13/2' isa 'Math::BigRat' ok 502 - 9/2 & 13/2 = 4 & 6 = 4 ok 503 - is $@ empty ok 504 - '9/2 & 7' isa 'Math::BigRat' ok 505 - 9/2 & 7 = 4 & 7 = 4 ok 506 - is $@ empty ok 507 - '9/2 & 15/2' isa 'Math::BigRat' ok 508 - 9/2 & 15/2 = 4 & 7 = 4 ok 509 - is $@ empty ok 510 - '9/2 & 8' isa 'Math::BigRat' ok 511 - 9/2 & 8 = 4 & 8 = 0 ok 512 - is $@ empty ok 513 - '5 & 0' isa 'Math::BigRat' ok 514 - 5 & 0 = 5 & 0 = 0 ok 515 - is $@ empty ok 516 - '5 & 1/2' isa 'Math::BigRat' ok 517 - 5 & 1/2 = 5 & 0 = 0 ok 518 - is $@ empty ok 519 - '5 & 1' isa 'Math::BigRat' ok 520 - 5 & 1 = 5 & 1 = 1 ok 521 - is $@ empty ok 522 - '5 & 3/2' isa 'Math::BigRat' ok 523 - 5 & 3/2 = 5 & 1 = 1 ok 524 - is $@ empty ok 525 - '5 & 2' isa 'Math::BigRat' ok 526 - 5 & 2 = 5 & 2 = 0 ok 527 - is $@ empty ok 528 - '5 & 5/2' isa 'Math::BigRat' ok 529 - 5 & 5/2 = 5 & 2 = 0 ok 530 - is $@ empty ok 531 - '5 & 3' isa 'Math::BigRat' ok 532 - 5 & 3 = 5 & 3 = 1 ok 533 - is $@ empty ok 534 - '5 & 7/2' isa 'Math::BigRat' ok 535 - 5 & 7/2 = 5 & 3 = 1 ok 536 - is $@ empty ok 537 - '5 & 4' isa 'Math::BigRat' ok 538 - 5 & 4 = 5 & 4 = 4 ok 539 - is $@ empty ok 540 - '5 & 9/2' isa 'Math::BigRat' ok 541 - 5 & 9/2 = 5 & 4 = 4 ok 542 - is $@ empty ok 543 - '5 & 5' isa 'Math::BigRat' ok 544 - 5 & 5 = 5 & 5 = 5 ok 545 - is $@ empty ok 546 - '5 & 11/2' isa 'Math::BigRat' ok 547 - 5 & 11/2 = 5 & 5 = 5 ok 548 - is $@ empty ok 549 - '5 & 6' isa 'Math::BigRat' ok 550 - 5 & 6 = 5 & 6 = 4 ok 551 - is $@ empty ok 552 - '5 & 13/2' isa 'Math::BigRat' ok 553 - 5 & 13/2 = 5 & 6 = 4 ok 554 - is $@ empty ok 555 - '5 & 7' isa 'Math::BigRat' ok 556 - 5 & 7 = 5 & 7 = 5 ok 557 - is $@ empty ok 558 - '5 & 15/2' isa 'Math::BigRat' ok 559 - 5 & 15/2 = 5 & 7 = 5 ok 560 - is $@ empty ok 561 - '5 & 8' isa 'Math::BigRat' ok 562 - 5 & 8 = 5 & 8 = 0 ok 563 - is $@ empty ok 564 - '11/2 & 0' isa 'Math::BigRat' ok 565 - 11/2 & 0 = 5 & 0 = 0 ok 566 - is $@ empty ok 567 - '11/2 & 1/2' isa 'Math::BigRat' ok 568 - 11/2 & 1/2 = 5 & 0 = 0 ok 569 - is $@ empty ok 570 - '11/2 & 1' isa 'Math::BigRat' ok 571 - 11/2 & 1 = 5 & 1 = 1 ok 572 - is $@ empty ok 573 - '11/2 & 3/2' isa 'Math::BigRat' ok 574 - 11/2 & 3/2 = 5 & 1 = 1 ok 575 - is $@ empty ok 576 - '11/2 & 2' isa 'Math::BigRat' ok 577 - 11/2 & 2 = 5 & 2 = 0 ok 578 - is $@ empty ok 579 - '11/2 & 5/2' isa 'Math::BigRat' ok 580 - 11/2 & 5/2 = 5 & 2 = 0 ok 581 - is $@ empty ok 582 - '11/2 & 3' isa 'Math::BigRat' ok 583 - 11/2 & 3 = 5 & 3 = 1 ok 584 - is $@ empty ok 585 - '11/2 & 7/2' isa 'Math::BigRat' ok 586 - 11/2 & 7/2 = 5 & 3 = 1 ok 587 - is $@ empty ok 588 - '11/2 & 4' isa 'Math::BigRat' ok 589 - 11/2 & 4 = 5 & 4 = 4 ok 590 - is $@ empty ok 591 - '11/2 & 9/2' isa 'Math::BigRat' ok 592 - 11/2 & 9/2 = 5 & 4 = 4 ok 593 - is $@ empty ok 594 - '11/2 & 5' isa 'Math::BigRat' ok 595 - 11/2 & 5 = 5 & 5 = 5 ok 596 - is $@ empty ok 597 - '11/2 & 11/2' isa 'Math::BigRat' ok 598 - 11/2 & 11/2 = 5 & 5 = 5 ok 599 - is $@ empty ok 600 - '11/2 & 6' isa 'Math::BigRat' ok 601 - 11/2 & 6 = 5 & 6 = 4 ok 602 - is $@ empty ok 603 - '11/2 & 13/2' isa 'Math::BigRat' ok 604 - 11/2 & 13/2 = 5 & 6 = 4 ok 605 - is $@ empty ok 606 - '11/2 & 7' isa 'Math::BigRat' ok 607 - 11/2 & 7 = 5 & 7 = 5 ok 608 - is $@ empty ok 609 - '11/2 & 15/2' isa 'Math::BigRat' ok 610 - 11/2 & 15/2 = 5 & 7 = 5 ok 611 - is $@ empty ok 612 - '11/2 & 8' isa 'Math::BigRat' ok 613 - 11/2 & 8 = 5 & 8 = 0 ok 614 - is $@ empty ok 615 - '6 & 0' isa 'Math::BigRat' ok 616 - 6 & 0 = 6 & 0 = 0 ok 617 - is $@ empty ok 618 - '6 & 1/2' isa 'Math::BigRat' ok 619 - 6 & 1/2 = 6 & 0 = 0 ok 620 - is $@ empty ok 621 - '6 & 1' isa 'Math::BigRat' ok 622 - 6 & 1 = 6 & 1 = 0 ok 623 - is $@ empty ok 624 - '6 & 3/2' isa 'Math::BigRat' ok 625 - 6 & 3/2 = 6 & 1 = 0 ok 626 - is $@ empty ok 627 - '6 & 2' isa 'Math::BigRat' ok 628 - 6 & 2 = 6 & 2 = 2 ok 629 - is $@ empty ok 630 - '6 & 5/2' isa 'Math::BigRat' ok 631 - 6 & 5/2 = 6 & 2 = 2 ok 632 - is $@ empty ok 633 - '6 & 3' isa 'Math::BigRat' ok 634 - 6 & 3 = 6 & 3 = 2 ok 635 - is $@ empty ok 636 - '6 & 7/2' isa 'Math::BigRat' ok 637 - 6 & 7/2 = 6 & 3 = 2 ok 638 - is $@ empty ok 639 - '6 & 4' isa 'Math::BigRat' ok 640 - 6 & 4 = 6 & 4 = 4 ok 641 - is $@ empty ok 642 - '6 & 9/2' isa 'Math::BigRat' ok 643 - 6 & 9/2 = 6 & 4 = 4 ok 644 - is $@ empty ok 645 - '6 & 5' isa 'Math::BigRat' ok 646 - 6 & 5 = 6 & 5 = 4 ok 647 - is $@ empty ok 648 - '6 & 11/2' isa 'Math::BigRat' ok 649 - 6 & 11/2 = 6 & 5 = 4 ok 650 - is $@ empty ok 651 - '6 & 6' isa 'Math::BigRat' ok 652 - 6 & 6 = 6 & 6 = 6 ok 653 - is $@ empty ok 654 - '6 & 13/2' isa 'Math::BigRat' ok 655 - 6 & 13/2 = 6 & 6 = 6 ok 656 - is $@ empty ok 657 - '6 & 7' isa 'Math::BigRat' ok 658 - 6 & 7 = 6 & 7 = 6 ok 659 - is $@ empty ok 660 - '6 & 15/2' isa 'Math::BigRat' ok 661 - 6 & 15/2 = 6 & 7 = 6 ok 662 - is $@ empty ok 663 - '6 & 8' isa 'Math::BigRat' ok 664 - 6 & 8 = 6 & 8 = 0 ok 665 - is $@ empty ok 666 - '13/2 & 0' isa 'Math::BigRat' ok 667 - 13/2 & 0 = 6 & 0 = 0 ok 668 - is $@ empty ok 669 - '13/2 & 1/2' isa 'Math::BigRat' ok 670 - 13/2 & 1/2 = 6 & 0 = 0 ok 671 - is $@ empty ok 672 - '13/2 & 1' isa 'Math::BigRat' ok 673 - 13/2 & 1 = 6 & 1 = 0 ok 674 - is $@ empty ok 675 - '13/2 & 3/2' isa 'Math::BigRat' ok 676 - 13/2 & 3/2 = 6 & 1 = 0 ok 677 - is $@ empty ok 678 - '13/2 & 2' isa 'Math::BigRat' ok 679 - 13/2 & 2 = 6 & 2 = 2 ok 680 - is $@ empty ok 681 - '13/2 & 5/2' isa 'Math::BigRat' ok 682 - 13/2 & 5/2 = 6 & 2 = 2 ok 683 - is $@ empty ok 684 - '13/2 & 3' isa 'Math::BigRat' ok 685 - 13/2 & 3 = 6 & 3 = 2 ok 686 - is $@ empty ok 687 - '13/2 & 7/2' isa 'Math::BigRat' ok 688 - 13/2 & 7/2 = 6 & 3 = 2 ok 689 - is $@ empty ok 690 - '13/2 & 4' isa 'Math::BigRat' ok 691 - 13/2 & 4 = 6 & 4 = 4 ok 692 - is $@ empty ok 693 - '13/2 & 9/2' isa 'Math::BigRat' ok 694 - 13/2 & 9/2 = 6 & 4 = 4 ok 695 - is $@ empty ok 696 - '13/2 & 5' isa 'Math::BigRat' ok 697 - 13/2 & 5 = 6 & 5 = 4 ok 698 - is $@ empty ok 699 - '13/2 & 11/2' isa 'Math::BigRat' ok 700 - 13/2 & 11/2 = 6 & 5 = 4 ok 701 - is $@ empty ok 702 - '13/2 & 6' isa 'Math::BigRat' ok 703 - 13/2 & 6 = 6 & 6 = 6 ok 704 - is $@ empty ok 705 - '13/2 & 13/2' isa 'Math::BigRat' ok 706 - 13/2 & 13/2 = 6 & 6 = 6 ok 707 - is $@ empty ok 708 - '13/2 & 7' isa 'Math::BigRat' ok 709 - 13/2 & 7 = 6 & 7 = 6 ok 710 - is $@ empty ok 711 - '13/2 & 15/2' isa 'Math::BigRat' ok 712 - 13/2 & 15/2 = 6 & 7 = 6 ok 713 - is $@ empty ok 714 - '13/2 & 8' isa 'Math::BigRat' ok 715 - 13/2 & 8 = 6 & 8 = 0 ok 716 - is $@ empty ok 717 - '7 & 0' isa 'Math::BigRat' ok 718 - 7 & 0 = 7 & 0 = 0 ok 719 - is $@ empty ok 720 - '7 & 1/2' isa 'Math::BigRat' ok 721 - 7 & 1/2 = 7 & 0 = 0 ok 722 - is $@ empty ok 723 - '7 & 1' isa 'Math::BigRat' ok 724 - 7 & 1 = 7 & 1 = 1 ok 725 - is $@ empty ok 726 - '7 & 3/2' isa 'Math::BigRat' ok 727 - 7 & 3/2 = 7 & 1 = 1 ok 728 - is $@ empty ok 729 - '7 & 2' isa 'Math::BigRat' ok 730 - 7 & 2 = 7 & 2 = 2 ok 731 - is $@ empty ok 732 - '7 & 5/2' isa 'Math::BigRat' ok 733 - 7 & 5/2 = 7 & 2 = 2 ok 734 - is $@ empty ok 735 - '7 & 3' isa 'Math::BigRat' ok 736 - 7 & 3 = 7 & 3 = 3 ok 737 - is $@ empty ok 738 - '7 & 7/2' isa 'Math::BigRat' ok 739 - 7 & 7/2 = 7 & 3 = 3 ok 740 - is $@ empty ok 741 - '7 & 4' isa 'Math::BigRat' ok 742 - 7 & 4 = 7 & 4 = 4 ok 743 - is $@ empty ok 744 - '7 & 9/2' isa 'Math::BigRat' ok 745 - 7 & 9/2 = 7 & 4 = 4 ok 746 - is $@ empty ok 747 - '7 & 5' isa 'Math::BigRat' ok 748 - 7 & 5 = 7 & 5 = 5 ok 749 - is $@ empty ok 750 - '7 & 11/2' isa 'Math::BigRat' ok 751 - 7 & 11/2 = 7 & 5 = 5 ok 752 - is $@ empty ok 753 - '7 & 6' isa 'Math::BigRat' ok 754 - 7 & 6 = 7 & 6 = 6 ok 755 - is $@ empty ok 756 - '7 & 13/2' isa 'Math::BigRat' ok 757 - 7 & 13/2 = 7 & 6 = 6 ok 758 - is $@ empty ok 759 - '7 & 7' isa 'Math::BigRat' ok 760 - 7 & 7 = 7 & 7 = 7 ok 761 - is $@ empty ok 762 - '7 & 15/2' isa 'Math::BigRat' ok 763 - 7 & 15/2 = 7 & 7 = 7 ok 764 - is $@ empty ok 765 - '7 & 8' isa 'Math::BigRat' ok 766 - 7 & 8 = 7 & 8 = 0 ok 767 - is $@ empty ok 768 - '15/2 & 0' isa 'Math::BigRat' ok 769 - 15/2 & 0 = 7 & 0 = 0 ok 770 - is $@ empty ok 771 - '15/2 & 1/2' isa 'Math::BigRat' ok 772 - 15/2 & 1/2 = 7 & 0 = 0 ok 773 - is $@ empty ok 774 - '15/2 & 1' isa 'Math::BigRat' ok 775 - 15/2 & 1 = 7 & 1 = 1 ok 776 - is $@ empty ok 777 - '15/2 & 3/2' isa 'Math::BigRat' ok 778 - 15/2 & 3/2 = 7 & 1 = 1 ok 779 - is $@ empty ok 780 - '15/2 & 2' isa 'Math::BigRat' ok 781 - 15/2 & 2 = 7 & 2 = 2 ok 782 - is $@ empty ok 783 - '15/2 & 5/2' isa 'Math::BigRat' ok 784 - 15/2 & 5/2 = 7 & 2 = 2 ok 785 - is $@ empty ok 786 - '15/2 & 3' isa 'Math::BigRat' ok 787 - 15/2 & 3 = 7 & 3 = 3 ok 788 - is $@ empty ok 789 - '15/2 & 7/2' isa 'Math::BigRat' ok 790 - 15/2 & 7/2 = 7 & 3 = 3 ok 791 - is $@ empty ok 792 - '15/2 & 4' isa 'Math::BigRat' ok 793 - 15/2 & 4 = 7 & 4 = 4 ok 794 - is $@ empty ok 795 - '15/2 & 9/2' isa 'Math::BigRat' ok 796 - 15/2 & 9/2 = 7 & 4 = 4 ok 797 - is $@ empty ok 798 - '15/2 & 5' isa 'Math::BigRat' ok 799 - 15/2 & 5 = 7 & 5 = 5 ok 800 - is $@ empty ok 801 - '15/2 & 11/2' isa 'Math::BigRat' ok 802 - 15/2 & 11/2 = 7 & 5 = 5 ok 803 - is $@ empty ok 804 - '15/2 & 6' isa 'Math::BigRat' ok 805 - 15/2 & 6 = 7 & 6 = 6 ok 806 - is $@ empty ok 807 - '15/2 & 13/2' isa 'Math::BigRat' ok 808 - 15/2 & 13/2 = 7 & 6 = 6 ok 809 - is $@ empty ok 810 - '15/2 & 7' isa 'Math::BigRat' ok 811 - 15/2 & 7 = 7 & 7 = 7 ok 812 - is $@ empty ok 813 - '15/2 & 15/2' isa 'Math::BigRat' ok 814 - 15/2 & 15/2 = 7 & 7 = 7 ok 815 - is $@ empty ok 816 - '15/2 & 8' isa 'Math::BigRat' ok 817 - 15/2 & 8 = 7 & 8 = 0 ok 818 - is $@ empty ok 819 - '8 & 0' isa 'Math::BigRat' ok 820 - 8 & 0 = 8 & 0 = 0 ok 821 - is $@ empty ok 822 - '8 & 1/2' isa 'Math::BigRat' ok 823 - 8 & 1/2 = 8 & 0 = 0 ok 824 - is $@ empty ok 825 - '8 & 1' isa 'Math::BigRat' ok 826 - 8 & 1 = 8 & 1 = 0 ok 827 - is $@ empty ok 828 - '8 & 3/2' isa 'Math::BigRat' ok 829 - 8 & 3/2 = 8 & 1 = 0 ok 830 - is $@ empty ok 831 - '8 & 2' isa 'Math::BigRat' ok 832 - 8 & 2 = 8 & 2 = 0 ok 833 - is $@ empty ok 834 - '8 & 5/2' isa 'Math::BigRat' ok 835 - 8 & 5/2 = 8 & 2 = 0 ok 836 - is $@ empty ok 837 - '8 & 3' isa 'Math::BigRat' ok 838 - 8 & 3 = 8 & 3 = 0 ok 839 - is $@ empty ok 840 - '8 & 7/2' isa 'Math::BigRat' ok 841 - 8 & 7/2 = 8 & 3 = 0 ok 842 - is $@ empty ok 843 - '8 & 4' isa 'Math::BigRat' ok 844 - 8 & 4 = 8 & 4 = 0 ok 845 - is $@ empty ok 846 - '8 & 9/2' isa 'Math::BigRat' ok 847 - 8 & 9/2 = 8 & 4 = 0 ok 848 - is $@ empty ok 849 - '8 & 5' isa 'Math::BigRat' ok 850 - 8 & 5 = 8 & 5 = 0 ok 851 - is $@ empty ok 852 - '8 & 11/2' isa 'Math::BigRat' ok 853 - 8 & 11/2 = 8 & 5 = 0 ok 854 - is $@ empty ok 855 - '8 & 6' isa 'Math::BigRat' ok 856 - 8 & 6 = 8 & 6 = 0 ok 857 - is $@ empty ok 858 - '8 & 13/2' isa 'Math::BigRat' ok 859 - 8 & 13/2 = 8 & 6 = 0 ok 860 - is $@ empty ok 861 - '8 & 7' isa 'Math::BigRat' ok 862 - 8 & 7 = 8 & 7 = 0 ok 863 - is $@ empty ok 864 - '8 & 15/2' isa 'Math::BigRat' ok 865 - 8 & 15/2 = 8 & 7 = 0 ok 866 - is $@ empty ok 867 - '8 & 8' isa 'Math::BigRat' ok 868 - 8 & 8 = 8 & 8 = 8 ok 869 - is $@ empty ok 870 - '0 | 0' isa 'Math::BigRat' ok 871 - 0 | 0 = 0 | 0 = 0 ok 872 - is $@ empty ok 873 - '0 | 1/2' isa 'Math::BigRat' ok 874 - 0 | 1/2 = 0 | 0 = 0 ok 875 - is $@ empty ok 876 - '0 | 1' isa 'Math::BigRat' ok 877 - 0 | 1 = 0 | 1 = 1 ok 878 - is $@ empty ok 879 - '0 | 3/2' isa 'Math::BigRat' ok 880 - 0 | 3/2 = 0 | 1 = 1 ok 881 - is $@ empty ok 882 - '0 | 2' isa 'Math::BigRat' ok 883 - 0 | 2 = 0 | 2 = 2 ok 884 - is $@ empty ok 885 - '0 | 5/2' isa 'Math::BigRat' ok 886 - 0 | 5/2 = 0 | 2 = 2 ok 887 - is $@ empty ok 888 - '0 | 3' isa 'Math::BigRat' ok 889 - 0 | 3 = 0 | 3 = 3 ok 890 - is $@ empty ok 891 - '0 | 7/2' isa 'Math::BigRat' ok 892 - 0 | 7/2 = 0 | 3 = 3 ok 893 - is $@ empty ok 894 - '0 | 4' isa 'Math::BigRat' ok 895 - 0 | 4 = 0 | 4 = 4 ok 896 - is $@ empty ok 897 - '0 | 9/2' isa 'Math::BigRat' ok 898 - 0 | 9/2 = 0 | 4 = 4 ok 899 - is $@ empty ok 900 - '0 | 5' isa 'Math::BigRat' ok 901 - 0 | 5 = 0 | 5 = 5 ok 902 - is $@ empty ok 903 - '0 | 11/2' isa 'Math::BigRat' ok 904 - 0 | 11/2 = 0 | 5 = 5 ok 905 - is $@ empty ok 906 - '0 | 6' isa 'Math::BigRat' ok 907 - 0 | 6 = 0 | 6 = 6 ok 908 - is $@ empty ok 909 - '0 | 13/2' isa 'Math::BigRat' ok 910 - 0 | 13/2 = 0 | 6 = 6 ok 911 - is $@ empty ok 912 - '0 | 7' isa 'Math::BigRat' ok 913 - 0 | 7 = 0 | 7 = 7 ok 914 - is $@ empty ok 915 - '0 | 15/2' isa 'Math::BigRat' ok 916 - 0 | 15/2 = 0 | 7 = 7 ok 917 - is $@ empty ok 918 - '0 | 8' isa 'Math::BigRat' ok 919 - 0 | 8 = 0 | 8 = 8 ok 920 - is $@ empty ok 921 - '1/2 | 0' isa 'Math::BigRat' ok 922 - 1/2 | 0 = 0 | 0 = 0 ok 923 - is $@ empty ok 924 - '1/2 | 1/2' isa 'Math::BigRat' ok 925 - 1/2 | 1/2 = 0 | 0 = 0 ok 926 - is $@ empty ok 927 - '1/2 | 1' isa 'Math::BigRat' ok 928 - 1/2 | 1 = 0 | 1 = 1 ok 929 - is $@ empty ok 930 - '1/2 | 3/2' isa 'Math::BigRat' ok 931 - 1/2 | 3/2 = 0 | 1 = 1 ok 932 - is $@ empty ok 933 - '1/2 | 2' isa 'Math::BigRat' ok 934 - 1/2 | 2 = 0 | 2 = 2 ok 935 - is $@ empty ok 936 - '1/2 | 5/2' isa 'Math::BigRat' ok 937 - 1/2 | 5/2 = 0 | 2 = 2 ok 938 - is $@ empty ok 939 - '1/2 | 3' isa 'Math::BigRat' ok 940 - 1/2 | 3 = 0 | 3 = 3 ok 941 - is $@ empty ok 942 - '1/2 | 7/2' isa 'Math::BigRat' ok 943 - 1/2 | 7/2 = 0 | 3 = 3 ok 944 - is $@ empty ok 945 - '1/2 | 4' isa 'Math::BigRat' ok 946 - 1/2 | 4 = 0 | 4 = 4 ok 947 - is $@ empty ok 948 - '1/2 | 9/2' isa 'Math::BigRat' ok 949 - 1/2 | 9/2 = 0 | 4 = 4 ok 950 - is $@ empty ok 951 - '1/2 | 5' isa 'Math::BigRat' ok 952 - 1/2 | 5 = 0 | 5 = 5 ok 953 - is $@ empty ok 954 - '1/2 | 11/2' isa 'Math::BigRat' ok 955 - 1/2 | 11/2 = 0 | 5 = 5 ok 956 - is $@ empty ok 957 - '1/2 | 6' isa 'Math::BigRat' ok 958 - 1/2 | 6 = 0 | 6 = 6 ok 959 - is $@ empty ok 960 - '1/2 | 13/2' isa 'Math::BigRat' ok 961 - 1/2 | 13/2 = 0 | 6 = 6 ok 962 - is $@ empty ok 963 - '1/2 | 7' isa 'Math::BigRat' ok 964 - 1/2 | 7 = 0 | 7 = 7 ok 965 - is $@ empty ok 966 - '1/2 | 15/2' isa 'Math::BigRat' ok 967 - 1/2 | 15/2 = 0 | 7 = 7 ok 968 - is $@ empty ok 969 - '1/2 | 8' isa 'Math::BigRat' ok 970 - 1/2 | 8 = 0 | 8 = 8 ok 971 - is $@ empty ok 972 - '1 | 0' isa 'Math::BigRat' ok 973 - 1 | 0 = 1 | 0 = 1 ok 974 - is $@ empty ok 975 - '1 | 1/2' isa 'Math::BigRat' ok 976 - 1 | 1/2 = 1 | 0 = 1 ok 977 - is $@ empty ok 978 - '1 | 1' isa 'Math::BigRat' ok 979 - 1 | 1 = 1 | 1 = 1 ok 980 - is $@ empty ok 981 - '1 | 3/2' isa 'Math::BigRat' ok 982 - 1 | 3/2 = 1 | 1 = 1 ok 983 - is $@ empty ok 984 - '1 | 2' isa 'Math::BigRat' ok 985 - 1 | 2 = 1 | 2 = 3 ok 986 - is $@ empty ok 987 - '1 | 5/2' isa 'Math::BigRat' ok 988 - 1 | 5/2 = 1 | 2 = 3 ok 989 - is $@ empty ok 990 - '1 | 3' isa 'Math::BigRat' ok 991 - 1 | 3 = 1 | 3 = 3 ok 992 - is $@ empty ok 993 - '1 | 7/2' isa 'Math::BigRat' ok 994 - 1 | 7/2 = 1 | 3 = 3 ok 995 - is $@ empty ok 996 - '1 | 4' isa 'Math::BigRat' ok 997 - 1 | 4 = 1 | 4 = 5 ok 998 - is $@ empty ok 999 - '1 | 9/2' isa 'Math::BigRat' ok 1000 - 1 | 9/2 = 1 | 4 = 5 ok 1001 - is $@ empty ok 1002 - '1 | 5' isa 'Math::BigRat' ok 1003 - 1 | 5 = 1 | 5 = 5 ok 1004 - is $@ empty ok 1005 - '1 | 11/2' isa 'Math::BigRat' ok 1006 - 1 | 11/2 = 1 | 5 = 5 ok 1007 - is $@ empty ok 1008 - '1 | 6' isa 'Math::BigRat' ok 1009 - 1 | 6 = 1 | 6 = 7 ok 1010 - is $@ empty ok 1011 - '1 | 13/2' isa 'Math::BigRat' ok 1012 - 1 | 13/2 = 1 | 6 = 7 ok 1013 - is $@ empty ok 1014 - '1 | 7' isa 'Math::BigRat' ok 1015 - 1 | 7 = 1 | 7 = 7 ok 1016 - is $@ empty ok 1017 - '1 | 15/2' isa 'Math::BigRat' ok 1018 - 1 | 15/2 = 1 | 7 = 7 ok 1019 - is $@ empty ok 1020 - '1 | 8' isa 'Math::BigRat' ok 1021 - 1 | 8 = 1 | 8 = 9 ok 1022 - is $@ empty ok 1023 - '3/2 | 0' isa 'Math::BigRat' ok 1024 - 3/2 | 0 = 1 | 0 = 1 ok 1025 - is $@ empty ok 1026 - '3/2 | 1/2' isa 'Math::BigRat' ok 1027 - 3/2 | 1/2 = 1 | 0 = 1 ok 1028 - is $@ empty ok 1029 - '3/2 | 1' isa 'Math::BigRat' ok 1030 - 3/2 | 1 = 1 | 1 = 1 ok 1031 - is $@ empty ok 1032 - '3/2 | 3/2' isa 'Math::BigRat' ok 1033 - 3/2 | 3/2 = 1 | 1 = 1 ok 1034 - is $@ empty ok 1035 - '3/2 | 2' isa 'Math::BigRat' ok 1036 - 3/2 | 2 = 1 | 2 = 3 ok 1037 - is $@ empty ok 1038 - '3/2 | 5/2' isa 'Math::BigRat' ok 1039 - 3/2 | 5/2 = 1 | 2 = 3 ok 1040 - is $@ empty ok 1041 - '3/2 | 3' isa 'Math::BigRat' ok 1042 - 3/2 | 3 = 1 | 3 = 3 ok 1043 - is $@ empty ok 1044 - '3/2 | 7/2' isa 'Math::BigRat' ok 1045 - 3/2 | 7/2 = 1 | 3 = 3 ok 1046 - is $@ empty ok 1047 - '3/2 | 4' isa 'Math::BigRat' ok 1048 - 3/2 | 4 = 1 | 4 = 5 ok 1049 - is $@ empty ok 1050 - '3/2 | 9/2' isa 'Math::BigRat' ok 1051 - 3/2 | 9/2 = 1 | 4 = 5 ok 1052 - is $@ empty ok 1053 - '3/2 | 5' isa 'Math::BigRat' ok 1054 - 3/2 | 5 = 1 | 5 = 5 ok 1055 - is $@ empty ok 1056 - '3/2 | 11/2' isa 'Math::BigRat' ok 1057 - 3/2 | 11/2 = 1 | 5 = 5 ok 1058 - is $@ empty ok 1059 - '3/2 | 6' isa 'Math::BigRat' ok 1060 - 3/2 | 6 = 1 | 6 = 7 ok 1061 - is $@ empty ok 1062 - '3/2 | 13/2' isa 'Math::BigRat' ok 1063 - 3/2 | 13/2 = 1 | 6 = 7 ok 1064 - is $@ empty ok 1065 - '3/2 | 7' isa 'Math::BigRat' ok 1066 - 3/2 | 7 = 1 | 7 = 7 ok 1067 - is $@ empty ok 1068 - '3/2 | 15/2' isa 'Math::BigRat' ok 1069 - 3/2 | 15/2 = 1 | 7 = 7 ok 1070 - is $@ empty ok 1071 - '3/2 | 8' isa 'Math::BigRat' ok 1072 - 3/2 | 8 = 1 | 8 = 9 ok 1073 - is $@ empty ok 1074 - '2 | 0' isa 'Math::BigRat' ok 1075 - 2 | 0 = 2 | 0 = 2 ok 1076 - is $@ empty ok 1077 - '2 | 1/2' isa 'Math::BigRat' ok 1078 - 2 | 1/2 = 2 | 0 = 2 ok 1079 - is $@ empty ok 1080 - '2 | 1' isa 'Math::BigRat' ok 1081 - 2 | 1 = 2 | 1 = 3 ok 1082 - is $@ empty ok 1083 - '2 | 3/2' isa 'Math::BigRat' ok 1084 - 2 | 3/2 = 2 | 1 = 3 ok 1085 - is $@ empty ok 1086 - '2 | 2' isa 'Math::BigRat' ok 1087 - 2 | 2 = 2 | 2 = 2 ok 1088 - is $@ empty ok 1089 - '2 | 5/2' isa 'Math::BigRat' ok 1090 - 2 | 5/2 = 2 | 2 = 2 ok 1091 - is $@ empty ok 1092 - '2 | 3' isa 'Math::BigRat' ok 1093 - 2 | 3 = 2 | 3 = 3 ok 1094 - is $@ empty ok 1095 - '2 | 7/2' isa 'Math::BigRat' ok 1096 - 2 | 7/2 = 2 | 3 = 3 ok 1097 - is $@ empty ok 1098 - '2 | 4' isa 'Math::BigRat' ok 1099 - 2 | 4 = 2 | 4 = 6 ok 1100 - is $@ empty ok 1101 - '2 | 9/2' isa 'Math::BigRat' ok 1102 - 2 | 9/2 = 2 | 4 = 6 ok 1103 - is $@ empty ok 1104 - '2 | 5' isa 'Math::BigRat' ok 1105 - 2 | 5 = 2 | 5 = 7 ok 1106 - is $@ empty ok 1107 - '2 | 11/2' isa 'Math::BigRat' ok 1108 - 2 | 11/2 = 2 | 5 = 7 ok 1109 - is $@ empty ok 1110 - '2 | 6' isa 'Math::BigRat' ok 1111 - 2 | 6 = 2 | 6 = 6 ok 1112 - is $@ empty ok 1113 - '2 | 13/2' isa 'Math::BigRat' ok 1114 - 2 | 13/2 = 2 | 6 = 6 ok 1115 - is $@ empty ok 1116 - '2 | 7' isa 'Math::BigRat' ok 1117 - 2 | 7 = 2 | 7 = 7 ok 1118 - is $@ empty ok 1119 - '2 | 15/2' isa 'Math::BigRat' ok 1120 - 2 | 15/2 = 2 | 7 = 7 ok 1121 - is $@ empty ok 1122 - '2 | 8' isa 'Math::BigRat' ok 1123 - 2 | 8 = 2 | 8 = 10 ok 1124 - is $@ empty ok 1125 - '5/2 | 0' isa 'Math::BigRat' ok 1126 - 5/2 | 0 = 2 | 0 = 2 ok 1127 - is $@ empty ok 1128 - '5/2 | 1/2' isa 'Math::BigRat' ok 1129 - 5/2 | 1/2 = 2 | 0 = 2 ok 1130 - is $@ empty ok 1131 - '5/2 | 1' isa 'Math::BigRat' ok 1132 - 5/2 | 1 = 2 | 1 = 3 ok 1133 - is $@ empty ok 1134 - '5/2 | 3/2' isa 'Math::BigRat' ok 1135 - 5/2 | 3/2 = 2 | 1 = 3 ok 1136 - is $@ empty ok 1137 - '5/2 | 2' isa 'Math::BigRat' ok 1138 - 5/2 | 2 = 2 | 2 = 2 ok 1139 - is $@ empty ok 1140 - '5/2 | 5/2' isa 'Math::BigRat' ok 1141 - 5/2 | 5/2 = 2 | 2 = 2 ok 1142 - is $@ empty ok 1143 - '5/2 | 3' isa 'Math::BigRat' ok 1144 - 5/2 | 3 = 2 | 3 = 3 ok 1145 - is $@ empty ok 1146 - '5/2 | 7/2' isa 'Math::BigRat' ok 1147 - 5/2 | 7/2 = 2 | 3 = 3 ok 1148 - is $@ empty ok 1149 - '5/2 | 4' isa 'Math::BigRat' ok 1150 - 5/2 | 4 = 2 | 4 = 6 ok 1151 - is $@ empty ok 1152 - '5/2 | 9/2' isa 'Math::BigRat' ok 1153 - 5/2 | 9/2 = 2 | 4 = 6 ok 1154 - is $@ empty ok 1155 - '5/2 | 5' isa 'Math::BigRat' ok 1156 - 5/2 | 5 = 2 | 5 = 7 ok 1157 - is $@ empty ok 1158 - '5/2 | 11/2' isa 'Math::BigRat' ok 1159 - 5/2 | 11/2 = 2 | 5 = 7 ok 1160 - is $@ empty ok 1161 - '5/2 | 6' isa 'Math::BigRat' ok 1162 - 5/2 | 6 = 2 | 6 = 6 ok 1163 - is $@ empty ok 1164 - '5/2 | 13/2' isa 'Math::BigRat' ok 1165 - 5/2 | 13/2 = 2 | 6 = 6 ok 1166 - is $@ empty ok 1167 - '5/2 | 7' isa 'Math::BigRat' ok 1168 - 5/2 | 7 = 2 | 7 = 7 ok 1169 - is $@ empty ok 1170 - '5/2 | 15/2' isa 'Math::BigRat' ok 1171 - 5/2 | 15/2 = 2 | 7 = 7 ok 1172 - is $@ empty ok 1173 - '5/2 | 8' isa 'Math::BigRat' ok 1174 - 5/2 | 8 = 2 | 8 = 10 ok 1175 - is $@ empty ok 1176 - '3 | 0' isa 'Math::BigRat' ok 1177 - 3 | 0 = 3 | 0 = 3 ok 1178 - is $@ empty ok 1179 - '3 | 1/2' isa 'Math::BigRat' ok 1180 - 3 | 1/2 = 3 | 0 = 3 ok 1181 - is $@ empty ok 1182 - '3 | 1' isa 'Math::BigRat' ok 1183 - 3 | 1 = 3 | 1 = 3 ok 1184 - is $@ empty ok 1185 - '3 | 3/2' isa 'Math::BigRat' ok 1186 - 3 | 3/2 = 3 | 1 = 3 ok 1187 - is $@ empty ok 1188 - '3 | 2' isa 'Math::BigRat' ok 1189 - 3 | 2 = 3 | 2 = 3 ok 1190 - is $@ empty ok 1191 - '3 | 5/2' isa 'Math::BigRat' ok 1192 - 3 | 5/2 = 3 | 2 = 3 ok 1193 - is $@ empty ok 1194 - '3 | 3' isa 'Math::BigRat' ok 1195 - 3 | 3 = 3 | 3 = 3 ok 1196 - is $@ empty ok 1197 - '3 | 7/2' isa 'Math::BigRat' ok 1198 - 3 | 7/2 = 3 | 3 = 3 ok 1199 - is $@ empty ok 1200 - '3 | 4' isa 'Math::BigRat' ok 1201 - 3 | 4 = 3 | 4 = 7 ok 1202 - is $@ empty ok 1203 - '3 | 9/2' isa 'Math::BigRat' ok 1204 - 3 | 9/2 = 3 | 4 = 7 ok 1205 - is $@ empty ok 1206 - '3 | 5' isa 'Math::BigRat' ok 1207 - 3 | 5 = 3 | 5 = 7 ok 1208 - is $@ empty ok 1209 - '3 | 11/2' isa 'Math::BigRat' ok 1210 - 3 | 11/2 = 3 | 5 = 7 ok 1211 - is $@ empty ok 1212 - '3 | 6' isa 'Math::BigRat' ok 1213 - 3 | 6 = 3 | 6 = 7 ok 1214 - is $@ empty ok 1215 - '3 | 13/2' isa 'Math::BigRat' ok 1216 - 3 | 13/2 = 3 | 6 = 7 ok 1217 - is $@ empty ok 1218 - '3 | 7' isa 'Math::BigRat' ok 1219 - 3 | 7 = 3 | 7 = 7 ok 1220 - is $@ empty ok 1221 - '3 | 15/2' isa 'Math::BigRat' ok 1222 - 3 | 15/2 = 3 | 7 = 7 ok 1223 - is $@ empty ok 1224 - '3 | 8' isa 'Math::BigRat' ok 1225 - 3 | 8 = 3 | 8 = 11 ok 1226 - is $@ empty ok 1227 - '7/2 | 0' isa 'Math::BigRat' ok 1228 - 7/2 | 0 = 3 | 0 = 3 ok 1229 - is $@ empty ok 1230 - '7/2 | 1/2' isa 'Math::BigRat' ok 1231 - 7/2 | 1/2 = 3 | 0 = 3 ok 1232 - is $@ empty ok 1233 - '7/2 | 1' isa 'Math::BigRat' ok 1234 - 7/2 | 1 = 3 | 1 = 3 ok 1235 - is $@ empty ok 1236 - '7/2 | 3/2' isa 'Math::BigRat' ok 1237 - 7/2 | 3/2 = 3 | 1 = 3 ok 1238 - is $@ empty ok 1239 - '7/2 | 2' isa 'Math::BigRat' ok 1240 - 7/2 | 2 = 3 | 2 = 3 ok 1241 - is $@ empty ok 1242 - '7/2 | 5/2' isa 'Math::BigRat' ok 1243 - 7/2 | 5/2 = 3 | 2 = 3 ok 1244 - is $@ empty ok 1245 - '7/2 | 3' isa 'Math::BigRat' ok 1246 - 7/2 | 3 = 3 | 3 = 3 ok 1247 - is $@ empty ok 1248 - '7/2 | 7/2' isa 'Math::BigRat' ok 1249 - 7/2 | 7/2 = 3 | 3 = 3 ok 1250 - is $@ empty ok 1251 - '7/2 | 4' isa 'Math::BigRat' ok 1252 - 7/2 | 4 = 3 | 4 = 7 ok 1253 - is $@ empty ok 1254 - '7/2 | 9/2' isa 'Math::BigRat' ok 1255 - 7/2 | 9/2 = 3 | 4 = 7 ok 1256 - is $@ empty ok 1257 - '7/2 | 5' isa 'Math::BigRat' ok 1258 - 7/2 | 5 = 3 | 5 = 7 ok 1259 - is $@ empty ok 1260 - '7/2 | 11/2' isa 'Math::BigRat' ok 1261 - 7/2 | 11/2 = 3 | 5 = 7 ok 1262 - is $@ empty ok 1263 - '7/2 | 6' isa 'Math::BigRat' ok 1264 - 7/2 | 6 = 3 | 6 = 7 ok 1265 - is $@ empty ok 1266 - '7/2 | 13/2' isa 'Math::BigRat' ok 1267 - 7/2 | 13/2 = 3 | 6 = 7 ok 1268 - is $@ empty ok 1269 - '7/2 | 7' isa 'Math::BigRat' ok 1270 - 7/2 | 7 = 3 | 7 = 7 ok 1271 - is $@ empty ok 1272 - '7/2 | 15/2' isa 'Math::BigRat' ok 1273 - 7/2 | 15/2 = 3 | 7 = 7 ok 1274 - is $@ empty ok 1275 - '7/2 | 8' isa 'Math::BigRat' ok 1276 - 7/2 | 8 = 3 | 8 = 11 ok 1277 - is $@ empty ok 1278 - '4 | 0' isa 'Math::BigRat' ok 1279 - 4 | 0 = 4 | 0 = 4 ok 1280 - is $@ empty ok 1281 - '4 | 1/2' isa 'Math::BigRat' ok 1282 - 4 | 1/2 = 4 | 0 = 4 ok 1283 - is $@ empty ok 1284 - '4 | 1' isa 'Math::BigRat' ok 1285 - 4 | 1 = 4 | 1 = 5 ok 1286 - is $@ empty ok 1287 - '4 | 3/2' isa 'Math::BigRat' ok 1288 - 4 | 3/2 = 4 | 1 = 5 ok 1289 - is $@ empty ok 1290 - '4 | 2' isa 'Math::BigRat' ok 1291 - 4 | 2 = 4 | 2 = 6 ok 1292 - is $@ empty ok 1293 - '4 | 5/2' isa 'Math::BigRat' ok 1294 - 4 | 5/2 = 4 | 2 = 6 ok 1295 - is $@ empty ok 1296 - '4 | 3' isa 'Math::BigRat' ok 1297 - 4 | 3 = 4 | 3 = 7 ok 1298 - is $@ empty ok 1299 - '4 | 7/2' isa 'Math::BigRat' ok 1300 - 4 | 7/2 = 4 | 3 = 7 ok 1301 - is $@ empty ok 1302 - '4 | 4' isa 'Math::BigRat' ok 1303 - 4 | 4 = 4 | 4 = 4 ok 1304 - is $@ empty ok 1305 - '4 | 9/2' isa 'Math::BigRat' ok 1306 - 4 | 9/2 = 4 | 4 = 4 ok 1307 - is $@ empty ok 1308 - '4 | 5' isa 'Math::BigRat' ok 1309 - 4 | 5 = 4 | 5 = 5 ok 1310 - is $@ empty ok 1311 - '4 | 11/2' isa 'Math::BigRat' ok 1312 - 4 | 11/2 = 4 | 5 = 5 ok 1313 - is $@ empty ok 1314 - '4 | 6' isa 'Math::BigRat' ok 1315 - 4 | 6 = 4 | 6 = 6 ok 1316 - is $@ empty ok 1317 - '4 | 13/2' isa 'Math::BigRat' ok 1318 - 4 | 13/2 = 4 | 6 = 6 ok 1319 - is $@ empty ok 1320 - '4 | 7' isa 'Math::BigRat' ok 1321 - 4 | 7 = 4 | 7 = 7 ok 1322 - is $@ empty ok 1323 - '4 | 15/2' isa 'Math::BigRat' ok 1324 - 4 | 15/2 = 4 | 7 = 7 ok 1325 - is $@ empty ok 1326 - '4 | 8' isa 'Math::BigRat' ok 1327 - 4 | 8 = 4 | 8 = 12 ok 1328 - is $@ empty ok 1329 - '9/2 | 0' isa 'Math::BigRat' ok 1330 - 9/2 | 0 = 4 | 0 = 4 ok 1331 - is $@ empty ok 1332 - '9/2 | 1/2' isa 'Math::BigRat' ok 1333 - 9/2 | 1/2 = 4 | 0 = 4 ok 1334 - is $@ empty ok 1335 - '9/2 | 1' isa 'Math::BigRat' ok 1336 - 9/2 | 1 = 4 | 1 = 5 ok 1337 - is $@ empty ok 1338 - '9/2 | 3/2' isa 'Math::BigRat' ok 1339 - 9/2 | 3/2 = 4 | 1 = 5 ok 1340 - is $@ empty ok 1341 - '9/2 | 2' isa 'Math::BigRat' ok 1342 - 9/2 | 2 = 4 | 2 = 6 ok 1343 - is $@ empty ok 1344 - '9/2 | 5/2' isa 'Math::BigRat' ok 1345 - 9/2 | 5/2 = 4 | 2 = 6 ok 1346 - is $@ empty ok 1347 - '9/2 | 3' isa 'Math::BigRat' ok 1348 - 9/2 | 3 = 4 | 3 = 7 ok 1349 - is $@ empty ok 1350 - '9/2 | 7/2' isa 'Math::BigRat' ok 1351 - 9/2 | 7/2 = 4 | 3 = 7 ok 1352 - is $@ empty ok 1353 - '9/2 | 4' isa 'Math::BigRat' ok 1354 - 9/2 | 4 = 4 | 4 = 4 ok 1355 - is $@ empty ok 1356 - '9/2 | 9/2' isa 'Math::BigRat' ok 1357 - 9/2 | 9/2 = 4 | 4 = 4 ok 1358 - is $@ empty ok 1359 - '9/2 | 5' isa 'Math::BigRat' ok 1360 - 9/2 | 5 = 4 | 5 = 5 ok 1361 - is $@ empty ok 1362 - '9/2 | 11/2' isa 'Math::BigRat' ok 1363 - 9/2 | 11/2 = 4 | 5 = 5 ok 1364 - is $@ empty ok 1365 - '9/2 | 6' isa 'Math::BigRat' ok 1366 - 9/2 | 6 = 4 | 6 = 6 ok 1367 - is $@ empty ok 1368 - '9/2 | 13/2' isa 'Math::BigRat' ok 1369 - 9/2 | 13/2 = 4 | 6 = 6 ok 1370 - is $@ empty ok 1371 - '9/2 | 7' isa 'Math::BigRat' ok 1372 - 9/2 | 7 = 4 | 7 = 7 ok 1373 - is $@ empty ok 1374 - '9/2 | 15/2' isa 'Math::BigRat' ok 1375 - 9/2 | 15/2 = 4 | 7 = 7 ok 1376 - is $@ empty ok 1377 - '9/2 | 8' isa 'Math::BigRat' ok 1378 - 9/2 | 8 = 4 | 8 = 12 ok 1379 - is $@ empty ok 1380 - '5 | 0' isa 'Math::BigRat' ok 1381 - 5 | 0 = 5 | 0 = 5 ok 1382 - is $@ empty ok 1383 - '5 | 1/2' isa 'Math::BigRat' ok 1384 - 5 | 1/2 = 5 | 0 = 5 ok 1385 - is $@ empty ok 1386 - '5 | 1' isa 'Math::BigRat' ok 1387 - 5 | 1 = 5 | 1 = 5 ok 1388 - is $@ empty ok 1389 - '5 | 3/2' isa 'Math::BigRat' ok 1390 - 5 | 3/2 = 5 | 1 = 5 ok 1391 - is $@ empty ok 1392 - '5 | 2' isa 'Math::BigRat' ok 1393 - 5 | 2 = 5 | 2 = 7 ok 1394 - is $@ empty ok 1395 - '5 | 5/2' isa 'Math::BigRat' ok 1396 - 5 | 5/2 = 5 | 2 = 7 ok 1397 - is $@ empty ok 1398 - '5 | 3' isa 'Math::BigRat' ok 1399 - 5 | 3 = 5 | 3 = 7 ok 1400 - is $@ empty ok 1401 - '5 | 7/2' isa 'Math::BigRat' ok 1402 - 5 | 7/2 = 5 | 3 = 7 ok 1403 - is $@ empty ok 1404 - '5 | 4' isa 'Math::BigRat' ok 1405 - 5 | 4 = 5 | 4 = 5 ok 1406 - is $@ empty ok 1407 - '5 | 9/2' isa 'Math::BigRat' ok 1408 - 5 | 9/2 = 5 | 4 = 5 ok 1409 - is $@ empty ok 1410 - '5 | 5' isa 'Math::BigRat' ok 1411 - 5 | 5 = 5 | 5 = 5 ok 1412 - is $@ empty ok 1413 - '5 | 11/2' isa 'Math::BigRat' ok 1414 - 5 | 11/2 = 5 | 5 = 5 ok 1415 - is $@ empty ok 1416 - '5 | 6' isa 'Math::BigRat' ok 1417 - 5 | 6 = 5 | 6 = 7 ok 1418 - is $@ empty ok 1419 - '5 | 13/2' isa 'Math::BigRat' ok 1420 - 5 | 13/2 = 5 | 6 = 7 ok 1421 - is $@ empty ok 1422 - '5 | 7' isa 'Math::BigRat' ok 1423 - 5 | 7 = 5 | 7 = 7 ok 1424 - is $@ empty ok 1425 - '5 | 15/2' isa 'Math::BigRat' ok 1426 - 5 | 15/2 = 5 | 7 = 7 ok 1427 - is $@ empty ok 1428 - '5 | 8' isa 'Math::BigRat' ok 1429 - 5 | 8 = 5 | 8 = 13 ok 1430 - is $@ empty ok 1431 - '11/2 | 0' isa 'Math::BigRat' ok 1432 - 11/2 | 0 = 5 | 0 = 5 ok 1433 - is $@ empty ok 1434 - '11/2 | 1/2' isa 'Math::BigRat' ok 1435 - 11/2 | 1/2 = 5 | 0 = 5 ok 1436 - is $@ empty ok 1437 - '11/2 | 1' isa 'Math::BigRat' ok 1438 - 11/2 | 1 = 5 | 1 = 5 ok 1439 - is $@ empty ok 1440 - '11/2 | 3/2' isa 'Math::BigRat' ok 1441 - 11/2 | 3/2 = 5 | 1 = 5 ok 1442 - is $@ empty ok 1443 - '11/2 | 2' isa 'Math::BigRat' ok 1444 - 11/2 | 2 = 5 | 2 = 7 ok 1445 - is $@ empty ok 1446 - '11/2 | 5/2' isa 'Math::BigRat' ok 1447 - 11/2 | 5/2 = 5 | 2 = 7 ok 1448 - is $@ empty ok 1449 - '11/2 | 3' isa 'Math::BigRat' ok 1450 - 11/2 | 3 = 5 | 3 = 7 ok 1451 - is $@ empty ok 1452 - '11/2 | 7/2' isa 'Math::BigRat' ok 1453 - 11/2 | 7/2 = 5 | 3 = 7 ok 1454 - is $@ empty ok 1455 - '11/2 | 4' isa 'Math::BigRat' ok 1456 - 11/2 | 4 = 5 | 4 = 5 ok 1457 - is $@ empty ok 1458 - '11/2 | 9/2' isa 'Math::BigRat' ok 1459 - 11/2 | 9/2 = 5 | 4 = 5 ok 1460 - is $@ empty ok 1461 - '11/2 | 5' isa 'Math::BigRat' ok 1462 - 11/2 | 5 = 5 | 5 = 5 ok 1463 - is $@ empty ok 1464 - '11/2 | 11/2' isa 'Math::BigRat' ok 1465 - 11/2 | 11/2 = 5 | 5 = 5 ok 1466 - is $@ empty ok 1467 - '11/2 | 6' isa 'Math::BigRat' ok 1468 - 11/2 | 6 = 5 | 6 = 7 ok 1469 - is $@ empty ok 1470 - '11/2 | 13/2' isa 'Math::BigRat' ok 1471 - 11/2 | 13/2 = 5 | 6 = 7 ok 1472 - is $@ empty ok 1473 - '11/2 | 7' isa 'Math::BigRat' ok 1474 - 11/2 | 7 = 5 | 7 = 7 ok 1475 - is $@ empty ok 1476 - '11/2 | 15/2' isa 'Math::BigRat' ok 1477 - 11/2 | 15/2 = 5 | 7 = 7 ok 1478 - is $@ empty ok 1479 - '11/2 | 8' isa 'Math::BigRat' ok 1480 - 11/2 | 8 = 5 | 8 = 13 ok 1481 - is $@ empty ok 1482 - '6 | 0' isa 'Math::BigRat' ok 1483 - 6 | 0 = 6 | 0 = 6 ok 1484 - is $@ empty ok 1485 - '6 | 1/2' isa 'Math::BigRat' ok 1486 - 6 | 1/2 = 6 | 0 = 6 ok 1487 - is $@ empty ok 1488 - '6 | 1' isa 'Math::BigRat' ok 1489 - 6 | 1 = 6 | 1 = 7 ok 1490 - is $@ empty ok 1491 - '6 | 3/2' isa 'Math::BigRat' ok 1492 - 6 | 3/2 = 6 | 1 = 7 ok 1493 - is $@ empty ok 1494 - '6 | 2' isa 'Math::BigRat' ok 1495 - 6 | 2 = 6 | 2 = 6 ok 1496 - is $@ empty ok 1497 - '6 | 5/2' isa 'Math::BigRat' ok 1498 - 6 | 5/2 = 6 | 2 = 6 ok 1499 - is $@ empty ok 1500 - '6 | 3' isa 'Math::BigRat' ok 1501 - 6 | 3 = 6 | 3 = 7 ok 1502 - is $@ empty ok 1503 - '6 | 7/2' isa 'Math::BigRat' ok 1504 - 6 | 7/2 = 6 | 3 = 7 ok 1505 - is $@ empty ok 1506 - '6 | 4' isa 'Math::BigRat' ok 1507 - 6 | 4 = 6 | 4 = 6 ok 1508 - is $@ empty ok 1509 - '6 | 9/2' isa 'Math::BigRat' ok 1510 - 6 | 9/2 = 6 | 4 = 6 ok 1511 - is $@ empty ok 1512 - '6 | 5' isa 'Math::BigRat' ok 1513 - 6 | 5 = 6 | 5 = 7 ok 1514 - is $@ empty ok 1515 - '6 | 11/2' isa 'Math::BigRat' ok 1516 - 6 | 11/2 = 6 | 5 = 7 ok 1517 - is $@ empty ok 1518 - '6 | 6' isa 'Math::BigRat' ok 1519 - 6 | 6 = 6 | 6 = 6 ok 1520 - is $@ empty ok 1521 - '6 | 13/2' isa 'Math::BigRat' ok 1522 - 6 | 13/2 = 6 | 6 = 6 ok 1523 - is $@ empty ok 1524 - '6 | 7' isa 'Math::BigRat' ok 1525 - 6 | 7 = 6 | 7 = 7 ok 1526 - is $@ empty ok 1527 - '6 | 15/2' isa 'Math::BigRat' ok 1528 - 6 | 15/2 = 6 | 7 = 7 ok 1529 - is $@ empty ok 1530 - '6 | 8' isa 'Math::BigRat' ok 1531 - 6 | 8 = 6 | 8 = 14 ok 1532 - is $@ empty ok 1533 - '13/2 | 0' isa 'Math::BigRat' ok 1534 - 13/2 | 0 = 6 | 0 = 6 ok 1535 - is $@ empty ok 1536 - '13/2 | 1/2' isa 'Math::BigRat' ok 1537 - 13/2 | 1/2 = 6 | 0 = 6 ok 1538 - is $@ empty ok 1539 - '13/2 | 1' isa 'Math::BigRat' ok 1540 - 13/2 | 1 = 6 | 1 = 7 ok 1541 - is $@ empty ok 1542 - '13/2 | 3/2' isa 'Math::BigRat' ok 1543 - 13/2 | 3/2 = 6 | 1 = 7 ok 1544 - is $@ empty ok 1545 - '13/2 | 2' isa 'Math::BigRat' ok 1546 - 13/2 | 2 = 6 | 2 = 6 ok 1547 - is $@ empty ok 1548 - '13/2 | 5/2' isa 'Math::BigRat' ok 1549 - 13/2 | 5/2 = 6 | 2 = 6 ok 1550 - is $@ empty ok 1551 - '13/2 | 3' isa 'Math::BigRat' ok 1552 - 13/2 | 3 = 6 | 3 = 7 ok 1553 - is $@ empty ok 1554 - '13/2 | 7/2' isa 'Math::BigRat' ok 1555 - 13/2 | 7/2 = 6 | 3 = 7 ok 1556 - is $@ empty ok 1557 - '13/2 | 4' isa 'Math::BigRat' ok 1558 - 13/2 | 4 = 6 | 4 = 6 ok 1559 - is $@ empty ok 1560 - '13/2 | 9/2' isa 'Math::BigRat' ok 1561 - 13/2 | 9/2 = 6 | 4 = 6 ok 1562 - is $@ empty ok 1563 - '13/2 | 5' isa 'Math::BigRat' ok 1564 - 13/2 | 5 = 6 | 5 = 7 ok 1565 - is $@ empty ok 1566 - '13/2 | 11/2' isa 'Math::BigRat' ok 1567 - 13/2 | 11/2 = 6 | 5 = 7 ok 1568 - is $@ empty ok 1569 - '13/2 | 6' isa 'Math::BigRat' ok 1570 - 13/2 | 6 = 6 | 6 = 6 ok 1571 - is $@ empty ok 1572 - '13/2 | 13/2' isa 'Math::BigRat' ok 1573 - 13/2 | 13/2 = 6 | 6 = 6 ok 1574 - is $@ empty ok 1575 - '13/2 | 7' isa 'Math::BigRat' ok 1576 - 13/2 | 7 = 6 | 7 = 7 ok 1577 - is $@ empty ok 1578 - '13/2 | 15/2' isa 'Math::BigRat' ok 1579 - 13/2 | 15/2 = 6 | 7 = 7 ok 1580 - is $@ empty ok 1581 - '13/2 | 8' isa 'Math::BigRat' ok 1582 - 13/2 | 8 = 6 | 8 = 14 ok 1583 - is $@ empty ok 1584 - '7 | 0' isa 'Math::BigRat' ok 1585 - 7 | 0 = 7 | 0 = 7 ok 1586 - is $@ empty ok 1587 - '7 | 1/2' isa 'Math::BigRat' ok 1588 - 7 | 1/2 = 7 | 0 = 7 ok 1589 - is $@ empty ok 1590 - '7 | 1' isa 'Math::BigRat' ok 1591 - 7 | 1 = 7 | 1 = 7 ok 1592 - is $@ empty ok 1593 - '7 | 3/2' isa 'Math::BigRat' ok 1594 - 7 | 3/2 = 7 | 1 = 7 ok 1595 - is $@ empty ok 1596 - '7 | 2' isa 'Math::BigRat' ok 1597 - 7 | 2 = 7 | 2 = 7 ok 1598 - is $@ empty ok 1599 - '7 | 5/2' isa 'Math::BigRat' ok 1600 - 7 | 5/2 = 7 | 2 = 7 ok 1601 - is $@ empty ok 1602 - '7 | 3' isa 'Math::BigRat' ok 1603 - 7 | 3 = 7 | 3 = 7 ok 1604 - is $@ empty ok 1605 - '7 | 7/2' isa 'Math::BigRat' ok 1606 - 7 | 7/2 = 7 | 3 = 7 ok 1607 - is $@ empty ok 1608 - '7 | 4' isa 'Math::BigRat' ok 1609 - 7 | 4 = 7 | 4 = 7 ok 1610 - is $@ empty ok 1611 - '7 | 9/2' isa 'Math::BigRat' ok 1612 - 7 | 9/2 = 7 | 4 = 7 ok 1613 - is $@ empty ok 1614 - '7 | 5' isa 'Math::BigRat' ok 1615 - 7 | 5 = 7 | 5 = 7 ok 1616 - is $@ empty ok 1617 - '7 | 11/2' isa 'Math::BigRat' ok 1618 - 7 | 11/2 = 7 | 5 = 7 ok 1619 - is $@ empty ok 1620 - '7 | 6' isa 'Math::BigRat' ok 1621 - 7 | 6 = 7 | 6 = 7 ok 1622 - is $@ empty ok 1623 - '7 | 13/2' isa 'Math::BigRat' ok 1624 - 7 | 13/2 = 7 | 6 = 7 ok 1625 - is $@ empty ok 1626 - '7 | 7' isa 'Math::BigRat' ok 1627 - 7 | 7 = 7 | 7 = 7 ok 1628 - is $@ empty ok 1629 - '7 | 15/2' isa 'Math::BigRat' ok 1630 - 7 | 15/2 = 7 | 7 = 7 ok 1631 - is $@ empty ok 1632 - '7 | 8' isa 'Math::BigRat' ok 1633 - 7 | 8 = 7 | 8 = 15 ok 1634 - is $@ empty ok 1635 - '15/2 | 0' isa 'Math::BigRat' ok 1636 - 15/2 | 0 = 7 | 0 = 7 ok 1637 - is $@ empty ok 1638 - '15/2 | 1/2' isa 'Math::BigRat' ok 1639 - 15/2 | 1/2 = 7 | 0 = 7 ok 1640 - is $@ empty ok 1641 - '15/2 | 1' isa 'Math::BigRat' ok 1642 - 15/2 | 1 = 7 | 1 = 7 ok 1643 - is $@ empty ok 1644 - '15/2 | 3/2' isa 'Math::BigRat' ok 1645 - 15/2 | 3/2 = 7 | 1 = 7 ok 1646 - is $@ empty ok 1647 - '15/2 | 2' isa 'Math::BigRat' ok 1648 - 15/2 | 2 = 7 | 2 = 7 ok 1649 - is $@ empty ok 1650 - '15/2 | 5/2' isa 'Math::BigRat' ok 1651 - 15/2 | 5/2 = 7 | 2 = 7 ok 1652 - is $@ empty ok 1653 - '15/2 | 3' isa 'Math::BigRat' ok 1654 - 15/2 | 3 = 7 | 3 = 7 ok 1655 - is $@ empty ok 1656 - '15/2 | 7/2' isa 'Math::BigRat' ok 1657 - 15/2 | 7/2 = 7 | 3 = 7 ok 1658 - is $@ empty ok 1659 - '15/2 | 4' isa 'Math::BigRat' ok 1660 - 15/2 | 4 = 7 | 4 = 7 ok 1661 - is $@ empty ok 1662 - '15/2 | 9/2' isa 'Math::BigRat' ok 1663 - 15/2 | 9/2 = 7 | 4 = 7 ok 1664 - is $@ empty ok 1665 - '15/2 | 5' isa 'Math::BigRat' ok 1666 - 15/2 | 5 = 7 | 5 = 7 ok 1667 - is $@ empty ok 1668 - '15/2 | 11/2' isa 'Math::BigRat' ok 1669 - 15/2 | 11/2 = 7 | 5 = 7 ok 1670 - is $@ empty ok 1671 - '15/2 | 6' isa 'Math::BigRat' ok 1672 - 15/2 | 6 = 7 | 6 = 7 ok 1673 - is $@ empty ok 1674 - '15/2 | 13/2' isa 'Math::BigRat' ok 1675 - 15/2 | 13/2 = 7 | 6 = 7 ok 1676 - is $@ empty ok 1677 - '15/2 | 7' isa 'Math::BigRat' ok 1678 - 15/2 | 7 = 7 | 7 = 7 ok 1679 - is $@ empty ok 1680 - '15/2 | 15/2' isa 'Math::BigRat' ok 1681 - 15/2 | 15/2 = 7 | 7 = 7 ok 1682 - is $@ empty ok 1683 - '15/2 | 8' isa 'Math::BigRat' ok 1684 - 15/2 | 8 = 7 | 8 = 15 ok 1685 - is $@ empty ok 1686 - '8 | 0' isa 'Math::BigRat' ok 1687 - 8 | 0 = 8 | 0 = 8 ok 1688 - is $@ empty ok 1689 - '8 | 1/2' isa 'Math::BigRat' ok 1690 - 8 | 1/2 = 8 | 0 = 8 ok 1691 - is $@ empty ok 1692 - '8 | 1' isa 'Math::BigRat' ok 1693 - 8 | 1 = 8 | 1 = 9 ok 1694 - is $@ empty ok 1695 - '8 | 3/2' isa 'Math::BigRat' ok 1696 - 8 | 3/2 = 8 | 1 = 9 ok 1697 - is $@ empty ok 1698 - '8 | 2' isa 'Math::BigRat' ok 1699 - 8 | 2 = 8 | 2 = 10 ok 1700 - is $@ empty ok 1701 - '8 | 5/2' isa 'Math::BigRat' ok 1702 - 8 | 5/2 = 8 | 2 = 10 ok 1703 - is $@ empty ok 1704 - '8 | 3' isa 'Math::BigRat' ok 1705 - 8 | 3 = 8 | 3 = 11 ok 1706 - is $@ empty ok 1707 - '8 | 7/2' isa 'Math::BigRat' ok 1708 - 8 | 7/2 = 8 | 3 = 11 ok 1709 - is $@ empty ok 1710 - '8 | 4' isa 'Math::BigRat' ok 1711 - 8 | 4 = 8 | 4 = 12 ok 1712 - is $@ empty ok 1713 - '8 | 9/2' isa 'Math::BigRat' ok 1714 - 8 | 9/2 = 8 | 4 = 12 ok 1715 - is $@ empty ok 1716 - '8 | 5' isa 'Math::BigRat' ok 1717 - 8 | 5 = 8 | 5 = 13 ok 1718 - is $@ empty ok 1719 - '8 | 11/2' isa 'Math::BigRat' ok 1720 - 8 | 11/2 = 8 | 5 = 13 ok 1721 - is $@ empty ok 1722 - '8 | 6' isa 'Math::BigRat' ok 1723 - 8 | 6 = 8 | 6 = 14 ok 1724 - is $@ empty ok 1725 - '8 | 13/2' isa 'Math::BigRat' ok 1726 - 8 | 13/2 = 8 | 6 = 14 ok 1727 - is $@ empty ok 1728 - '8 | 7' isa 'Math::BigRat' ok 1729 - 8 | 7 = 8 | 7 = 15 ok 1730 - is $@ empty ok 1731 - '8 | 15/2' isa 'Math::BigRat' ok 1732 - 8 | 15/2 = 8 | 7 = 15 ok 1733 - is $@ empty ok 1734 - '8 | 8' isa 'Math::BigRat' ok 1735 - 8 | 8 = 8 | 8 = 8 ok 1736 - is $@ empty ok 1737 - '0 ^ 0' isa 'Math::BigRat' ok 1738 - 0 ^ 0 = 0 ^ 0 = 0 ok 1739 - is $@ empty ok 1740 - '0 ^ 1/2' isa 'Math::BigRat' ok 1741 - 0 ^ 1/2 = 0 ^ 0 = 0 ok 1742 - is $@ empty ok 1743 - '0 ^ 1' isa 'Math::BigRat' ok 1744 - 0 ^ 1 = 0 ^ 1 = 1 ok 1745 - is $@ empty ok 1746 - '0 ^ 3/2' isa 'Math::BigRat' ok 1747 - 0 ^ 3/2 = 0 ^ 1 = 1 ok 1748 - is $@ empty ok 1749 - '0 ^ 2' isa 'Math::BigRat' ok 1750 - 0 ^ 2 = 0 ^ 2 = 2 ok 1751 - is $@ empty ok 1752 - '0 ^ 5/2' isa 'Math::BigRat' ok 1753 - 0 ^ 5/2 = 0 ^ 2 = 2 ok 1754 - is $@ empty ok 1755 - '0 ^ 3' isa 'Math::BigRat' ok 1756 - 0 ^ 3 = 0 ^ 3 = 3 ok 1757 - is $@ empty ok 1758 - '0 ^ 7/2' isa 'Math::BigRat' ok 1759 - 0 ^ 7/2 = 0 ^ 3 = 3 ok 1760 - is $@ empty ok 1761 - '0 ^ 4' isa 'Math::BigRat' ok 1762 - 0 ^ 4 = 0 ^ 4 = 4 ok 1763 - is $@ empty ok 1764 - '0 ^ 9/2' isa 'Math::BigRat' ok 1765 - 0 ^ 9/2 = 0 ^ 4 = 4 ok 1766 - is $@ empty ok 1767 - '0 ^ 5' isa 'Math::BigRat' ok 1768 - 0 ^ 5 = 0 ^ 5 = 5 ok 1769 - is $@ empty ok 1770 - '0 ^ 11/2' isa 'Math::BigRat' ok 1771 - 0 ^ 11/2 = 0 ^ 5 = 5 ok 1772 - is $@ empty ok 1773 - '0 ^ 6' isa 'Math::BigRat' ok 1774 - 0 ^ 6 = 0 ^ 6 = 6 ok 1775 - is $@ empty ok 1776 - '0 ^ 13/2' isa 'Math::BigRat' ok 1777 - 0 ^ 13/2 = 0 ^ 6 = 6 ok 1778 - is $@ empty ok 1779 - '0 ^ 7' isa 'Math::BigRat' ok 1780 - 0 ^ 7 = 0 ^ 7 = 7 ok 1781 - is $@ empty ok 1782 - '0 ^ 15/2' isa 'Math::BigRat' ok 1783 - 0 ^ 15/2 = 0 ^ 7 = 7 ok 1784 - is $@ empty ok 1785 - '0 ^ 8' isa 'Math::BigRat' ok 1786 - 0 ^ 8 = 0 ^ 8 = 8 ok 1787 - is $@ empty ok 1788 - '1/2 ^ 0' isa 'Math::BigRat' ok 1789 - 1/2 ^ 0 = 0 ^ 0 = 0 ok 1790 - is $@ empty ok 1791 - '1/2 ^ 1/2' isa 'Math::BigRat' ok 1792 - 1/2 ^ 1/2 = 0 ^ 0 = 0 ok 1793 - is $@ empty ok 1794 - '1/2 ^ 1' isa 'Math::BigRat' ok 1795 - 1/2 ^ 1 = 0 ^ 1 = 1 ok 1796 - is $@ empty ok 1797 - '1/2 ^ 3/2' isa 'Math::BigRat' ok 1798 - 1/2 ^ 3/2 = 0 ^ 1 = 1 ok 1799 - is $@ empty ok 1800 - '1/2 ^ 2' isa 'Math::BigRat' ok 1801 - 1/2 ^ 2 = 0 ^ 2 = 2 ok 1802 - is $@ empty ok 1803 - '1/2 ^ 5/2' isa 'Math::BigRat' ok 1804 - 1/2 ^ 5/2 = 0 ^ 2 = 2 ok 1805 - is $@ empty ok 1806 - '1/2 ^ 3' isa 'Math::BigRat' ok 1807 - 1/2 ^ 3 = 0 ^ 3 = 3 ok 1808 - is $@ empty ok 1809 - '1/2 ^ 7/2' isa 'Math::BigRat' ok 1810 - 1/2 ^ 7/2 = 0 ^ 3 = 3 ok 1811 - is $@ empty ok 1812 - '1/2 ^ 4' isa 'Math::BigRat' ok 1813 - 1/2 ^ 4 = 0 ^ 4 = 4 ok 1814 - is $@ empty ok 1815 - '1/2 ^ 9/2' isa 'Math::BigRat' ok 1816 - 1/2 ^ 9/2 = 0 ^ 4 = 4 ok 1817 - is $@ empty ok 1818 - '1/2 ^ 5' isa 'Math::BigRat' ok 1819 - 1/2 ^ 5 = 0 ^ 5 = 5 ok 1820 - is $@ empty ok 1821 - '1/2 ^ 11/2' isa 'Math::BigRat' ok 1822 - 1/2 ^ 11/2 = 0 ^ 5 = 5 ok 1823 - is $@ empty ok 1824 - '1/2 ^ 6' isa 'Math::BigRat' ok 1825 - 1/2 ^ 6 = 0 ^ 6 = 6 ok 1826 - is $@ empty ok 1827 - '1/2 ^ 13/2' isa 'Math::BigRat' ok 1828 - 1/2 ^ 13/2 = 0 ^ 6 = 6 ok 1829 - is $@ empty ok 1830 - '1/2 ^ 7' isa 'Math::BigRat' ok 1831 - 1/2 ^ 7 = 0 ^ 7 = 7 ok 1832 - is $@ empty ok 1833 - '1/2 ^ 15/2' isa 'Math::BigRat' ok 1834 - 1/2 ^ 15/2 = 0 ^ 7 = 7 ok 1835 - is $@ empty ok 1836 - '1/2 ^ 8' isa 'Math::BigRat' ok 1837 - 1/2 ^ 8 = 0 ^ 8 = 8 ok 1838 - is $@ empty ok 1839 - '1 ^ 0' isa 'Math::BigRat' ok 1840 - 1 ^ 0 = 1 ^ 0 = 1 ok 1841 - is $@ empty ok 1842 - '1 ^ 1/2' isa 'Math::BigRat' ok 1843 - 1 ^ 1/2 = 1 ^ 0 = 1 ok 1844 - is $@ empty ok 1845 - '1 ^ 1' isa 'Math::BigRat' ok 1846 - 1 ^ 1 = 1 ^ 1 = 0 ok 1847 - is $@ empty ok 1848 - '1 ^ 3/2' isa 'Math::BigRat' ok 1849 - 1 ^ 3/2 = 1 ^ 1 = 0 ok 1850 - is $@ empty ok 1851 - '1 ^ 2' isa 'Math::BigRat' ok 1852 - 1 ^ 2 = 1 ^ 2 = 3 ok 1853 - is $@ empty ok 1854 - '1 ^ 5/2' isa 'Math::BigRat' ok 1855 - 1 ^ 5/2 = 1 ^ 2 = 3 ok 1856 - is $@ empty ok 1857 - '1 ^ 3' isa 'Math::BigRat' ok 1858 - 1 ^ 3 = 1 ^ 3 = 2 ok 1859 - is $@ empty ok 1860 - '1 ^ 7/2' isa 'Math::BigRat' ok 1861 - 1 ^ 7/2 = 1 ^ 3 = 2 ok 1862 - is $@ empty ok 1863 - '1 ^ 4' isa 'Math::BigRat' ok 1864 - 1 ^ 4 = 1 ^ 4 = 5 ok 1865 - is $@ empty ok 1866 - '1 ^ 9/2' isa 'Math::BigRat' ok 1867 - 1 ^ 9/2 = 1 ^ 4 = 5 ok 1868 - is $@ empty ok 1869 - '1 ^ 5' isa 'Math::BigRat' ok 1870 - 1 ^ 5 = 1 ^ 5 = 4 ok 1871 - is $@ empty ok 1872 - '1 ^ 11/2' isa 'Math::BigRat' ok 1873 - 1 ^ 11/2 = 1 ^ 5 = 4 ok 1874 - is $@ empty ok 1875 - '1 ^ 6' isa 'Math::BigRat' ok 1876 - 1 ^ 6 = 1 ^ 6 = 7 ok 1877 - is $@ empty ok 1878 - '1 ^ 13/2' isa 'Math::BigRat' ok 1879 - 1 ^ 13/2 = 1 ^ 6 = 7 ok 1880 - is $@ empty ok 1881 - '1 ^ 7' isa 'Math::BigRat' ok 1882 - 1 ^ 7 = 1 ^ 7 = 6 ok 1883 - is $@ empty ok 1884 - '1 ^ 15/2' isa 'Math::BigRat' ok 1885 - 1 ^ 15/2 = 1 ^ 7 = 6 ok 1886 - is $@ empty ok 1887 - '1 ^ 8' isa 'Math::BigRat' ok 1888 - 1 ^ 8 = 1 ^ 8 = 9 ok 1889 - is $@ empty ok 1890 - '3/2 ^ 0' isa 'Math::BigRat' ok 1891 - 3/2 ^ 0 = 1 ^ 0 = 1 ok 1892 - is $@ empty ok 1893 - '3/2 ^ 1/2' isa 'Math::BigRat' ok 1894 - 3/2 ^ 1/2 = 1 ^ 0 = 1 ok 1895 - is $@ empty ok 1896 - '3/2 ^ 1' isa 'Math::BigRat' ok 1897 - 3/2 ^ 1 = 1 ^ 1 = 0 ok 1898 - is $@ empty ok 1899 - '3/2 ^ 3/2' isa 'Math::BigRat' ok 1900 - 3/2 ^ 3/2 = 1 ^ 1 = 0 ok 1901 - is $@ empty ok 1902 - '3/2 ^ 2' isa 'Math::BigRat' ok 1903 - 3/2 ^ 2 = 1 ^ 2 = 3 ok 1904 - is $@ empty ok 1905 - '3/2 ^ 5/2' isa 'Math::BigRat' ok 1906 - 3/2 ^ 5/2 = 1 ^ 2 = 3 ok 1907 - is $@ empty ok 1908 - '3/2 ^ 3' isa 'Math::BigRat' ok 1909 - 3/2 ^ 3 = 1 ^ 3 = 2 ok 1910 - is $@ empty ok 1911 - '3/2 ^ 7/2' isa 'Math::BigRat' ok 1912 - 3/2 ^ 7/2 = 1 ^ 3 = 2 ok 1913 - is $@ empty ok 1914 - '3/2 ^ 4' isa 'Math::BigRat' ok 1915 - 3/2 ^ 4 = 1 ^ 4 = 5 ok 1916 - is $@ empty ok 1917 - '3/2 ^ 9/2' isa 'Math::BigRat' ok 1918 - 3/2 ^ 9/2 = 1 ^ 4 = 5 ok 1919 - is $@ empty ok 1920 - '3/2 ^ 5' isa 'Math::BigRat' ok 1921 - 3/2 ^ 5 = 1 ^ 5 = 4 ok 1922 - is $@ empty ok 1923 - '3/2 ^ 11/2' isa 'Math::BigRat' ok 1924 - 3/2 ^ 11/2 = 1 ^ 5 = 4 ok 1925 - is $@ empty ok 1926 - '3/2 ^ 6' isa 'Math::BigRat' ok 1927 - 3/2 ^ 6 = 1 ^ 6 = 7 ok 1928 - is $@ empty ok 1929 - '3/2 ^ 13/2' isa 'Math::BigRat' ok 1930 - 3/2 ^ 13/2 = 1 ^ 6 = 7 ok 1931 - is $@ empty ok 1932 - '3/2 ^ 7' isa 'Math::BigRat' ok 1933 - 3/2 ^ 7 = 1 ^ 7 = 6 ok 1934 - is $@ empty ok 1935 - '3/2 ^ 15/2' isa 'Math::BigRat' ok 1936 - 3/2 ^ 15/2 = 1 ^ 7 = 6 ok 1937 - is $@ empty ok 1938 - '3/2 ^ 8' isa 'Math::BigRat' ok 1939 - 3/2 ^ 8 = 1 ^ 8 = 9 ok 1940 - is $@ empty ok 1941 - '2 ^ 0' isa 'Math::BigRat' ok 1942 - 2 ^ 0 = 2 ^ 0 = 2 ok 1943 - is $@ empty ok 1944 - '2 ^ 1/2' isa 'Math::BigRat' ok 1945 - 2 ^ 1/2 = 2 ^ 0 = 2 ok 1946 - is $@ empty ok 1947 - '2 ^ 1' isa 'Math::BigRat' ok 1948 - 2 ^ 1 = 2 ^ 1 = 3 ok 1949 - is $@ empty ok 1950 - '2 ^ 3/2' isa 'Math::BigRat' ok 1951 - 2 ^ 3/2 = 2 ^ 1 = 3 ok 1952 - is $@ empty ok 1953 - '2 ^ 2' isa 'Math::BigRat' ok 1954 - 2 ^ 2 = 2 ^ 2 = 0 ok 1955 - is $@ empty ok 1956 - '2 ^ 5/2' isa 'Math::BigRat' ok 1957 - 2 ^ 5/2 = 2 ^ 2 = 0 ok 1958 - is $@ empty ok 1959 - '2 ^ 3' isa 'Math::BigRat' ok 1960 - 2 ^ 3 = 2 ^ 3 = 1 ok 1961 - is $@ empty ok 1962 - '2 ^ 7/2' isa 'Math::BigRat' ok 1963 - 2 ^ 7/2 = 2 ^ 3 = 1 ok 1964 - is $@ empty ok 1965 - '2 ^ 4' isa 'Math::BigRat' ok 1966 - 2 ^ 4 = 2 ^ 4 = 6 ok 1967 - is $@ empty ok 1968 - '2 ^ 9/2' isa 'Math::BigRat' ok 1969 - 2 ^ 9/2 = 2 ^ 4 = 6 ok 1970 - is $@ empty ok 1971 - '2 ^ 5' isa 'Math::BigRat' ok 1972 - 2 ^ 5 = 2 ^ 5 = 7 ok 1973 - is $@ empty ok 1974 - '2 ^ 11/2' isa 'Math::BigRat' ok 1975 - 2 ^ 11/2 = 2 ^ 5 = 7 ok 1976 - is $@ empty ok 1977 - '2 ^ 6' isa 'Math::BigRat' ok 1978 - 2 ^ 6 = 2 ^ 6 = 4 ok 1979 - is $@ empty ok 1980 - '2 ^ 13/2' isa 'Math::BigRat' ok 1981 - 2 ^ 13/2 = 2 ^ 6 = 4 ok 1982 - is $@ empty ok 1983 - '2 ^ 7' isa 'Math::BigRat' ok 1984 - 2 ^ 7 = 2 ^ 7 = 5 ok 1985 - is $@ empty ok 1986 - '2 ^ 15/2' isa 'Math::BigRat' ok 1987 - 2 ^ 15/2 = 2 ^ 7 = 5 ok 1988 - is $@ empty ok 1989 - '2 ^ 8' isa 'Math::BigRat' ok 1990 - 2 ^ 8 = 2 ^ 8 = 10 ok 1991 - is $@ empty ok 1992 - '5/2 ^ 0' isa 'Math::BigRat' ok 1993 - 5/2 ^ 0 = 2 ^ 0 = 2 ok 1994 - is $@ empty ok 1995 - '5/2 ^ 1/2' isa 'Math::BigRat' ok 1996 - 5/2 ^ 1/2 = 2 ^ 0 = 2 ok 1997 - is $@ empty ok 1998 - '5/2 ^ 1' isa 'Math::BigRat' ok 1999 - 5/2 ^ 1 = 2 ^ 1 = 3 ok 2000 - is $@ empty ok 2001 - '5/2 ^ 3/2' isa 'Math::BigRat' ok 2002 - 5/2 ^ 3/2 = 2 ^ 1 = 3 ok 2003 - is $@ empty ok 2004 - '5/2 ^ 2' isa 'Math::BigRat' ok 2005 - 5/2 ^ 2 = 2 ^ 2 = 0 ok 2006 - is $@ empty ok 2007 - '5/2 ^ 5/2' isa 'Math::BigRat' ok 2008 - 5/2 ^ 5/2 = 2 ^ 2 = 0 ok 2009 - is $@ empty ok 2010 - '5/2 ^ 3' isa 'Math::BigRat' ok 2011 - 5/2 ^ 3 = 2 ^ 3 = 1 ok 2012 - is $@ empty ok 2013 - '5/2 ^ 7/2' isa 'Math::BigRat' ok 2014 - 5/2 ^ 7/2 = 2 ^ 3 = 1 ok 2015 - is $@ empty ok 2016 - '5/2 ^ 4' isa 'Math::BigRat' ok 2017 - 5/2 ^ 4 = 2 ^ 4 = 6 ok 2018 - is $@ empty ok 2019 - '5/2 ^ 9/2' isa 'Math::BigRat' ok 2020 - 5/2 ^ 9/2 = 2 ^ 4 = 6 ok 2021 - is $@ empty ok 2022 - '5/2 ^ 5' isa 'Math::BigRat' ok 2023 - 5/2 ^ 5 = 2 ^ 5 = 7 ok 2024 - is $@ empty ok 2025 - '5/2 ^ 11/2' isa 'Math::BigRat' ok 2026 - 5/2 ^ 11/2 = 2 ^ 5 = 7 ok 2027 - is $@ empty ok 2028 - '5/2 ^ 6' isa 'Math::BigRat' ok 2029 - 5/2 ^ 6 = 2 ^ 6 = 4 ok 2030 - is $@ empty ok 2031 - '5/2 ^ 13/2' isa 'Math::BigRat' ok 2032 - 5/2 ^ 13/2 = 2 ^ 6 = 4 ok 2033 - is $@ empty ok 2034 - '5/2 ^ 7' isa 'Math::BigRat' ok 2035 - 5/2 ^ 7 = 2 ^ 7 = 5 ok 2036 - is $@ empty ok 2037 - '5/2 ^ 15/2' isa 'Math::BigRat' ok 2038 - 5/2 ^ 15/2 = 2 ^ 7 = 5 ok 2039 - is $@ empty ok 2040 - '5/2 ^ 8' isa 'Math::BigRat' ok 2041 - 5/2 ^ 8 = 2 ^ 8 = 10 ok 2042 - is $@ empty ok 2043 - '3 ^ 0' isa 'Math::BigRat' ok 2044 - 3 ^ 0 = 3 ^ 0 = 3 ok 2045 - is $@ empty ok 2046 - '3 ^ 1/2' isa 'Math::BigRat' ok 2047 - 3 ^ 1/2 = 3 ^ 0 = 3 ok 2048 - is $@ empty ok 2049 - '3 ^ 1' isa 'Math::BigRat' ok 2050 - 3 ^ 1 = 3 ^ 1 = 2 ok 2051 - is $@ empty ok 2052 - '3 ^ 3/2' isa 'Math::BigRat' ok 2053 - 3 ^ 3/2 = 3 ^ 1 = 2 ok 2054 - is $@ empty ok 2055 - '3 ^ 2' isa 'Math::BigRat' ok 2056 - 3 ^ 2 = 3 ^ 2 = 1 ok 2057 - is $@ empty ok 2058 - '3 ^ 5/2' isa 'Math::BigRat' ok 2059 - 3 ^ 5/2 = 3 ^ 2 = 1 ok 2060 - is $@ empty ok 2061 - '3 ^ 3' isa 'Math::BigRat' ok 2062 - 3 ^ 3 = 3 ^ 3 = 0 ok 2063 - is $@ empty ok 2064 - '3 ^ 7/2' isa 'Math::BigRat' ok 2065 - 3 ^ 7/2 = 3 ^ 3 = 0 ok 2066 - is $@ empty ok 2067 - '3 ^ 4' isa 'Math::BigRat' ok 2068 - 3 ^ 4 = 3 ^ 4 = 7 ok 2069 - is $@ empty ok 2070 - '3 ^ 9/2' isa 'Math::BigRat' ok 2071 - 3 ^ 9/2 = 3 ^ 4 = 7 ok 2072 - is $@ empty ok 2073 - '3 ^ 5' isa 'Math::BigRat' ok 2074 - 3 ^ 5 = 3 ^ 5 = 6 ok 2075 - is $@ empty ok 2076 - '3 ^ 11/2' isa 'Math::BigRat' ok 2077 - 3 ^ 11/2 = 3 ^ 5 = 6 ok 2078 - is $@ empty ok 2079 - '3 ^ 6' isa 'Math::BigRat' ok 2080 - 3 ^ 6 = 3 ^ 6 = 5 ok 2081 - is $@ empty ok 2082 - '3 ^ 13/2' isa 'Math::BigRat' ok 2083 - 3 ^ 13/2 = 3 ^ 6 = 5 ok 2084 - is $@ empty ok 2085 - '3 ^ 7' isa 'Math::BigRat' ok 2086 - 3 ^ 7 = 3 ^ 7 = 4 ok 2087 - is $@ empty ok 2088 - '3 ^ 15/2' isa 'Math::BigRat' ok 2089 - 3 ^ 15/2 = 3 ^ 7 = 4 ok 2090 - is $@ empty ok 2091 - '3 ^ 8' isa 'Math::BigRat' ok 2092 - 3 ^ 8 = 3 ^ 8 = 11 ok 2093 - is $@ empty ok 2094 - '7/2 ^ 0' isa 'Math::BigRat' ok 2095 - 7/2 ^ 0 = 3 ^ 0 = 3 ok 2096 - is $@ empty ok 2097 - '7/2 ^ 1/2' isa 'Math::BigRat' ok 2098 - 7/2 ^ 1/2 = 3 ^ 0 = 3 ok 2099 - is $@ empty ok 2100 - '7/2 ^ 1' isa 'Math::BigRat' ok 2101 - 7/2 ^ 1 = 3 ^ 1 = 2 ok 2102 - is $@ empty ok 2103 - '7/2 ^ 3/2' isa 'Math::BigRat' ok 2104 - 7/2 ^ 3/2 = 3 ^ 1 = 2 ok 2105 - is $@ empty ok 2106 - '7/2 ^ 2' isa 'Math::BigRat' ok 2107 - 7/2 ^ 2 = 3 ^ 2 = 1 ok 2108 - is $@ empty ok 2109 - '7/2 ^ 5/2' isa 'Math::BigRat' ok 2110 - 7/2 ^ 5/2 = 3 ^ 2 = 1 ok 2111 - is $@ empty ok 2112 - '7/2 ^ 3' isa 'Math::BigRat' ok 2113 - 7/2 ^ 3 = 3 ^ 3 = 0 ok 2114 - is $@ empty ok 2115 - '7/2 ^ 7/2' isa 'Math::BigRat' ok 2116 - 7/2 ^ 7/2 = 3 ^ 3 = 0 ok 2117 - is $@ empty ok 2118 - '7/2 ^ 4' isa 'Math::BigRat' ok 2119 - 7/2 ^ 4 = 3 ^ 4 = 7 ok 2120 - is $@ empty ok 2121 - '7/2 ^ 9/2' isa 'Math::BigRat' ok 2122 - 7/2 ^ 9/2 = 3 ^ 4 = 7 ok 2123 - is $@ empty ok 2124 - '7/2 ^ 5' isa 'Math::BigRat' ok 2125 - 7/2 ^ 5 = 3 ^ 5 = 6 ok 2126 - is $@ empty ok 2127 - '7/2 ^ 11/2' isa 'Math::BigRat' ok 2128 - 7/2 ^ 11/2 = 3 ^ 5 = 6 ok 2129 - is $@ empty ok 2130 - '7/2 ^ 6' isa 'Math::BigRat' ok 2131 - 7/2 ^ 6 = 3 ^ 6 = 5 ok 2132 - is $@ empty ok 2133 - '7/2 ^ 13/2' isa 'Math::BigRat' ok 2134 - 7/2 ^ 13/2 = 3 ^ 6 = 5 ok 2135 - is $@ empty ok 2136 - '7/2 ^ 7' isa 'Math::BigRat' ok 2137 - 7/2 ^ 7 = 3 ^ 7 = 4 ok 2138 - is $@ empty ok 2139 - '7/2 ^ 15/2' isa 'Math::BigRat' ok 2140 - 7/2 ^ 15/2 = 3 ^ 7 = 4 ok 2141 - is $@ empty ok 2142 - '7/2 ^ 8' isa 'Math::BigRat' ok 2143 - 7/2 ^ 8 = 3 ^ 8 = 11 ok 2144 - is $@ empty ok 2145 - '4 ^ 0' isa 'Math::BigRat' ok 2146 - 4 ^ 0 = 4 ^ 0 = 4 ok 2147 - is $@ empty ok 2148 - '4 ^ 1/2' isa 'Math::BigRat' ok 2149 - 4 ^ 1/2 = 4 ^ 0 = 4 ok 2150 - is $@ empty ok 2151 - '4 ^ 1' isa 'Math::BigRat' ok 2152 - 4 ^ 1 = 4 ^ 1 = 5 ok 2153 - is $@ empty ok 2154 - '4 ^ 3/2' isa 'Math::BigRat' ok 2155 - 4 ^ 3/2 = 4 ^ 1 = 5 ok 2156 - is $@ empty ok 2157 - '4 ^ 2' isa 'Math::BigRat' ok 2158 - 4 ^ 2 = 4 ^ 2 = 6 ok 2159 - is $@ empty ok 2160 - '4 ^ 5/2' isa 'Math::BigRat' ok 2161 - 4 ^ 5/2 = 4 ^ 2 = 6 ok 2162 - is $@ empty ok 2163 - '4 ^ 3' isa 'Math::BigRat' ok 2164 - 4 ^ 3 = 4 ^ 3 = 7 ok 2165 - is $@ empty ok 2166 - '4 ^ 7/2' isa 'Math::BigRat' ok 2167 - 4 ^ 7/2 = 4 ^ 3 = 7 ok 2168 - is $@ empty ok 2169 - '4 ^ 4' isa 'Math::BigRat' ok 2170 - 4 ^ 4 = 4 ^ 4 = 0 ok 2171 - is $@ empty ok 2172 - '4 ^ 9/2' isa 'Math::BigRat' ok 2173 - 4 ^ 9/2 = 4 ^ 4 = 0 ok 2174 - is $@ empty ok 2175 - '4 ^ 5' isa 'Math::BigRat' ok 2176 - 4 ^ 5 = 4 ^ 5 = 1 ok 2177 - is $@ empty ok 2178 - '4 ^ 11/2' isa 'Math::BigRat' ok 2179 - 4 ^ 11/2 = 4 ^ 5 = 1 ok 2180 - is $@ empty ok 2181 - '4 ^ 6' isa 'Math::BigRat' ok 2182 - 4 ^ 6 = 4 ^ 6 = 2 ok 2183 - is $@ empty ok 2184 - '4 ^ 13/2' isa 'Math::BigRat' ok 2185 - 4 ^ 13/2 = 4 ^ 6 = 2 ok 2186 - is $@ empty ok 2187 - '4 ^ 7' isa 'Math::BigRat' ok 2188 - 4 ^ 7 = 4 ^ 7 = 3 ok 2189 - is $@ empty ok 2190 - '4 ^ 15/2' isa 'Math::BigRat' ok 2191 - 4 ^ 15/2 = 4 ^ 7 = 3 ok 2192 - is $@ empty ok 2193 - '4 ^ 8' isa 'Math::BigRat' ok 2194 - 4 ^ 8 = 4 ^ 8 = 12 ok 2195 - is $@ empty ok 2196 - '9/2 ^ 0' isa 'Math::BigRat' ok 2197 - 9/2 ^ 0 = 4 ^ 0 = 4 ok 2198 - is $@ empty ok 2199 - '9/2 ^ 1/2' isa 'Math::BigRat' ok 2200 - 9/2 ^ 1/2 = 4 ^ 0 = 4 ok 2201 - is $@ empty ok 2202 - '9/2 ^ 1' isa 'Math::BigRat' ok 2203 - 9/2 ^ 1 = 4 ^ 1 = 5 ok 2204 - is $@ empty ok 2205 - '9/2 ^ 3/2' isa 'Math::BigRat' ok 2206 - 9/2 ^ 3/2 = 4 ^ 1 = 5 ok 2207 - is $@ empty ok 2208 - '9/2 ^ 2' isa 'Math::BigRat' ok 2209 - 9/2 ^ 2 = 4 ^ 2 = 6 ok 2210 - is $@ empty ok 2211 - '9/2 ^ 5/2' isa 'Math::BigRat' ok 2212 - 9/2 ^ 5/2 = 4 ^ 2 = 6 ok 2213 - is $@ empty ok 2214 - '9/2 ^ 3' isa 'Math::BigRat' ok 2215 - 9/2 ^ 3 = 4 ^ 3 = 7 ok 2216 - is $@ empty ok 2217 - '9/2 ^ 7/2' isa 'Math::BigRat' ok 2218 - 9/2 ^ 7/2 = 4 ^ 3 = 7 ok 2219 - is $@ empty ok 2220 - '9/2 ^ 4' isa 'Math::BigRat' ok 2221 - 9/2 ^ 4 = 4 ^ 4 = 0 ok 2222 - is $@ empty ok 2223 - '9/2 ^ 9/2' isa 'Math::BigRat' ok 2224 - 9/2 ^ 9/2 = 4 ^ 4 = 0 ok 2225 - is $@ empty ok 2226 - '9/2 ^ 5' isa 'Math::BigRat' ok 2227 - 9/2 ^ 5 = 4 ^ 5 = 1 ok 2228 - is $@ empty ok 2229 - '9/2 ^ 11/2' isa 'Math::BigRat' ok 2230 - 9/2 ^ 11/2 = 4 ^ 5 = 1 ok 2231 - is $@ empty ok 2232 - '9/2 ^ 6' isa 'Math::BigRat' ok 2233 - 9/2 ^ 6 = 4 ^ 6 = 2 ok 2234 - is $@ empty ok 2235 - '9/2 ^ 13/2' isa 'Math::BigRat' ok 2236 - 9/2 ^ 13/2 = 4 ^ 6 = 2 ok 2237 - is $@ empty ok 2238 - '9/2 ^ 7' isa 'Math::BigRat' ok 2239 - 9/2 ^ 7 = 4 ^ 7 = 3 ok 2240 - is $@ empty ok 2241 - '9/2 ^ 15/2' isa 'Math::BigRat' ok 2242 - 9/2 ^ 15/2 = 4 ^ 7 = 3 ok 2243 - is $@ empty ok 2244 - '9/2 ^ 8' isa 'Math::BigRat' ok 2245 - 9/2 ^ 8 = 4 ^ 8 = 12 ok 2246 - is $@ empty ok 2247 - '5 ^ 0' isa 'Math::BigRat' ok 2248 - 5 ^ 0 = 5 ^ 0 = 5 ok 2249 - is $@ empty ok 2250 - '5 ^ 1/2' isa 'Math::BigRat' ok 2251 - 5 ^ 1/2 = 5 ^ 0 = 5 ok 2252 - is $@ empty ok 2253 - '5 ^ 1' isa 'Math::BigRat' ok 2254 - 5 ^ 1 = 5 ^ 1 = 4 ok 2255 - is $@ empty ok 2256 - '5 ^ 3/2' isa 'Math::BigRat' ok 2257 - 5 ^ 3/2 = 5 ^ 1 = 4 ok 2258 - is $@ empty ok 2259 - '5 ^ 2' isa 'Math::BigRat' ok 2260 - 5 ^ 2 = 5 ^ 2 = 7 ok 2261 - is $@ empty ok 2262 - '5 ^ 5/2' isa 'Math::BigRat' ok 2263 - 5 ^ 5/2 = 5 ^ 2 = 7 ok 2264 - is $@ empty ok 2265 - '5 ^ 3' isa 'Math::BigRat' ok 2266 - 5 ^ 3 = 5 ^ 3 = 6 ok 2267 - is $@ empty ok 2268 - '5 ^ 7/2' isa 'Math::BigRat' ok 2269 - 5 ^ 7/2 = 5 ^ 3 = 6 ok 2270 - is $@ empty ok 2271 - '5 ^ 4' isa 'Math::BigRat' ok 2272 - 5 ^ 4 = 5 ^ 4 = 1 ok 2273 - is $@ empty ok 2274 - '5 ^ 9/2' isa 'Math::BigRat' ok 2275 - 5 ^ 9/2 = 5 ^ 4 = 1 ok 2276 - is $@ empty ok 2277 - '5 ^ 5' isa 'Math::BigRat' ok 2278 - 5 ^ 5 = 5 ^ 5 = 0 ok 2279 - is $@ empty ok 2280 - '5 ^ 11/2' isa 'Math::BigRat' ok 2281 - 5 ^ 11/2 = 5 ^ 5 = 0 ok 2282 - is $@ empty ok 2283 - '5 ^ 6' isa 'Math::BigRat' ok 2284 - 5 ^ 6 = 5 ^ 6 = 3 ok 2285 - is $@ empty ok 2286 - '5 ^ 13/2' isa 'Math::BigRat' ok 2287 - 5 ^ 13/2 = 5 ^ 6 = 3 ok 2288 - is $@ empty ok 2289 - '5 ^ 7' isa 'Math::BigRat' ok 2290 - 5 ^ 7 = 5 ^ 7 = 2 ok 2291 - is $@ empty ok 2292 - '5 ^ 15/2' isa 'Math::BigRat' ok 2293 - 5 ^ 15/2 = 5 ^ 7 = 2 ok 2294 - is $@ empty ok 2295 - '5 ^ 8' isa 'Math::BigRat' ok 2296 - 5 ^ 8 = 5 ^ 8 = 13 ok 2297 - is $@ empty ok 2298 - '11/2 ^ 0' isa 'Math::BigRat' ok 2299 - 11/2 ^ 0 = 5 ^ 0 = 5 ok 2300 - is $@ empty ok 2301 - '11/2 ^ 1/2' isa 'Math::BigRat' ok 2302 - 11/2 ^ 1/2 = 5 ^ 0 = 5 ok 2303 - is $@ empty ok 2304 - '11/2 ^ 1' isa 'Math::BigRat' ok 2305 - 11/2 ^ 1 = 5 ^ 1 = 4 ok 2306 - is $@ empty ok 2307 - '11/2 ^ 3/2' isa 'Math::BigRat' ok 2308 - 11/2 ^ 3/2 = 5 ^ 1 = 4 ok 2309 - is $@ empty ok 2310 - '11/2 ^ 2' isa 'Math::BigRat' ok 2311 - 11/2 ^ 2 = 5 ^ 2 = 7 ok 2312 - is $@ empty ok 2313 - '11/2 ^ 5/2' isa 'Math::BigRat' ok 2314 - 11/2 ^ 5/2 = 5 ^ 2 = 7 ok 2315 - is $@ empty ok 2316 - '11/2 ^ 3' isa 'Math::BigRat' ok 2317 - 11/2 ^ 3 = 5 ^ 3 = 6 ok 2318 - is $@ empty ok 2319 - '11/2 ^ 7/2' isa 'Math::BigRat' ok 2320 - 11/2 ^ 7/2 = 5 ^ 3 = 6 ok 2321 - is $@ empty ok 2322 - '11/2 ^ 4' isa 'Math::BigRat' ok 2323 - 11/2 ^ 4 = 5 ^ 4 = 1 ok 2324 - is $@ empty ok 2325 - '11/2 ^ 9/2' isa 'Math::BigRat' ok 2326 - 11/2 ^ 9/2 = 5 ^ 4 = 1 ok 2327 - is $@ empty ok 2328 - '11/2 ^ 5' isa 'Math::BigRat' ok 2329 - 11/2 ^ 5 = 5 ^ 5 = 0 ok 2330 - is $@ empty ok 2331 - '11/2 ^ 11/2' isa 'Math::BigRat' ok 2332 - 11/2 ^ 11/2 = 5 ^ 5 = 0 ok 2333 - is $@ empty ok 2334 - '11/2 ^ 6' isa 'Math::BigRat' ok 2335 - 11/2 ^ 6 = 5 ^ 6 = 3 ok 2336 - is $@ empty ok 2337 - '11/2 ^ 13/2' isa 'Math::BigRat' ok 2338 - 11/2 ^ 13/2 = 5 ^ 6 = 3 ok 2339 - is $@ empty ok 2340 - '11/2 ^ 7' isa 'Math::BigRat' ok 2341 - 11/2 ^ 7 = 5 ^ 7 = 2 ok 2342 - is $@ empty ok 2343 - '11/2 ^ 15/2' isa 'Math::BigRat' ok 2344 - 11/2 ^ 15/2 = 5 ^ 7 = 2 ok 2345 - is $@ empty ok 2346 - '11/2 ^ 8' isa 'Math::BigRat' ok 2347 - 11/2 ^ 8 = 5 ^ 8 = 13 ok 2348 - is $@ empty ok 2349 - '6 ^ 0' isa 'Math::BigRat' ok 2350 - 6 ^ 0 = 6 ^ 0 = 6 ok 2351 - is $@ empty ok 2352 - '6 ^ 1/2' isa 'Math::BigRat' ok 2353 - 6 ^ 1/2 = 6 ^ 0 = 6 ok 2354 - is $@ empty ok 2355 - '6 ^ 1' isa 'Math::BigRat' ok 2356 - 6 ^ 1 = 6 ^ 1 = 7 ok 2357 - is $@ empty ok 2358 - '6 ^ 3/2' isa 'Math::BigRat' ok 2359 - 6 ^ 3/2 = 6 ^ 1 = 7 ok 2360 - is $@ empty ok 2361 - '6 ^ 2' isa 'Math::BigRat' ok 2362 - 6 ^ 2 = 6 ^ 2 = 4 ok 2363 - is $@ empty ok 2364 - '6 ^ 5/2' isa 'Math::BigRat' ok 2365 - 6 ^ 5/2 = 6 ^ 2 = 4 ok 2366 - is $@ empty ok 2367 - '6 ^ 3' isa 'Math::BigRat' ok 2368 - 6 ^ 3 = 6 ^ 3 = 5 ok 2369 - is $@ empty ok 2370 - '6 ^ 7/2' isa 'Math::BigRat' ok 2371 - 6 ^ 7/2 = 6 ^ 3 = 5 ok 2372 - is $@ empty ok 2373 - '6 ^ 4' isa 'Math::BigRat' ok 2374 - 6 ^ 4 = 6 ^ 4 = 2 ok 2375 - is $@ empty ok 2376 - '6 ^ 9/2' isa 'Math::BigRat' ok 2377 - 6 ^ 9/2 = 6 ^ 4 = 2 ok 2378 - is $@ empty ok 2379 - '6 ^ 5' isa 'Math::BigRat' ok 2380 - 6 ^ 5 = 6 ^ 5 = 3 ok 2381 - is $@ empty ok 2382 - '6 ^ 11/2' isa 'Math::BigRat' ok 2383 - 6 ^ 11/2 = 6 ^ 5 = 3 ok 2384 - is $@ empty ok 2385 - '6 ^ 6' isa 'Math::BigRat' ok 2386 - 6 ^ 6 = 6 ^ 6 = 0 ok 2387 - is $@ empty ok 2388 - '6 ^ 13/2' isa 'Math::BigRat' ok 2389 - 6 ^ 13/2 = 6 ^ 6 = 0 ok 2390 - is $@ empty ok 2391 - '6 ^ 7' isa 'Math::BigRat' ok 2392 - 6 ^ 7 = 6 ^ 7 = 1 ok 2393 - is $@ empty ok 2394 - '6 ^ 15/2' isa 'Math::BigRat' ok 2395 - 6 ^ 15/2 = 6 ^ 7 = 1 ok 2396 - is $@ empty ok 2397 - '6 ^ 8' isa 'Math::BigRat' ok 2398 - 6 ^ 8 = 6 ^ 8 = 14 ok 2399 - is $@ empty ok 2400 - '13/2 ^ 0' isa 'Math::BigRat' ok 2401 - 13/2 ^ 0 = 6 ^ 0 = 6 ok 2402 - is $@ empty ok 2403 - '13/2 ^ 1/2' isa 'Math::BigRat' ok 2404 - 13/2 ^ 1/2 = 6 ^ 0 = 6 ok 2405 - is $@ empty ok 2406 - '13/2 ^ 1' isa 'Math::BigRat' ok 2407 - 13/2 ^ 1 = 6 ^ 1 = 7 ok 2408 - is $@ empty ok 2409 - '13/2 ^ 3/2' isa 'Math::BigRat' ok 2410 - 13/2 ^ 3/2 = 6 ^ 1 = 7 ok 2411 - is $@ empty ok 2412 - '13/2 ^ 2' isa 'Math::BigRat' ok 2413 - 13/2 ^ 2 = 6 ^ 2 = 4 ok 2414 - is $@ empty ok 2415 - '13/2 ^ 5/2' isa 'Math::BigRat' ok 2416 - 13/2 ^ 5/2 = 6 ^ 2 = 4 ok 2417 - is $@ empty ok 2418 - '13/2 ^ 3' isa 'Math::BigRat' ok 2419 - 13/2 ^ 3 = 6 ^ 3 = 5 ok 2420 - is $@ empty ok 2421 - '13/2 ^ 7/2' isa 'Math::BigRat' ok 2422 - 13/2 ^ 7/2 = 6 ^ 3 = 5 ok 2423 - is $@ empty ok 2424 - '13/2 ^ 4' isa 'Math::BigRat' ok 2425 - 13/2 ^ 4 = 6 ^ 4 = 2 ok 2426 - is $@ empty ok 2427 - '13/2 ^ 9/2' isa 'Math::BigRat' ok 2428 - 13/2 ^ 9/2 = 6 ^ 4 = 2 ok 2429 - is $@ empty ok 2430 - '13/2 ^ 5' isa 'Math::BigRat' ok 2431 - 13/2 ^ 5 = 6 ^ 5 = 3 ok 2432 - is $@ empty ok 2433 - '13/2 ^ 11/2' isa 'Math::BigRat' ok 2434 - 13/2 ^ 11/2 = 6 ^ 5 = 3 ok 2435 - is $@ empty ok 2436 - '13/2 ^ 6' isa 'Math::BigRat' ok 2437 - 13/2 ^ 6 = 6 ^ 6 = 0 ok 2438 - is $@ empty ok 2439 - '13/2 ^ 13/2' isa 'Math::BigRat' ok 2440 - 13/2 ^ 13/2 = 6 ^ 6 = 0 ok 2441 - is $@ empty ok 2442 - '13/2 ^ 7' isa 'Math::BigRat' ok 2443 - 13/2 ^ 7 = 6 ^ 7 = 1 ok 2444 - is $@ empty ok 2445 - '13/2 ^ 15/2' isa 'Math::BigRat' ok 2446 - 13/2 ^ 15/2 = 6 ^ 7 = 1 ok 2447 - is $@ empty ok 2448 - '13/2 ^ 8' isa 'Math::BigRat' ok 2449 - 13/2 ^ 8 = 6 ^ 8 = 14 ok 2450 - is $@ empty ok 2451 - '7 ^ 0' isa 'Math::BigRat' ok 2452 - 7 ^ 0 = 7 ^ 0 = 7 ok 2453 - is $@ empty ok 2454 - '7 ^ 1/2' isa 'Math::BigRat' ok 2455 - 7 ^ 1/2 = 7 ^ 0 = 7 ok 2456 - is $@ empty ok 2457 - '7 ^ 1' isa 'Math::BigRat' ok 2458 - 7 ^ 1 = 7 ^ 1 = 6 ok 2459 - is $@ empty ok 2460 - '7 ^ 3/2' isa 'Math::BigRat' ok 2461 - 7 ^ 3/2 = 7 ^ 1 = 6 ok 2462 - is $@ empty ok 2463 - '7 ^ 2' isa 'Math::BigRat' ok 2464 - 7 ^ 2 = 7 ^ 2 = 5 ok 2465 - is $@ empty ok 2466 - '7 ^ 5/2' isa 'Math::BigRat' ok 2467 - 7 ^ 5/2 = 7 ^ 2 = 5 ok 2468 - is $@ empty ok 2469 - '7 ^ 3' isa 'Math::BigRat' ok 2470 - 7 ^ 3 = 7 ^ 3 = 4 ok 2471 - is $@ empty ok 2472 - '7 ^ 7/2' isa 'Math::BigRat' ok 2473 - 7 ^ 7/2 = 7 ^ 3 = 4 ok 2474 - is $@ empty ok 2475 - '7 ^ 4' isa 'Math::BigRat' ok 2476 - 7 ^ 4 = 7 ^ 4 = 3 ok 2477 - is $@ empty ok 2478 - '7 ^ 9/2' isa 'Math::BigRat' ok 2479 - 7 ^ 9/2 = 7 ^ 4 = 3 ok 2480 - is $@ empty ok 2481 - '7 ^ 5' isa 'Math::BigRat' ok 2482 - 7 ^ 5 = 7 ^ 5 = 2 ok 2483 - is $@ empty ok 2484 - '7 ^ 11/2' isa 'Math::BigRat' ok 2485 - 7 ^ 11/2 = 7 ^ 5 = 2 ok 2486 - is $@ empty ok 2487 - '7 ^ 6' isa 'Math::BigRat' ok 2488 - 7 ^ 6 = 7 ^ 6 = 1 ok 2489 - is $@ empty ok 2490 - '7 ^ 13/2' isa 'Math::BigRat' ok 2491 - 7 ^ 13/2 = 7 ^ 6 = 1 ok 2492 - is $@ empty ok 2493 - '7 ^ 7' isa 'Math::BigRat' ok 2494 - 7 ^ 7 = 7 ^ 7 = 0 ok 2495 - is $@ empty ok 2496 - '7 ^ 15/2' isa 'Math::BigRat' ok 2497 - 7 ^ 15/2 = 7 ^ 7 = 0 ok 2498 - is $@ empty ok 2499 - '7 ^ 8' isa 'Math::BigRat' ok 2500 - 7 ^ 8 = 7 ^ 8 = 15 ok 2501 - is $@ empty ok 2502 - '15/2 ^ 0' isa 'Math::BigRat' ok 2503 - 15/2 ^ 0 = 7 ^ 0 = 7 ok 2504 - is $@ empty ok 2505 - '15/2 ^ 1/2' isa 'Math::BigRat' ok 2506 - 15/2 ^ 1/2 = 7 ^ 0 = 7 ok 2507 - is $@ empty ok 2508 - '15/2 ^ 1' isa 'Math::BigRat' ok 2509 - 15/2 ^ 1 = 7 ^ 1 = 6 ok 2510 - is $@ empty ok 2511 - '15/2 ^ 3/2' isa 'Math::BigRat' ok 2512 - 15/2 ^ 3/2 = 7 ^ 1 = 6 ok 2513 - is $@ empty ok 2514 - '15/2 ^ 2' isa 'Math::BigRat' ok 2515 - 15/2 ^ 2 = 7 ^ 2 = 5 ok 2516 - is $@ empty ok 2517 - '15/2 ^ 5/2' isa 'Math::BigRat' ok 2518 - 15/2 ^ 5/2 = 7 ^ 2 = 5 ok 2519 - is $@ empty ok 2520 - '15/2 ^ 3' isa 'Math::BigRat' ok 2521 - 15/2 ^ 3 = 7 ^ 3 = 4 ok 2522 - is $@ empty ok 2523 - '15/2 ^ 7/2' isa 'Math::BigRat' ok 2524 - 15/2 ^ 7/2 = 7 ^ 3 = 4 ok 2525 - is $@ empty ok 2526 - '15/2 ^ 4' isa 'Math::BigRat' ok 2527 - 15/2 ^ 4 = 7 ^ 4 = 3 ok 2528 - is $@ empty ok 2529 - '15/2 ^ 9/2' isa 'Math::BigRat' ok 2530 - 15/2 ^ 9/2 = 7 ^ 4 = 3 ok 2531 - is $@ empty ok 2532 - '15/2 ^ 5' isa 'Math::BigRat' ok 2533 - 15/2 ^ 5 = 7 ^ 5 = 2 ok 2534 - is $@ empty ok 2535 - '15/2 ^ 11/2' isa 'Math::BigRat' ok 2536 - 15/2 ^ 11/2 = 7 ^ 5 = 2 ok 2537 - is $@ empty ok 2538 - '15/2 ^ 6' isa 'Math::BigRat' ok 2539 - 15/2 ^ 6 = 7 ^ 6 = 1 ok 2540 - is $@ empty ok 2541 - '15/2 ^ 13/2' isa 'Math::BigRat' ok 2542 - 15/2 ^ 13/2 = 7 ^ 6 = 1 ok 2543 - is $@ empty ok 2544 - '15/2 ^ 7' isa 'Math::BigRat' ok 2545 - 15/2 ^ 7 = 7 ^ 7 = 0 ok 2546 - is $@ empty ok 2547 - '15/2 ^ 15/2' isa 'Math::BigRat' ok 2548 - 15/2 ^ 15/2 = 7 ^ 7 = 0 ok 2549 - is $@ empty ok 2550 - '15/2 ^ 8' isa 'Math::BigRat' ok 2551 - 15/2 ^ 8 = 7 ^ 8 = 15 ok 2552 - is $@ empty ok 2553 - '8 ^ 0' isa 'Math::BigRat' ok 2554 - 8 ^ 0 = 8 ^ 0 = 8 ok 2555 - is $@ empty ok 2556 - '8 ^ 1/2' isa 'Math::BigRat' ok 2557 - 8 ^ 1/2 = 8 ^ 0 = 8 ok 2558 - is $@ empty ok 2559 - '8 ^ 1' isa 'Math::BigRat' ok 2560 - 8 ^ 1 = 8 ^ 1 = 9 ok 2561 - is $@ empty ok 2562 - '8 ^ 3/2' isa 'Math::BigRat' ok 2563 - 8 ^ 3/2 = 8 ^ 1 = 9 ok 2564 - is $@ empty ok 2565 - '8 ^ 2' isa 'Math::BigRat' ok 2566 - 8 ^ 2 = 8 ^ 2 = 10 ok 2567 - is $@ empty ok 2568 - '8 ^ 5/2' isa 'Math::BigRat' ok 2569 - 8 ^ 5/2 = 8 ^ 2 = 10 ok 2570 - is $@ empty ok 2571 - '8 ^ 3' isa 'Math::BigRat' ok 2572 - 8 ^ 3 = 8 ^ 3 = 11 ok 2573 - is $@ empty ok 2574 - '8 ^ 7/2' isa 'Math::BigRat' ok 2575 - 8 ^ 7/2 = 8 ^ 3 = 11 ok 2576 - is $@ empty ok 2577 - '8 ^ 4' isa 'Math::BigRat' ok 2578 - 8 ^ 4 = 8 ^ 4 = 12 ok 2579 - is $@ empty ok 2580 - '8 ^ 9/2' isa 'Math::BigRat' ok 2581 - 8 ^ 9/2 = 8 ^ 4 = 12 ok 2582 - is $@ empty ok 2583 - '8 ^ 5' isa 'Math::BigRat' ok 2584 - 8 ^ 5 = 8 ^ 5 = 13 ok 2585 - is $@ empty ok 2586 - '8 ^ 11/2' isa 'Math::BigRat' ok 2587 - 8 ^ 11/2 = 8 ^ 5 = 13 ok 2588 - is $@ empty ok 2589 - '8 ^ 6' isa 'Math::BigRat' ok 2590 - 8 ^ 6 = 8 ^ 6 = 14 ok 2591 - is $@ empty ok 2592 - '8 ^ 13/2' isa 'Math::BigRat' ok 2593 - 8 ^ 13/2 = 8 ^ 6 = 14 ok 2594 - is $@ empty ok 2595 - '8 ^ 7' isa 'Math::BigRat' ok 2596 - 8 ^ 7 = 8 ^ 7 = 15 ok 2597 - is $@ empty ok 2598 - '8 ^ 15/2' isa 'Math::BigRat' ok 2599 - 8 ^ 15/2 = 8 ^ 7 = 15 ok 2600 - is $@ empty ok 2601 - '8 ^ 8' isa 'Math::BigRat' ok 2602 - 8 ^ 8 = 8 ^ 8 = 0 ok t/calling-class-methods.t ..... 1..164 ok 1 - Math::BigInt -> is_zero("1"); ok 2 - Math::BigFloat -> is_zero("1"); ok 3 - Math::BigInt::Test -> is_zero("1"); ok 4 - Math::BigFloat::Test -> is_zero("1"); ok 5 - Math::BigInt -> is_zero("0"); ok 6 - Math::BigFloat -> is_zero("0"); ok 7 - Math::BigInt::Test -> is_zero("0"); ok 8 - Math::BigFloat::Test -> is_zero("0"); ok 9 - Math::BigInt -> is_one("1"); ok 10 - Math::BigFloat -> is_one("1"); ok 11 - Math::BigInt::Test -> is_one("1"); ok 12 - Math::BigFloat::Test -> is_one("1"); ok 13 - Math::BigInt -> is_one("0"); ok 14 - Math::BigFloat -> is_one("0"); ok 15 - Math::BigInt::Test -> is_one("0"); ok 16 - Math::BigFloat::Test -> is_one("0"); ok 17 - Math::BigInt -> is_positive("1"); ok 18 - Math::BigFloat -> is_positive("1"); ok 19 - Math::BigInt::Test -> is_positive("1"); ok 20 - Math::BigFloat::Test -> is_positive("1"); ok 21 - Math::BigInt -> is_positive("-1"); ok 22 - Math::BigFloat -> is_positive("-1"); ok 23 - Math::BigInt::Test -> is_positive("-1"); ok 24 - Math::BigFloat::Test -> is_positive("-1"); ok 25 - Math::BigInt -> is_negative("1"); ok 26 - Math::BigFloat -> is_negative("1"); ok 27 - Math::BigInt::Test -> is_negative("1"); ok 28 - Math::BigFloat::Test -> is_negative("1"); ok 29 - Math::BigInt -> is_negative("-1"); ok 30 - Math::BigFloat -> is_negative("-1"); ok 31 - Math::BigInt::Test -> is_negative("-1"); ok 32 - Math::BigFloat::Test -> is_negative("-1"); ok 33 - Math::BigInt -> is_non_positive("1"); ok 34 - Math::BigFloat -> is_non_positive("1"); ok 35 - Math::BigInt::Test -> is_non_positive("1"); ok 36 - Math::BigFloat::Test -> is_non_positive("1"); ok 37 - Math::BigInt -> is_non_positive("-1"); ok 38 - Math::BigFloat -> is_non_positive("-1"); ok 39 - Math::BigInt::Test -> is_non_positive("-1"); ok 40 - Math::BigFloat::Test -> is_non_positive("-1"); ok 41 - Math::BigInt -> is_non_negative("1"); ok 42 - Math::BigFloat -> is_non_negative("1"); ok 43 - Math::BigInt::Test -> is_non_negative("1"); ok 44 - Math::BigFloat::Test -> is_non_negative("1"); ok 45 - Math::BigInt -> is_non_negative("-1"); ok 46 - Math::BigFloat -> is_non_negative("-1"); ok 47 - Math::BigInt::Test -> is_non_negative("-1"); ok 48 - Math::BigFloat::Test -> is_non_negative("-1"); ok 49 - Math::BigInt -> is_nan("abc"); ok 50 - Math::BigFloat -> is_nan("abc"); ok 51 - Math::BigInt::Test -> is_nan("abc"); ok 52 - Math::BigFloat::Test -> is_nan("abc"); ok 53 - Math::BigInt -> is_nan("1"); ok 54 - Math::BigFloat -> is_nan("1"); ok 55 - Math::BigInt::Test -> is_nan("1"); ok 56 - Math::BigFloat::Test -> is_nan("1"); ok 57 - Math::BigInt -> is_inf("inf"); ok 58 - Math::BigFloat -> is_inf("inf"); ok 59 - Math::BigInt::Test -> is_inf("inf"); ok 60 - Math::BigFloat::Test -> is_inf("inf"); ok 61 - Math::BigInt -> is_inf("0"); ok 62 - Math::BigFloat -> is_inf("0"); ok 63 - Math::BigInt::Test -> is_inf("0"); ok 64 - Math::BigFloat::Test -> is_inf("0"); ok 65 - Math::BigInt -> bstr("5"); ok 66 - Math::BigFloat -> bstr("5"); ok 67 - Math::BigInt::Test -> bstr("5"); ok 68 - Math::BigFloat::Test -> bstr("5"); ok 69 - Math::BigInt -> bstr("10"); ok 70 - Math::BigFloat -> bstr("10"); ok 71 - Math::BigInt::Test -> bstr("10"); ok 72 - Math::BigFloat::Test -> bstr("10"); ok 73 - Math::BigInt -> bstr("-10"); ok 74 - Math::BigFloat -> bstr("-10"); ok 75 - Math::BigInt::Test -> bstr("-10"); ok 76 - Math::BigFloat::Test -> bstr("-10"); ok 77 - Math::BigInt -> bstr("abc"); ok 78 - Math::BigFloat -> bstr("abc"); ok 79 - Math::BigInt::Test -> bstr("abc"); ok 80 - Math::BigFloat::Test -> bstr("abc"); ok 81 - Math::BigInt -> bstr("+inf"); ok 82 - Math::BigFloat -> bstr("+inf"); ok 83 - Math::BigInt::Test -> bstr("+inf"); ok 84 - Math::BigFloat::Test -> bstr("+inf"); ok 85 - Math::BigInt -> bstr("-inf"); ok 86 - Math::BigFloat -> bstr("-inf"); ok 87 - Math::BigInt::Test -> bstr("-inf"); ok 88 - Math::BigFloat::Test -> bstr("-inf"); ok 89 - Math::BigInt -> bsstr("1"); ok 90 - Math::BigFloat -> bsstr("1"); ok 91 - Math::BigInt::Test -> bsstr("1"); ok 92 - Math::BigFloat::Test -> bsstr("1"); ok 93 - Math::BigInt -> bsstr("0"); ok 94 - Math::BigFloat -> bsstr("0"); ok 95 - Math::BigInt::Test -> bsstr("0"); ok 96 - Math::BigFloat::Test -> bsstr("0"); ok 97 - Math::BigInt -> bsstr("2"); ok 98 - Math::BigFloat -> bsstr("2"); ok 99 - Math::BigInt::Test -> bsstr("2"); ok 100 - Math::BigFloat::Test -> bsstr("2"); ok 101 - Math::BigInt -> bsstr("200"); ok 102 - Math::BigFloat -> bsstr("200"); ok 103 - Math::BigInt::Test -> bsstr("200"); ok 104 - Math::BigFloat::Test -> bsstr("200"); ok 105 - Math::BigInt -> bsstr("-5"); ok 106 - Math::BigFloat -> bsstr("-5"); ok 107 - Math::BigInt::Test -> bsstr("-5"); ok 108 - Math::BigFloat::Test -> bsstr("-5"); ok 109 - Math::BigInt -> bsstr("-100"); ok 110 - Math::BigFloat -> bsstr("-100"); ok 111 - Math::BigInt::Test -> bsstr("-100"); ok 112 - Math::BigFloat::Test -> bsstr("-100"); ok 113 - Math::BigInt -> bsstr("abc"); ok 114 - Math::BigFloat -> bsstr("abc"); ok 115 - Math::BigInt::Test -> bsstr("abc"); ok 116 - Math::BigFloat::Test -> bsstr("abc"); ok 117 - Math::BigInt -> bsstr("+inf"); ok 118 - Math::BigFloat -> bsstr("+inf"); ok 119 - Math::BigInt::Test -> bsstr("+inf"); ok 120 - Math::BigFloat::Test -> bsstr("+inf"); ok 121 - Math::BigInt -> babs("-1"); ok 122 - Math::BigFloat -> babs("-1"); ok 123 - Math::BigInt::Test -> babs("-1"); ok 124 - Math::BigFloat::Test -> babs("-1"); ok 125 - Math::BigInt -> babs("1"); ok 126 - Math::BigFloat -> babs("1"); ok 127 - Math::BigInt::Test -> babs("1"); ok 128 - Math::BigFloat::Test -> babs("1"); ok 129 - Math::BigInt -> bzero(); ok 130 - Math::BigFloat -> bzero(); ok 131 - Math::BigInt::Test -> bzero(); ok 132 - Math::BigFloat::Test -> bzero(); ok 133 - Math::BigInt -> bnan(); ok 134 - Math::BigFloat -> bnan(); ok 135 - Math::BigInt::Test -> bnan(); ok 136 - Math::BigFloat::Test -> bnan(); ok 137 - Math::BigInt -> bnan("abc"); ok 138 - Math::BigFloat -> bnan("abc"); ok 139 - Math::BigInt::Test -> bnan("abc"); ok 140 - Math::BigFloat::Test -> bnan("abc"); ok 141 - Math::BigInt -> bone(); ok 142 - Math::BigFloat -> bone(); ok 143 - Math::BigInt::Test -> bone(); ok 144 - Math::BigFloat::Test -> bone(); ok 145 - Math::BigInt -> bone("+"); ok 146 - Math::BigFloat -> bone("+"); ok 147 - Math::BigInt::Test -> bone("+"); ok 148 - Math::BigFloat::Test -> bone("+"); ok 149 - Math::BigInt -> bone("-"); ok 150 - Math::BigFloat -> bone("-"); ok 151 - Math::BigInt::Test -> bone("-"); ok 152 - Math::BigFloat::Test -> bone("-"); ok 153 - Math::BigInt -> binf(); ok 154 - Math::BigFloat -> binf(); ok 155 - Math::BigInt::Test -> binf(); ok 156 - Math::BigFloat::Test -> binf(); ok 157 - Math::BigInt -> binf("+"); ok 158 - Math::BigFloat -> binf("+"); ok 159 - Math::BigInt::Test -> binf("+"); ok 160 - Math::BigFloat::Test -> binf("+"); ok 161 - Math::BigInt -> binf("-"); ok 162 - Math::BigFloat -> binf("-"); ok 163 - Math::BigInt::Test -> binf("-"); ok 164 - Math::BigFloat::Test -> binf("-"); ok t/calling-constant.t .......... 1..1 ok 1 - use Math::BigInt 0, "bgcd", ":constant"; $x = 2**150; bgcd($x); $x = "$x"; ok t/calling-instance-methods.t .. 1..156 ok 1 - Math::BigInt -> new("1") -> is_zero(); ok 2 - Math::BigFloat -> new("1") -> is_zero(); ok 3 - Math::BigInt::Test -> new("1") -> is_zero(); ok 4 - Math::BigFloat::Test -> new("1") -> is_zero(); ok 5 - Math::BigInt -> new("0") -> is_zero(); ok 6 - Math::BigFloat -> new("0") -> is_zero(); ok 7 - Math::BigInt::Test -> new("0") -> is_zero(); ok 8 - Math::BigFloat::Test -> new("0") -> is_zero(); ok 9 - Math::BigInt -> new("1") -> is_one(); ok 10 - Math::BigFloat -> new("1") -> is_one(); ok 11 - Math::BigInt::Test -> new("1") -> is_one(); ok 12 - Math::BigFloat::Test -> new("1") -> is_one(); ok 13 - Math::BigInt -> new("0") -> is_one(); ok 14 - Math::BigFloat -> new("0") -> is_one(); ok 15 - Math::BigInt::Test -> new("0") -> is_one(); ok 16 - Math::BigFloat::Test -> new("0") -> is_one(); ok 17 - Math::BigInt -> new("1") -> is_positive(); ok 18 - Math::BigFloat -> new("1") -> is_positive(); ok 19 - Math::BigInt::Test -> new("1") -> is_positive(); ok 20 - Math::BigFloat::Test -> new("1") -> is_positive(); ok 21 - Math::BigInt -> new("-1") -> is_positive(); ok 22 - Math::BigFloat -> new("-1") -> is_positive(); ok 23 - Math::BigInt::Test -> new("-1") -> is_positive(); ok 24 - Math::BigFloat::Test -> new("-1") -> is_positive(); ok 25 - Math::BigInt -> new("1") -> is_negative(); ok 26 - Math::BigFloat -> new("1") -> is_negative(); ok 27 - Math::BigInt::Test -> new("1") -> is_negative(); ok 28 - Math::BigFloat::Test -> new("1") -> is_negative(); ok 29 - Math::BigInt -> new("-1") -> is_negative(); ok 30 - Math::BigFloat -> new("-1") -> is_negative(); ok 31 - Math::BigInt::Test -> new("-1") -> is_negative(); ok 32 - Math::BigFloat::Test -> new("-1") -> is_negative(); ok 33 - Math::BigInt -> new("1") -> is_non_positive(); ok 34 - Math::BigFloat -> new("1") -> is_non_positive(); ok 35 - Math::BigInt::Test -> new("1") -> is_non_positive(); ok 36 - Math::BigFloat::Test -> new("1") -> is_non_positive(); ok 37 - Math::BigInt -> new("-1") -> is_non_positive(); ok 38 - Math::BigFloat -> new("-1") -> is_non_positive(); ok 39 - Math::BigInt::Test -> new("-1") -> is_non_positive(); ok 40 - Math::BigFloat::Test -> new("-1") -> is_non_positive(); ok 41 - Math::BigInt -> new("1") -> is_non_negative(); ok 42 - Math::BigFloat -> new("1") -> is_non_negative(); ok 43 - Math::BigInt::Test -> new("1") -> is_non_negative(); ok 44 - Math::BigFloat::Test -> new("1") -> is_non_negative(); ok 45 - Math::BigInt -> new("-1") -> is_non_negative(); ok 46 - Math::BigFloat -> new("-1") -> is_non_negative(); ok 47 - Math::BigInt::Test -> new("-1") -> is_non_negative(); ok 48 - Math::BigFloat::Test -> new("-1") -> is_non_negative(); ok 49 - Math::BigInt -> new("abc") -> is_nan(); ok 50 - Math::BigFloat -> new("abc") -> is_nan(); ok 51 - Math::BigInt::Test -> new("abc") -> is_nan(); ok 52 - Math::BigFloat::Test -> new("abc") -> is_nan(); ok 53 - Math::BigInt -> new("1") -> is_nan(); ok 54 - Math::BigFloat -> new("1") -> is_nan(); ok 55 - Math::BigInt::Test -> new("1") -> is_nan(); ok 56 - Math::BigFloat::Test -> new("1") -> is_nan(); ok 57 - Math::BigInt -> new("inf") -> is_inf(); ok 58 - Math::BigFloat -> new("inf") -> is_inf(); ok 59 - Math::BigInt::Test -> new("inf") -> is_inf(); ok 60 - Math::BigFloat::Test -> new("inf") -> is_inf(); ok 61 - Math::BigInt -> new("0") -> is_inf(); ok 62 - Math::BigFloat -> new("0") -> is_inf(); ok 63 - Math::BigInt::Test -> new("0") -> is_inf(); ok 64 - Math::BigFloat::Test -> new("0") -> is_inf(); ok 65 - Math::BigInt -> new("5") -> bstr(); ok 66 - Math::BigFloat -> new("5") -> bstr(); ok 67 - Math::BigInt::Test -> new("5") -> bstr(); ok 68 - Math::BigFloat::Test -> new("5") -> bstr(); ok 69 - Math::BigInt -> new("10") -> bstr(); ok 70 - Math::BigFloat -> new("10") -> bstr(); ok 71 - Math::BigInt::Test -> new("10") -> bstr(); ok 72 - Math::BigFloat::Test -> new("10") -> bstr(); ok 73 - Math::BigInt -> new("-10") -> bstr(); ok 74 - Math::BigFloat -> new("-10") -> bstr(); ok 75 - Math::BigInt::Test -> new("-10") -> bstr(); ok 76 - Math::BigFloat::Test -> new("-10") -> bstr(); ok 77 - Math::BigInt -> new("abc") -> bstr(); ok 78 - Math::BigFloat -> new("abc") -> bstr(); ok 79 - Math::BigInt::Test -> new("abc") -> bstr(); ok 80 - Math::BigFloat::Test -> new("abc") -> bstr(); ok 81 - Math::BigInt -> new("+inf") -> bstr(); ok 82 - Math::BigFloat -> new("+inf") -> bstr(); ok 83 - Math::BigInt::Test -> new("+inf") -> bstr(); ok 84 - Math::BigFloat::Test -> new("+inf") -> bstr(); ok 85 - Math::BigInt -> new("-inf") -> bstr(); ok 86 - Math::BigFloat -> new("-inf") -> bstr(); ok 87 - Math::BigInt::Test -> new("-inf") -> bstr(); ok 88 - Math::BigFloat::Test -> new("-inf") -> bstr(); ok 89 - Math::BigInt -> new("1") -> bsstr(); ok 90 - Math::BigFloat -> new("1") -> bsstr(); ok 91 - Math::BigInt::Test -> new("1") -> bsstr(); ok 92 - Math::BigFloat::Test -> new("1") -> bsstr(); ok 93 - Math::BigInt -> new("0") -> bsstr(); ok 94 - Math::BigFloat -> new("0") -> bsstr(); ok 95 - Math::BigInt::Test -> new("0") -> bsstr(); ok 96 - Math::BigFloat::Test -> new("0") -> bsstr(); ok 97 - Math::BigInt -> new("2") -> bsstr(); ok 98 - Math::BigFloat -> new("2") -> bsstr(); ok 99 - Math::BigInt::Test -> new("2") -> bsstr(); ok 100 - Math::BigFloat::Test -> new("2") -> bsstr(); ok 101 - Math::BigInt -> new("200") -> bsstr(); ok 102 - Math::BigFloat -> new("200") -> bsstr(); ok 103 - Math::BigInt::Test -> new("200") -> bsstr(); ok 104 - Math::BigFloat::Test -> new("200") -> bsstr(); ok 105 - Math::BigInt -> new("-5") -> bsstr(); ok 106 - Math::BigFloat -> new("-5") -> bsstr(); ok 107 - Math::BigInt::Test -> new("-5") -> bsstr(); ok 108 - Math::BigFloat::Test -> new("-5") -> bsstr(); ok 109 - Math::BigInt -> new("-100") -> bsstr(); ok 110 - Math::BigFloat -> new("-100") -> bsstr(); ok 111 - Math::BigInt::Test -> new("-100") -> bsstr(); ok 112 - Math::BigFloat::Test -> new("-100") -> bsstr(); ok 113 - Math::BigInt -> new("abc") -> bsstr(); ok 114 - Math::BigFloat -> new("abc") -> bsstr(); ok 115 - Math::BigInt::Test -> new("abc") -> bsstr(); ok 116 - Math::BigFloat::Test -> new("abc") -> bsstr(); ok 117 - Math::BigInt -> new("+inf") -> bsstr(); ok 118 - Math::BigFloat -> new("+inf") -> bsstr(); ok 119 - Math::BigInt::Test -> new("+inf") -> bsstr(); ok 120 - Math::BigFloat::Test -> new("+inf") -> bsstr(); ok 121 - Math::BigInt -> new("-1") -> babs(); ok 122 - Math::BigFloat -> new("-1") -> babs(); ok 123 - Math::BigInt::Test -> new("-1") -> babs(); ok 124 - Math::BigFloat::Test -> new("-1") -> babs(); ok 125 - Math::BigInt -> new("1") -> babs(); ok 126 - Math::BigFloat -> new("1") -> babs(); ok 127 - Math::BigInt::Test -> new("1") -> babs(); ok 128 - Math::BigFloat::Test -> new("1") -> babs(); ok 129 - Math::BigInt -> new("-2") -> bnot(); ok 130 - Math::BigFloat -> new("-2") -> bnot(); ok 131 - Math::BigInt::Test -> new("-2") -> bnot(); ok 132 - Math::BigFloat::Test -> new("-2") -> bnot(); ok 133 - Math::BigInt -> new("1") -> bnot(); ok 134 - Math::BigFloat -> new("1") -> bnot(); ok 135 - Math::BigInt::Test -> new("1") -> bnot(); ok 136 - Math::BigFloat::Test -> new("1") -> bnot(); ok 137 - Math::BigInt -> new() -> bzero(); ok 138 - Math::BigFloat -> new() -> bzero(); ok 139 - Math::BigInt::Test -> new() -> bzero(); ok 140 - Math::BigFloat::Test -> new() -> bzero(); ok 141 - Math::BigInt -> new() -> bnan(); ok 142 - Math::BigFloat -> new() -> bnan(); ok 143 - Math::BigInt::Test -> new() -> bnan(); ok 144 - Math::BigFloat::Test -> new() -> bnan(); ok 145 - Math::BigInt -> new("abc") -> bnan(); ok 146 - Math::BigFloat -> new("abc") -> bnan(); ok 147 - Math::BigInt::Test -> new("abc") -> bnan(); ok 148 - Math::BigFloat::Test -> new("abc") -> bnan(); ok 149 - Math::BigInt -> new() -> bone(); ok 150 - Math::BigFloat -> new() -> bone(); ok 151 - Math::BigInt::Test -> new() -> bone(); ok 152 - Math::BigFloat::Test -> new() -> bone(); ok 153 - Math::BigInt -> new() -> binf(); ok 154 - Math::BigFloat -> new() -> binf(); ok 155 - Math::BigInt::Test -> new() -> binf(); ok 156 - Math::BigFloat::Test -> new() -> binf(); ok t/calling-lib1.t .............. 1..1 ok 1 - use Math::BigInt 0, "lib" => "Scalar"; $x = 2**10; $x = "$x"; ok t/calling-lib2.t .............. 1..1 ok 1 - use Math::BigInt 0, "lib" => "Math::BigInt::Scalar"; $x = 2**10; $x = "$x"; ok t/config.t .................... 1..126 # # Verify that Math::BigInt->config("key") works. # ok 1 - Math::BigInt->can('config') # Subtest: New-style getter Math::BigInt->config("$key") 1..11 ok 1 - Math::BigInt->config("accuracy") ok 2 - Math::BigInt->config("class") ok 3 - Math::BigInt->config("div_scale") ok 4 - Math::BigInt->config("downgrade") ok 5 - Math::BigInt->config("lib") ok 6 - Math::BigInt->config("lib_version") ok 7 - Math::BigInt->config("precision") ok 8 - Math::BigInt->config("round_mode") ok 9 - Math::BigInt->config("trap_inf") ok 10 - Math::BigInt->config("trap_nan") ok 11 - Math::BigInt->config("upgrade") ok 2 - New-style getter Math::BigInt->config("$key") ok 3 - ref() of output from Math::BigInt->config() # Subtest: Old-style getter Math::BigInt->config()->{"$key"} 1..11 ok 1 - Math::BigInt->config()->{accuracy} ok 2 - Math::BigInt->config()->{class} ok 3 - Math::BigInt->config()->{div_scale} ok 4 - Math::BigInt->config()->{downgrade} ok 5 - Math::BigInt->config()->{lib} ok 6 - Math::BigInt->config()->{lib_version} ok 7 - Math::BigInt->config()->{precision} ok 8 - Math::BigInt->config()->{round_mode} ok 9 - Math::BigInt->config()->{trap_inf} ok 10 - Math::BigInt->config()->{trap_nan} ok 11 - Math::BigInt->config()->{upgrade} ok 4 - Old-style getter Math::BigInt->config()->{"$key"} ok 5 - can set "trap_nan" to 1 via hash ref ok 6 - can set "trap_nan" to 0 via hash ref # # Verify that Math::BigFloat->config("key") works. # ok 7 - Math::BigFloat->can('config') # Subtest: New-style getter Math::BigFloat->config("$key") 1..11 ok 1 - Math::BigFloat->config("accuracy") ok 2 - Math::BigFloat->config("class") ok 3 - Math::BigFloat->config("div_scale") ok 4 - Math::BigFloat->config("downgrade") ok 5 - Math::BigFloat->config("lib") ok 6 - Math::BigFloat->config("lib_version") ok 7 - Math::BigFloat->config("precision") ok 8 - Math::BigFloat->config("round_mode") ok 9 - Math::BigFloat->config("trap_inf") ok 10 - Math::BigFloat->config("trap_nan") ok 11 - Math::BigFloat->config("upgrade") ok 8 - New-style getter Math::BigFloat->config("$key") ok 9 - ref() of output from Math::BigFloat->config() # Subtest: Old-style getter Math::BigFloat->config()->{"$key"} 1..11 ok 1 - Math::BigFloat->config()->{accuracy} ok 2 - Math::BigFloat->config()->{class} ok 3 - Math::BigFloat->config()->{div_scale} ok 4 - Math::BigFloat->config()->{downgrade} ok 5 - Math::BigFloat->config()->{lib} ok 6 - Math::BigFloat->config()->{lib_version} ok 7 - Math::BigFloat->config()->{precision} ok 8 - Math::BigFloat->config()->{round_mode} ok 9 - Math::BigFloat->config()->{trap_inf} ok 10 - Math::BigFloat->config()->{trap_nan} ok 11 - Math::BigFloat->config()->{upgrade} ok 10 - Old-style getter Math::BigFloat->config()->{"$key"} ok 11 - can set "trap_nan" to 1 via hash ref ok 12 - can set "trap_nan" to 0 via hash ref # # Verify that Math::BigRat->config("key") works. # ok 13 - Math::BigRat->can('config') # Subtest: New-style getter Math::BigRat->config("$key") 1..11 ok 1 - Math::BigRat->config("accuracy") ok 2 - Math::BigRat->config("class") ok 3 - Math::BigRat->config("div_scale") ok 4 - Math::BigRat->config("downgrade") ok 5 - Math::BigRat->config("lib") ok 6 - Math::BigRat->config("lib_version") ok 7 - Math::BigRat->config("precision") ok 8 - Math::BigRat->config("round_mode") ok 9 - Math::BigRat->config("trap_inf") ok 10 - Math::BigRat->config("trap_nan") ok 11 - Math::BigRat->config("upgrade") ok 14 - New-style getter Math::BigRat->config("$key") ok 15 - ref() of output from Math::BigRat->config() # Subtest: Old-style getter Math::BigRat->config()->{"$key"} 1..11 ok 1 - Math::BigRat->config()->{accuracy} ok 2 - Math::BigRat->config()->{class} ok 3 - Math::BigRat->config()->{div_scale} ok 4 - Math::BigRat->config()->{downgrade} ok 5 - Math::BigRat->config()->{lib} ok 6 - Math::BigRat->config()->{lib_version} ok 7 - Math::BigRat->config()->{precision} ok 8 - Math::BigRat->config()->{round_mode} ok 9 - Math::BigRat->config()->{trap_inf} ok 10 - Math::BigRat->config()->{trap_nan} ok 11 - Math::BigRat->config()->{upgrade} ok 16 - Old-style getter Math::BigRat->config()->{"$key"} ok 17 - can set "trap_nan" to 1 via hash ref ok 18 - can set "trap_nan" to 0 via hash ref # # Verify that Math::BigInt->config("key" => value) works and that # it doesn't affect the configuration of other classes. # ok 19 - Math::BigInt->config("accuracy") set to 2 ok 20 - Math::BigFloat->config("accuracy") isn't affected by setting Math::BigInt->config("accuracy") ok 21 - Math::BigRat->config("accuracy") isn't affected by setting Math::BigInt->config("accuracy") ok 22 - Math::BigInt->config("accuracy") reset to undef ok 23 - Math::BigInt->config("div_scale") set to 100 ok 24 - Math::BigFloat->config("div_scale") isn't affected by setting Math::BigInt->config("div_scale") ok 25 - Math::BigRat->config("div_scale") isn't affected by setting Math::BigInt->config("div_scale") ok 26 - Math::BigInt->config("div_scale") reset to "40" ok 27 - Math::BigInt->config("downgrade") set to Math::BigInt::SomeClass ok 28 - Math::BigFloat->config("downgrade") isn't affected by setting Math::BigInt->config("downgrade") ok 29 - Math::BigRat->config("downgrade") isn't affected by setting Math::BigInt->config("downgrade") ok 30 - Math::BigInt->config("downgrade") reset to undef ok 31 - Math::BigInt->config("precision") set to 3 ok 32 - Math::BigFloat->config("precision") isn't affected by setting Math::BigInt->config("precision") ok 33 - Math::BigRat->config("precision") isn't affected by setting Math::BigInt->config("precision") ok 34 - Math::BigInt->config("precision") reset to undef ok 35 - Math::BigInt->config("round_mode") set to zero ok 36 - Math::BigFloat->config("round_mode") isn't affected by setting Math::BigInt->config("round_mode") ok 37 - Math::BigRat->config("round_mode") isn't affected by setting Math::BigInt->config("round_mode") ok 38 - Math::BigInt->config("round_mode") reset to "even" ok 39 - Math::BigInt->config("trap_inf") set to 1 ok 40 - Math::BigFloat->config("trap_inf") isn't affected by setting Math::BigInt->config("trap_inf") ok 41 - Math::BigRat->config("trap_inf") isn't affected by setting Math::BigInt->config("trap_inf") ok 42 - Math::BigInt->config("trap_inf") reset to "0" ok 43 - Math::BigInt->config("trap_nan") set to 1 ok 44 - Math::BigFloat->config("trap_nan") isn't affected by setting Math::BigInt->config("trap_nan") ok 45 - Math::BigRat->config("trap_nan") isn't affected by setting Math::BigInt->config("trap_nan") ok 46 - Math::BigInt->config("trap_nan") reset to "0" ok 47 - Math::BigInt->config("upgrade") set to Math::BigInt::SomeClass ok 48 - Math::BigFloat->config("upgrade") isn't affected by setting Math::BigInt->config("upgrade") ok 49 - Math::BigRat->config("upgrade") isn't affected by setting Math::BigInt->config("upgrade") ok 50 - Math::BigInt->config("upgrade") reset to undef # # Verify that Math::BigFloat->config("key" => value) works and that # it doesn't affect the configuration of other classes. # ok 51 - Math::BigFloat->config("accuracy") set to 2 ok 52 - Math::BigInt->config("accuracy") isn't affected by setting Math::BigFloat->config("accuracy") ok 53 - Math::BigRat->config("accuracy") isn't affected by setting Math::BigFloat->config("accuracy") ok 54 - Math::BigFloat->config("accuracy") reset to undef ok 55 - Math::BigFloat->config("div_scale") set to 100 ok 56 - Math::BigInt->config("div_scale") isn't affected by setting Math::BigFloat->config("div_scale") ok 57 - Math::BigRat->config("div_scale") isn't affected by setting Math::BigFloat->config("div_scale") ok 58 - Math::BigFloat->config("div_scale") reset to "40" ok 59 - Math::BigFloat->config("downgrade") set to Math::BigInt::SomeClass ok 60 - Math::BigInt->config("downgrade") isn't affected by setting Math::BigFloat->config("downgrade") ok 61 - Math::BigRat->config("downgrade") isn't affected by setting Math::BigFloat->config("downgrade") ok 62 - Math::BigFloat->config("downgrade") reset to undef ok 63 - Math::BigFloat->config("precision") set to 3 ok 64 - Math::BigInt->config("precision") isn't affected by setting Math::BigFloat->config("precision") ok 65 - Math::BigRat->config("precision") isn't affected by setting Math::BigFloat->config("precision") ok 66 - Math::BigFloat->config("precision") reset to undef ok 67 - Math::BigFloat->config("round_mode") set to zero ok 68 - Math::BigInt->config("round_mode") isn't affected by setting Math::BigFloat->config("round_mode") ok 69 - Math::BigRat->config("round_mode") isn't affected by setting Math::BigFloat->config("round_mode") ok 70 - Math::BigFloat->config("round_mode") reset to "even" ok 71 - Math::BigFloat->config("trap_inf") set to 1 ok 72 - Math::BigInt->config("trap_inf") isn't affected by setting Math::BigFloat->config("trap_inf") ok 73 - Math::BigRat->config("trap_inf") isn't affected by setting Math::BigFloat->config("trap_inf") ok 74 - Math::BigFloat->config("trap_inf") reset to "0" ok 75 - Math::BigFloat->config("trap_nan") set to 1 ok 76 - Math::BigInt->config("trap_nan") isn't affected by setting Math::BigFloat->config("trap_nan") ok 77 - Math::BigRat->config("trap_nan") isn't affected by setting Math::BigFloat->config("trap_nan") ok 78 - Math::BigFloat->config("trap_nan") reset to "0" ok 79 - Math::BigFloat->config("upgrade") set to Math::BigInt::SomeClass ok 80 - Math::BigInt->config("upgrade") isn't affected by setting Math::BigFloat->config("upgrade") ok 81 - Math::BigRat->config("upgrade") isn't affected by setting Math::BigFloat->config("upgrade") ok 82 - Math::BigFloat->config("upgrade") reset to undef # # Verify that Math::BigRat->config("key" => value) works and that # it doesn't affect the configuration of other classes. # ok 83 - Math::BigRat->config("accuracy") set to 2 ok 84 - Math::BigInt->config("accuracy") isn't affected by setting Math::BigRat->config("accuracy") ok 85 - Math::BigFloat->config("accuracy") isn't affected by setting Math::BigRat->config("accuracy") ok 86 - Math::BigRat->config("accuracy") reset to undef ok 87 - Math::BigRat->config("div_scale") set to 100 ok 88 - Math::BigInt->config("div_scale") isn't affected by setting Math::BigRat->config("div_scale") ok 89 - Math::BigFloat->config("div_scale") isn't affected by setting Math::BigRat->config("div_scale") ok 90 - Math::BigRat->config("div_scale") reset to "40" ok 91 - Math::BigRat->config("downgrade") set to Math::BigInt::SomeClass ok 92 - Math::BigInt->config("downgrade") isn't affected by setting Math::BigRat->config("downgrade") ok 93 - Math::BigFloat->config("downgrade") isn't affected by setting Math::BigRat->config("downgrade") ok 94 - Math::BigRat->config("downgrade") reset to undef ok 95 - Math::BigRat->config("precision") set to 3 ok 96 - Math::BigInt->config("precision") isn't affected by setting Math::BigRat->config("precision") ok 97 - Math::BigFloat->config("precision") isn't affected by setting Math::BigRat->config("precision") ok 98 - Math::BigRat->config("precision") reset to undef ok 99 - Math::BigRat->config("round_mode") set to zero ok 100 - Math::BigInt->config("round_mode") isn't affected by setting Math::BigRat->config("round_mode") ok 101 - Math::BigFloat->config("round_mode") isn't affected by setting Math::BigRat->config("round_mode") ok 102 - Math::BigRat->config("round_mode") reset to "even" ok 103 - Math::BigRat->config("trap_inf") set to 1 ok 104 - Math::BigInt->config("trap_inf") isn't affected by setting Math::BigRat->config("trap_inf") ok 105 - Math::BigFloat->config("trap_inf") isn't affected by setting Math::BigRat->config("trap_inf") ok 106 - Math::BigRat->config("trap_inf") reset to "0" ok 107 - Math::BigRat->config("trap_nan") set to 1 ok 108 - Math::BigInt->config("trap_nan") isn't affected by setting Math::BigRat->config("trap_nan") ok 109 - Math::BigFloat->config("trap_nan") isn't affected by setting Math::BigRat->config("trap_nan") ok 110 - Math::BigRat->config("trap_nan") reset to "0" ok 111 - Math::BigRat->config("upgrade") set to Math::BigInt::SomeClass ok 112 - Math::BigInt->config("upgrade") isn't affected by setting Math::BigRat->config("upgrade") ok 113 - Math::BigFloat->config("upgrade") isn't affected by setting Math::BigRat->config("upgrade") ok 114 - Math::BigRat->config("upgrade") reset to undef # # Verify that Math::BigInt->config({key1 => val1, key2 => val2, ...}) # doesn't modify the hash ref argument. # # Subtest: Verify that Math::BigInt->config($cfg) doesn't modify $cfg 1..16 ok 1 - existens of $cfg->{"accuracy"} ok 2 - value of $cfg->{"accuracy"} ok 3 - existens of $cfg->{"div_scale"} ok 4 - value of $cfg->{"div_scale"} ok 5 - existens of $cfg->{"downgrade"} ok 6 - value of $cfg->{"downgrade"} ok 7 - existens of $cfg->{"precision"} ok 8 - value of $cfg->{"precision"} ok 9 - existens of $cfg->{"round_mode"} ok 10 - value of $cfg->{"round_mode"} ok 11 - existens of $cfg->{"trap_inf"} ok 12 - value of $cfg->{"trap_inf"} ok 13 - existens of $cfg->{"trap_nan"} ok 14 - value of $cfg->{"trap_nan"} ok 15 - existens of $cfg->{"upgrade"} ok 16 - value of $cfg->{"upgrade"} ok 115 - Verify that Math::BigInt->config($cfg) doesn't modify $cfg # # Verify that Math::BigFloat->config({key1 => val1, key2 => val2, ...}) # doesn't modify the hash ref argument. # # Subtest: Verify that Math::BigFloat->config($cfg) doesn't modify $cfg 1..16 ok 1 - existens of $cfg->{"accuracy"} ok 2 - value of $cfg->{"accuracy"} ok 3 - existens of $cfg->{"div_scale"} ok 4 - value of $cfg->{"div_scale"} ok 5 - existens of $cfg->{"downgrade"} ok 6 - value of $cfg->{"downgrade"} ok 7 - existens of $cfg->{"precision"} ok 8 - value of $cfg->{"precision"} ok 9 - existens of $cfg->{"round_mode"} ok 10 - value of $cfg->{"round_mode"} ok 11 - existens of $cfg->{"trap_inf"} ok 12 - value of $cfg->{"trap_inf"} ok 13 - existens of $cfg->{"trap_nan"} ok 14 - value of $cfg->{"trap_nan"} ok 15 - existens of $cfg->{"upgrade"} ok 16 - value of $cfg->{"upgrade"} ok 116 - Verify that Math::BigFloat->config($cfg) doesn't modify $cfg # # Verify that Math::BigRat->config({key1 => val1, key2 => val2, ...}) # doesn't modify the hash ref argument. # # Subtest: Verify that Math::BigRat->config($cfg) doesn't modify $cfg 1..16 ok 1 - existens of $cfg->{"accuracy"} ok 2 - value of $cfg->{"accuracy"} ok 3 - existens of $cfg->{"div_scale"} ok 4 - value of $cfg->{"div_scale"} ok 5 - existens of $cfg->{"downgrade"} ok 6 - value of $cfg->{"downgrade"} ok 7 - existens of $cfg->{"precision"} ok 8 - value of $cfg->{"precision"} ok 9 - existens of $cfg->{"round_mode"} ok 10 - value of $cfg->{"round_mode"} ok 11 - existens of $cfg->{"trap_inf"} ok 12 - value of $cfg->{"trap_inf"} ok 13 - existens of $cfg->{"trap_nan"} ok 14 - value of $cfg->{"trap_nan"} ok 15 - existens of $cfg->{"upgrade"} ok 16 - value of $cfg->{"upgrade"} ok 117 - Verify that Math::BigRat->config($cfg) doesn't modify $cfg # # Verify that Math::BigInt->config({accuracy => $a, precision => $p}) # works as intended. # # Subtest: Math::BigInt -> config({"accuracy" => 4, "precision" => undef}) 1..2 ok 1 - Math::BigInt -> config("accuracy") ok 2 - Math::BigInt -> config("precision") ok 118 - Math::BigInt -> config({"accuracy" => 4, "precision" => undef}) # Subtest: Math::BigInt -> config({"accuracy" => undef, "precision" => 5}) 1..2 ok 1 - Math::BigInt -> config("accuracy") ok 2 - Math::BigInt -> config("precision") ok 119 - Math::BigInt -> config({"accuracy" => undef, "precision" => 5}) # # Verify that Math::BigFloat->config({accuracy => $a, precision => $p}) # works as intended. # # Subtest: Math::BigFloat -> config({"accuracy" => 4, "precision" => undef}) 1..2 ok 1 - Math::BigFloat -> config("accuracy") ok 2 - Math::BigFloat -> config("precision") ok 120 - Math::BigFloat -> config({"accuracy" => 4, "precision" => undef}) # Subtest: Math::BigFloat -> config({"accuracy" => undef, "precision" => 5}) 1..2 ok 1 - Math::BigFloat -> config("accuracy") ok 2 - Math::BigFloat -> config("precision") ok 121 - Math::BigFloat -> config({"accuracy" => undef, "precision" => 5}) # # Verify that Math::BigRat->config({accuracy => $a, precision => $p}) # works as intended. # # Subtest: Math::BigRat -> config({"accuracy" => 4, "precision" => undef}) 1..2 ok 1 - Math::BigRat -> config("accuracy") ok 2 - Math::BigRat -> config("precision") ok 122 - Math::BigRat -> config({"accuracy" => 4, "precision" => undef}) # Subtest: Math::BigRat -> config({"accuracy" => undef, "precision" => 5}) 1..2 ok 1 - Math::BigRat -> config("accuracy") ok 2 - Math::BigRat -> config("precision") ok 123 - Math::BigRat -> config({"accuracy" => undef, "precision" => 5}) # # Verify behaviour when getting an invalid key. # ok 124 - Passing invalid key to Math::BigInt->config() causes an error. ok 125 - Passing invalid key to Math::BigFloat->config() causes an error. ok 126 - Passing invalid key to Math::BigRat->config() causes an error. ok t/downgrade-mbi-mbf.t ......... 1..93 ok 1 - Math::BigFloat->downgrade() ok 2 - Math::BigInt->upgrade() # Subtest: Math::BigFloat->new("0.2E0") 1..2 ok 1 - value of $x ok 2 - $x is a Math::BigFloat ok 3 - Math::BigFloat->new("0.2E0") # Subtest: Math::BigFloat->new("0.2E1") 1..2 ok 1 - value of $x ok 2 - $x is downgraded to a Math::BigInt ok 4 - Math::BigFloat->new("0.2E1") # Subtest: Math::BigFloat->new("0.2E2") 1..2 ok 1 - value of $x ok 2 - $x is downgraded to a Math::BigInt ok 5 - Math::BigFloat->new("0.2E2") # Subtest: $x = Math::BigFloat -> new(2); 1..2 ok 1 - $x is downgraded to a Math::BigInt ok 2 - value of $x ok 6 - $x = Math::BigFloat -> new(2); # Subtest: $y = Math::BigFloat -> bpow("2", "0.5"); 1..2 ok 1 - $y is a Math::BigFloat ok 2 - value of $y ok 7 - $y = Math::BigFloat -> bpow("2", "0.5"); # Subtest: $z = $x -> bsqrt(); 1..2 ok 1 - $y is a Math::BigFloat ok 2 - value of $z ok 8 - $z = $x -> bsqrt(); # Subtest: $x = Math::BigFloat -> new(16); $y = $x -> blog(2); 1..4 ok 1 - $x is downgraded to a Math::BigInt ok 2 - value of $x ok 3 - $y is downgraded to a Math::BigInt ok 4 - value of $y ok 9 - $x = Math::BigFloat -> new(16); $y = $x -> blog(2); # Subtest: $x = Math::BigFloat -> new(2); $y = $x -> blog(16); 1..4 ok 1 - $x is downgraded to a Math::BigInt ok 2 - value of $x ok 3 - $y is a Math::BigFloat ok 4 - value of $y ok 10 - $x = Math::BigFloat -> new(2); $y = $x -> blog(16); # Enable downgrading, and see if constructors downgrade # testing new() # Subtest: $x = Math::BigFloat -> new("0.5") 1..2 ok 1 - value of $x ok 2 - does not downgrade from Math::BigFloat ok 11 - $x = Math::BigFloat -> new("0.5") # Subtest: $x = Math::BigFloat -> new("4") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 12 - $x = Math::BigFloat -> new("4") # Subtest: $x = Math::BigFloat -> new("0") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 13 - $x = Math::BigFloat -> new("0") # Subtest: $x = Math::BigFloat -> new("1") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 14 - $x = Math::BigFloat -> new("1") # Subtest: $x = Math::BigFloat -> new("inf") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 15 - $x = Math::BigFloat -> new("inf") # Subtest: $x = Math::BigFloat -> new("NaN") 1..2 ok 1 ok 2 - downgrades to Math::BigInt ok 16 - $x = Math::BigFloat -> new("NaN") # testing bzero() # Subtest: $x = Math::BigFloat -> bzero() 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 17 - $x = Math::BigFloat -> bzero() # testing bone() # Subtest: $x = Math::BigFloat -> bone() 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 18 - $x = Math::BigFloat -> bone() # testing binf() # Subtest: $x = Math::BigFloat -> binf() 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 19 - $x = Math::BigFloat -> binf() # testing bnan() # Subtest: $x = Math::BigFloat -> bnan() 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 20 - $x = Math::BigFloat -> bnan() # testing from_dec() # Subtest: $x = Math::BigFloat -> from_dec("3.14e2") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 21 - $x = Math::BigFloat -> from_dec("3.14e2") # testing from_hex() # Subtest: $x = Math::BigFloat -> from_hex("3.14e2") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 22 - $x = Math::BigFloat -> from_hex("3.14e2") # testing from_oct() # Subtest: $x = Math::BigFloat -> from_oct("0o1.164p+8") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 23 - $x = Math::BigFloat -> from_oct("0o1.164p+8") # testing from_bin() # Subtest: $x = Math::BigFloat -> from_bin("0b1.0011101p+8") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 24 - $x = Math::BigFloat -> from_bin("0b1.0011101p+8") # testing from_ieee754() # Subtest: $x = Math::BigFloat -> from_ieee754("\x43\x9d\x00\x00", "binary32") 1..2 ok 1 - value of $x ok 2 - downgrades to Math::BigInt ok 25 - $x = Math::BigFloat -> from_ieee754("\x43\x9d\x00\x00", "binary32") # Disable downgrading, and see if constructors downgrade ok 26 - Creating a 0 does not downgrade ok 27 - Creating a 0.5 does not downgrade ok 28 - Creating a 1 does not downgrade ok 29 - Creating a 4 does not downgrade ok 30 - Creating an Inf does not downgrade ok 31 - Creating a NaN does not downgrade # testing bneg() # Subtest: $x = $zero -> copy() -> bneg(); 1..2 ok 1 - -(0) = 0 ok 2 - -(0) => Math::BigInt ok 32 - $x = $zero -> copy() -> bneg(); # Subtest: $x = $four -> copy() -> bneg(); 1..2 ok 1 - -(4) = -4 ok 2 - -(4) => Math::BigInt ok 33 - $x = $four -> copy() -> bneg(); # Subtest: $x = $inf -> copy() -> bneg(); 1..2 ok 1 - -(Inf) = -Inf ok 2 - -(Inf) => Math::BigInt ok 34 - $x = $inf -> copy() -> bneg(); # Subtest: $x = $nan -> copy() -> bneg(); 1..2 ok 1 - -(NaN) = NaN ok 2 - -(NaN) => Math::BigInt ok 35 - $x = $nan -> copy() -> bneg(); # testing bnorm() # Subtest: $x = $zero -> copy() -> bnorm(); 1..2 ok 1 - value of $x ok 2 - bnorm(0) => Math::BigInt ok 36 - $x = $zero -> copy() -> bnorm(); # Subtest: $x = $four -> copy() -> bnorm(); 1..2 ok 1 - value of $x ok 2 - bnorm(4) => Math::BigInt ok 37 - $x = $four -> copy() -> bnorm(); # Subtest: $x = $inf -> copy() -> bnorm(); 1..2 ok 1 - value of $x ok 2 - bnorm(Inf) => Math::BigInt ok 38 - $x = $inf -> copy() -> bnorm(); # Subtest: $x = $nan -> copy() -> bnorm(); 1..2 ok 1 - bnorm(NaN) ok 2 - bnorm(NaN) => Math::BigInt ok 39 - $x = $nan -> copy() -> bnorm(); # testing binc() # Subtest: $x = $zero -> copy() -> binc(); 1..2 ok 1 - binc(0) ok 2 - binc(0) => Math::BigInt ok 40 - $x = $zero -> copy() -> binc(); # Subtest: $x = $four -> copy() -> binc(); 1..2 ok 1 - binc(4) ok 2 - binc(4) => Math::BigInt ok 41 - $x = $four -> copy() -> binc(); # Subtest: $x = $inf -> copy() -> binc(); 1..2 ok 1 - binc(Inf) ok 2 - binc(Inf) => Math::BigInt ok 42 - $x = $inf -> copy() -> binc(); # Subtest: $x = $nan -> copy() -> binc(); 1..2 ok 1 - binc(NaN) ok 2 - binc(NaN) => Math::BigInt ok 43 - $x = $nan -> copy() -> binc(); # testing bdec() # Subtest: $x = $zero -> copy() -> bdec(); 1..2 ok 1 - bdec(0) ok 2 - bdec(0) => Math::BigInt ok 44 - $x = $zero -> copy() -> bdec(); # Subtest: $x = $four -> copy() -> bdec(); 1..2 ok 1 - bdec(4) ok 2 - bdec(4) => Math::BigInt ok 45 - $x = $four -> copy() -> bdec(); # Subtest: $x = $inf -> copy() -> bdec(); 1..2 ok 1 - bdec(Inf) ok 2 - bdec(Inf) => Math::BigInt ok 46 - $x = $inf -> copy() -> bdec(); # Subtest: Child of t/downgrade-mbi-mbf.t 1..2 ok 1 - bdec(NaN) ok 2 - bdec(NaN) => Math::BigInt ok 47 - Child of t/downgrade-mbi-mbf.t # testing badd() # Subtest: $x = $half -> copy() -> badd($nan); 1..2 ok 1 - 0.5 + NaN = NaN ok 2 - 0.5 + NaN => Math::BigInt ok 48 - $x = $half -> copy() -> badd($nan); # Subtest: $x = $half -> copy() -> badd($inf); 1..2 ok 1 - 0.5 + Inf = Inf ok 2 - 2.5 + Inf => Math::BigInt ok 49 - $x = $half -> copy() -> badd($inf); # Subtest: $x = $half -> copy() -> badd($half); 1..2 ok 1 - 0.5 + 0.5 = 1 ok 2 - 0.5 + 0.5 => Math::BigInt ok 50 - $x = $half -> copy() -> badd($half); # Subtest: $x = $half -> copy() -> badd($half -> copy() -> bneg()); 1..2 ok 1 - 0.5 + -0.5 = 0 ok 2 - 0.5 + -0.5 => Math::BigInt ok 51 - $x = $half -> copy() -> badd($half -> copy() -> bneg()); # Subtest: $x = $four -> copy() -> badd($zero); 1..2 ok 1 - 4 + 0 = 4 ok 2 - 4 + 0 => Math::BigInt ok 52 - $x = $four -> copy() -> badd($zero); # Subtest: $x = $zero -> copy() -> badd($four); 1..2 ok 1 - 0 + 4 = 4 ok 2 - 0 + 4 => Math::BigInt ok 53 - $x = $zero -> copy() -> badd($four); # Subtest: $x = $inf -> copy() -> badd($four); 1..2 ok 1 - Inf + 4 = Inf ok 2 - Inf + 4 => Math::BigInt ok 54 - $x = $inf -> copy() -> badd($four); # Subtest: $x = $nan -> copy() -> badd($four); 1..2 ok 1 - NaN + 4 = NaN ok 2 - NaN + 4 => Math::BigInt ok 55 - $x = $nan -> copy() -> badd($four); # testing bsub() # Subtest: $x = $half -> copy() -> bsub($nan); 1..2 ok 1 - 0.5 - NaN = NaN ok 2 - 0.5 - NaN => Math::BigInt ok 56 - $x = $half -> copy() -> bsub($nan); # Subtest: $x = $half -> copy() -> bsub($inf); 1..2 ok 1 - 2.5 - Inf = -Inf ok 2 - 2.5 - Inf => Math::BigInt ok 57 - $x = $half -> copy() -> bsub($inf); # Subtest: $x = $half -> copy() -> bsub($half); 1..2 ok 1 - 0.5 + 0.5 = 0 ok 2 - 0.5 - 0.5 => Math::BigInt ok 58 - $x = $half -> copy() -> bsub($half); # Subtest: $x = $half -> copy() -> bsub($half -> copy() -> bneg()); 1..2 ok 1 - 0.5 - -0.5 = 1 ok 2 - 0.5 - -0.5 => Math::BigInt ok 59 - $x = $half -> copy() -> bsub($half -> copy() -> bneg()); # Subtest: $x = $four -> copy() -> bsub($zero); 1..2 ok 1 - 4 - 0 = 4 ok 2 - 4 - 0 => Math::BigInt ok 60 - $x = $four -> copy() -> bsub($zero); # Subtest: $x = $zero -> copy() -> bsub($four); 1..2 ok 1 - 0 - 4 = -4 ok 2 - 0 - 4 => Math::BigInt ok 61 - $x = $zero -> copy() -> bsub($four); # Subtest: $x = $inf -> copy() -> bsub($four); 1..2 ok 1 - Inf - 4 = Inf ok 2 - Inf - 4 => Math::BigInt ok 62 - $x = $inf -> copy() -> bsub($four); # Subtest: $x = $nan -> copy() -> bsub($four); 1..2 ok 1 - NaN - 4 = NaN ok 2 - NaN - 4 => Math::BigInt ok 63 - $x = $nan -> copy() -> bsub($four); # testing bmul() # Subtest: $x = $zero -> copy() -> bmul($four); 1..2 ok 1 - bmul(0, 4) = 0 ok 2 - bmul(0, 4) => Math::BigInt ok 64 - $x = $zero -> copy() -> bmul($four); # Subtest: $x = $four -> copy() -> bmul($four); 1..2 ok 1 - bmul(4, 4) = 16 ok 2 - bmul(4, 4) => Math::BigInt ok 65 - $x = $four -> copy() -> bmul($four); # Subtest: $x = $inf -> copy() -> bmul($four); 1..2 ok 1 - bmul(Inf, 4) = Inf ok 2 - bmul(Inf, 4) => Math::BigInt ok 66 - $x = $inf -> copy() -> bmul($four); # Subtest: $x = $nan -> copy() -> bmul($four); 1..2 ok 1 - bmul(NaN, 4) = NaN ok 2 - bmul(NaN, 4) => Math::BigInt ok 67 - $x = $nan -> copy() -> bmul($four); # Subtest: Child of t/downgrade-mbi-mbf.t 1..2 ok 1 - bmul(4, 0.5) = 2 ok 2 - bmul(4, 0.5) => Math::BigInt ok 68 - Child of t/downgrade-mbi-mbf.t # testing bmuladd() # Subtest: $x = $zero -> copy() -> bmuladd($four, $four); 1..2 ok 1 - bmuladd(0, 4, 4) = 4 ok 2 - bmuladd(0, 4, 4) => Math::BigInt ok 69 - $x = $zero -> copy() -> bmuladd($four, $four); # Subtest: $x = $four -> copy() -> bmuladd($four, $four); 1..2 ok 1 - bmuladd(4, 4, 4) = 20 ok 2 - bmuladd(4, 4, 4) => Math::BigInt ok 70 - $x = $four -> copy() -> bmuladd($four, $four); # Subtest: $x = $four -> copy() -> bmuladd($four, $inf); 1..2 ok 1 - bmuladd(4, 4, Inf) = Inf ok 2 - bmuladd(4, 4, Inf) => Math::BigInt ok 71 - $x = $four -> copy() -> bmuladd($four, $inf); # Subtest: $x = $inf -> copy() -> bmuladd($four, $four); 1..2 ok 1 - bmuladd(Inf, 4, 4) = Inf ok 2 - bmuladd(Inf, 4, 4) => Math::BigInt ok 72 - $x = $inf -> copy() -> bmuladd($four, $four); # Subtest: $x = $inf -> copy() -> bmuladd($four, $four); 1..2 ok 1 - bmuladd(Inf, 4, 4) = Inf ok 2 - bmuladd(Inf, 4, 4) => Math::BigInt ok 73 - $x = $inf -> copy() -> bmuladd($four, $four); # Subtest: $x = $nan -> copy() -> bmuladd($four, $four); 1..2 ok 1 - bmuladd(NaN, 4, 4) = NaN ok 2 - bmuladd(NaN, 4, 4) => Math::BigInt ok 74 - $x = $nan -> copy() -> bmuladd($four, $four); # Subtest: $x = $four -> copy() -> bmuladd("0.5", $four); 1..2 ok 1 - bmuladd(4, 0.5, 4) = 6 ok 2 - bmuladd(4, 0.5, 4) => Math::BigInt ok 75 - $x = $four -> copy() -> bmuladd("0.5", $four); # testing bdiv() # Subtest: $x = $zero -> copy() -> bdiv($one); 1..2 ok 1 - bdiv(0, 1) = 0 ok 2 - bdiv(0, 1) => Math::BigInt ok 76 - $x = $zero -> copy() -> bdiv($one); # testing bmod() # testing bmodpow() # testing bpow() # testing blog() # testing bexp() # testing bnok() # testing bsin() # testing bcos() # testing batan() # testing batan() # testing bsqrt() # testing broot() # testing bfac() # testing bdfac() # testing btfac() # testing bmfac() # testing blsft() # testing brsft() # testing band() # testing bior() # testing bxor() # testing bnot() # testing bround() # testing Add tests for rounding a non-integer to an integer. Fixme! # Subtest: $x = $zero -> copy() -> bround(); 1..2 ok 1 - bround(0) ok 2 - bround(0) => Math::BigInt ok 77 - $x = $zero -> copy() -> bround(); # Subtest: $x = $four -> copy() -> bround(); 1..2 ok 1 - bround(4) ok 2 - bround(4) => Math::BigInt ok 78 - $x = $four -> copy() -> bround(); # Subtest: $x = $inf -> copy() -> bround(); 1..2 ok 1 - bround(Inf) ok 2 - bround(Inf) => Math::BigInt ok 79 - $x = $inf -> copy() -> bround(); # Subtest: $x = $nan -> copy() -> bround(); 1..2 ok 1 - bround(NaN) ok 2 - bround(NaN) => Math::BigInt ok 80 - $x = $nan -> copy() -> bround(); # testing bfround() # testing Add tests for rounding a non-integer to an integer. Fixme! # Subtest: $x = $zero -> copy() -> bfround(); 1..2 ok 1 - bfround(0) ok 2 - bfround(0) => Math::BigInt ok 81 - $x = $zero -> copy() -> bfround(); # Subtest: $x = $four -> copy() -> bfround(); 1..2 ok 1 - bfround(4) ok 2 - bfround(4) => Math::BigInt ok 82 - $x = $four -> copy() -> bfround(); # Subtest: $x = $inf -> copy() -> bfround(); 1..2 ok 1 - bfround(Inf) ok 2 - bfround(Inf) => Math::BigInt ok 83 - $x = $inf -> copy() -> bfround(); # Subtest: $x = $nan -> copy() -> bfround(); 1..2 ok 1 - bfround(NaN) ok 2 - bfround(NaN) => Math::BigInt ok 84 - $x = $nan -> copy() -> bfround(); # testing bfloor() # Subtest: $x = $half -> copy() -> bfloor(); 1..2 ok 1 - bfloor(0) ok 2 - bfloor(0) => Math::BigInt ok 85 - $x = $half -> copy() -> bfloor(); # Subtest: $x = $inf -> copy() -> bfloor(); 1..2 ok 1 - bfloor(Inf) ok 2 - bfloor(Inf) => Math::BigInt ok 86 - $x = $inf -> copy() -> bfloor(); # Subtest: $x = $nan -> copy() -> bfloor(); 1..2 ok 1 - bfloor(NaN) ok 2 - bfloor(NaN) => Math::BigInt ok 87 - $x = $nan -> copy() -> bfloor(); # testing bceil() # Subtest: $x = $half -> copy() -> bceil(); 1..2 ok 1 - bceil(0) ok 2 - bceil(0) => Math::BigInt ok 88 - $x = $half -> copy() -> bceil(); # Subtest: $x = $inf -> copy() -> bceil(); 1..2 ok 1 - bceil(Inf) ok 2 - bceil(Inf) => Math::BigInt ok 89 - $x = $inf -> copy() -> bceil(); # Subtest: $x = $nan -> copy() -> bceil(); 1..2 ok 1 - bceil(NaN) ok 2 - bceil(NaN) => Math::BigInt ok 90 - $x = $nan -> copy() -> bceil(); # testing bint() # Subtest: $x = $half -> copy() -> bint(); 1..2 ok 1 - bint(0) ok 2 - bint(0) => Math::BigInt ok 91 - $x = $half -> copy() -> bint(); # Subtest: $x = $inf -> copy() -> bint(); 1..2 ok 1 - bint(Inf) ok 2 - bint(Inf) => Math::BigInt ok 92 - $x = $inf -> copy() -> bint(); # Subtest: $x = $nan -> copy() -> bint(); 1..2 ok 1 - bint(NaN) ok 2 - bint(NaN) => Math::BigInt ok 93 - $x = $nan -> copy() -> bint(); # testing bgcd() # testing blcm() # testing mantissa() # testing exponent() # testing parts() # testing sparts() # testing nparts() # testing eparts() # testing dparts() # testing fparts() # testing numerator() # testing denominator() ok t/downgrade-mbi-mbr.t ......... 1..141 ok 1 - Math::BigRat->downgrade() ok 2 - Math::BigInt->upgrade() # Enable downgrading, and see if constructors downgrade ok 3 ok 4 - Creating a 0.5 does not downgrade ok 5 - new("4") ok 6 - Creating a 4 downgrades to Math::BigInt ok 7 - new("0") ok 8 - Creating a 0 downgrades to Math::BigInt ok 9 - new("1") ok 10 - Creating a 1 downgrades to Math::BigInt ok 11 - new("inf") ok 12 - Creating an Inf downgrades to Math::BigInt ok 13 - new("NaN") ok 14 - Creating a NaN downgrades to Math::BigInt ok 15 - bzero() ok 16 - Creating a 0 downgrades to Math::BigInt ok 17 - bone() ok 18 - Creating a 1 downgrades to Math::BigInt ok 19 - binf() ok 20 - Creating an Inf downgrades to Math::BigInt ok 21 - bnan() ok 22 - Creating a NaN downgrades to Math::BigInt ok 23 - from_hex("13a") ok 24 - from_hex("13a") downgrades to Math::BigInt ok 25 - from_oct("472") ok 26 - from_oct("472") downgrades to Math::BigInt ok 27 - from_bin("100111010") ok 28 - from_bin("100111010") downgrades to Math::BigInt # Disable downgrading, and see if constructors downgrade ok 29 - Creating a 0.5 does not downgrade ok 30 - Creating a 4 does not downgrade ok 31 - Creating a 0 does not downgrade ok 32 - Creating an Inf does not downgrade ok 33 - Creating a NaN does not downgrade # bneg() ok 34 - -(0) = 0 ok 35 - -(0) => Math::BigInt ok 36 - -(4) = -4 ok 37 - -(4) => Math::BigInt ok 38 - -(Inf) = -Inf ok 39 - -(Inf) => Math::BigInt ok 40 - -(NaN) = NaN ok 41 - -(NaN) => Math::BigInt # bnorm() ok 42 - bnorm(0) ok 43 - bnorm(0) => Math::BigInt ok 44 - bnorm(4) ok 45 - bnorm(4) => Math::BigInt ok 46 - bnorm(Inf) ok 47 - bnorm(Inf) => Math::BigInt ok 48 - bnorm(NaN) ok 49 - bnorm(NaN) => Math::BigInt # binc() ok 50 - binc(0) ok 51 - binc(0) => Math::BigInt ok 52 - binc(4) ok 53 - binc(4) => Math::BigInt ok 54 - binc(Inf) ok 55 - binc(Inf) => Math::BigInt ok 56 - binc(NaN) ok 57 - binc(NaN) => Math::BigInt # bdec() ok 58 - bdec(0) ok 59 - bdec(0) => Math::BigInt ok 60 - bdec(4) ok 61 - bdec(4) => Math::BigInt ok 62 - bdec(Inf) ok 63 - bdec(Inf) => Math::BigInt ok 64 - bdec(NaN) ok 65 - bdec(NaN) => Math::BigInt # badd() ok 66 - 0.5 + NaN = NaN ok 67 - 0.5 + NaN => Math::BigInt ok 68 - 0.5 + Inf = Inf ok 69 - 2.5 + Inf => Math::BigInt ok 70 - 0.5 + 0.5 = 1 ok 71 - 0.5 + 0.5 => Math::BigInt ok 72 - 0.5 + -0.5 = 0 ok 73 - 0.5 + -0.5 => Math::BigInt ok 74 - 4 + 0 = 4 ok 75 - 4 + 0 => Math::BigInt ok 76 - 0 + 4 = 4 ok 77 - 0 + 4 => Math::BigInt ok 78 - Inf + 4 = Inf ok 79 - Inf + 4 => Math::BigInt ok 80 - NaN + 4 = NaN ok 81 - NaN + 4 => Math::BigInt # bsub() ok 82 - 0.5 - NaN = NaN ok 83 - 0.5 - NaN => Math::BigInt ok 84 - 2.5 - Inf = -Inf ok 85 - 2.5 - Inf => Math::BigInt ok 86 - 0.5 - 0.5 = 0 ok 87 - 0.5 - 0.5 => Math::BigInt ok 88 - 0.5 - -0.5 = 1 ok 89 - 0.5 - -0.5 => Math::BigInt ok 90 - 4 - 0 = 4 ok 91 - 4 - 0 => Math::BigInt ok 92 - 0 - 4 = -4 ok 93 - 0 - 4 => Math::BigInt ok 94 - Inf - 4 = Inf ok 95 - Inf - 4 => Math::BigInt ok 96 - NaN - 4 = NaN ok 97 - NaN - 4 => Math::BigInt # bmul() ok 98 - bmul(0, 4) = 0 ok 99 - bmul(0, 4) => Math::BigInt ok 100 - bmul(4, 4) = 16 ok 101 - bmul(4, 4) => Math::BigInt ok 102 - bmul(Inf, 4) = Inf ok 103 - bmul(Inf, 4) => Math::BigInt ok 104 - bmul(NaN, 4) = NaN ok 105 - bmul(NaN, 4) => Math::BigInt ok 106 - bmul(4, 0.5) = 2 ok 107 - bmul(4, 0.5) => Math::BigInt # bdiv() # bmod() # bmodpow() # bpow() # blog() # bexp() # bnok() # bsin() # bcos() # batan() # batan() # bsqrt() # broot() # bfac() # bdfac() # btfac() # bmfac() # blsft() # brsft() # band() # bior() # bxor() # bnot() # bround() ok 108 - bround(0) ok 109 - bround(0) => Math::BigInt ok 110 - bround(4) ok 111 - bround(4) => Math::BigInt ok 112 - bround(Inf) ok 113 - bround(Inf) => Math::BigInt ok 114 - bround(NaN) ok 115 - bround(NaN) => Math::BigInt # bfround() ok 116 - bfround(0) ok 117 - bfround(0) => Math::BigInt ok 118 - bfround(4) ok 119 - bfround(4) => Math::BigInt ok 120 - bfround(Inf) ok 121 - bfround(Inf) => Math::BigInt ok 122 - bfround(NaN) ok 123 - bfround(NaN) => Math::BigInt # bfloor() ok 124 - bfloor(0) ok 125 - bfloor(0) => Math::BigInt ok 126 - bfloor(Inf) ok 127 - bfloor(Inf) => Math::BigInt ok 128 - bfloor(NaN) ok 129 - bfloor(NaN) => Math::BigInt # bceil() ok 130 - bceil(0) ok 131 - bceil(0) => Math::BigInt ok 132 - bceil(Inf) ok 133 - bceil(Inf) => Math::BigInt ok 134 - bceil(NaN) ok 135 - bceil(NaN) => Math::BigInt # bint() ok 136 - bint(0) ok 137 - bint(0) => Math::BigInt ok 138 - bint(Inf) ok 139 - bint(Inf) => Math::BigInt ok 140 - bint(NaN) ok 141 - bint(NaN) => Math::BigInt # bgcd() # blcm() ok t/hang-mbr.t .................. 1..1 ok 1 - exp(1/2) worked ok t/inf_nan.t ................... 1..1044 # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 2 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 3 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 4 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 5 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 6 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 7 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 8 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 9 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 10 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 11 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 12 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 13 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 14 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 15 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 16 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 17 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 18 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 19 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 20 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 21 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 22 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 23 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 24 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 25 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 26 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 27 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 28 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 29 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 30 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 31 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 32 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 33 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 34 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 35 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 36 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 37 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 38 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 39 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 40 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 41 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 42 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 43 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 44 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 45 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 46 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 47 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 48 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 49 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 50 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 51 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 52 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 53 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 54 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 55 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 56 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 57 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 58 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 59 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 60 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 61 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 62 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 63 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 64 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 65 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 66 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 67 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 68 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 69 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 70 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 71 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 72 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 73 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 74 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 75 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 76 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 77 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 78 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 79 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 80 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 81 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 82 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 83 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 84 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 85 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 86 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 87 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 88 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 89 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 90 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 91 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 92 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 93 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 94 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 95 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 96 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 97 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 98 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 99 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 100 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 101 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 102 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 103 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 104 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 105 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 106 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 107 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 108 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 109 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 110 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 111 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 112 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 113 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 114 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 115 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 116 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 117 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 118 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 119 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 120 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 121 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 122 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 123 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 124 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 125 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 126 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 127 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 128 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 129 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 130 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 131 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 132 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 133 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 134 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 135 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 136 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 137 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 138 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 139 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 140 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 141 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 142 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 143 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 144 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 145 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 146 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 147 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 148 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 149 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 150 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 151 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 152 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 153 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 154 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 155 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 156 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 157 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 158 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 159 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 160 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 161 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 162 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 163 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 164 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 165 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 166 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 167 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 168 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->badd($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 169 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 170 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 171 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 172 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 173 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 174 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 175 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 176 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 177 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 178 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 179 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 180 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 181 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 182 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 183 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 184 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 185 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 186 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 187 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 188 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 189 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 190 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 191 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 192 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 193 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 194 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 195 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 196 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 197 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 198 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 199 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 200 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 201 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 202 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 203 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 204 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 205 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 206 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 207 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 208 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 209 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 210 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 211 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 212 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 213 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 214 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 215 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 216 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 217 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 218 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 219 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 220 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 221 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 222 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 223 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 224 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 225 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 226 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 227 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 228 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 229 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 230 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 231 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 232 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 233 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 234 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 235 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 236 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 237 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 238 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 239 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 240 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 241 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 242 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 243 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 244 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 245 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 246 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 247 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 248 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 249 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 250 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 251 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 252 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 253 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 254 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 255 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 256 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 257 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 258 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 259 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 260 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 261 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 262 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 263 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 264 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 265 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 266 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 267 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 268 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 269 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 270 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 271 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 272 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 273 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 274 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 275 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 276 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 277 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 278 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 279 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 280 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 281 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 282 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 283 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 284 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 285 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 286 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 287 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 288 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 289 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 290 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 291 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 292 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 293 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 294 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 295 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 296 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 297 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 298 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 299 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 300 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 301 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 302 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 303 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 304 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 305 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 306 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 307 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 308 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 309 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 310 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 311 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 312 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 313 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 314 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 315 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 316 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 317 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 318 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 319 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 320 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 321 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 322 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 323 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 324 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 325 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 326 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 327 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 328 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 329 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 330 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 331 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 332 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 333 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 334 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 335 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 336 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bsub($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 337 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 338 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 339 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 340 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 341 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 342 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 343 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 344 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 345 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 346 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 347 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 348 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 349 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 350 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 351 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 352 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 353 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 354 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 355 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 356 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 357 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 358 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 359 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 360 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 361 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 362 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 363 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 364 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 365 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 366 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 367 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 368 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 369 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 370 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 371 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 372 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 373 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 374 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 375 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 376 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 377 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 378 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 379 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 380 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 381 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 382 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 383 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 384 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 385 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 386 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 387 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 388 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 389 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 390 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 391 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 392 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 393 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 394 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 395 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 396 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 397 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 398 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 399 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 400 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 401 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 402 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 403 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 404 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 405 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 406 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 407 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 408 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 409 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 410 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 411 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 412 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 413 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 414 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 415 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 416 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 417 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 418 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 419 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 420 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 421 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 422 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 423 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 424 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 425 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 426 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 427 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 428 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 429 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 430 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 431 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 432 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 433 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 434 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 435 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 436 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 437 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 438 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 439 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 440 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 441 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 442 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 443 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 444 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 445 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 446 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 447 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 448 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 449 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 450 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 451 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 452 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 453 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 454 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 455 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 456 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 457 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 458 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 459 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 460 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 461 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 462 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 463 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 464 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 465 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 466 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 467 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 468 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 469 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 470 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 471 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 472 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 473 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 474 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 475 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 476 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 477 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 478 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 479 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 480 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 481 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 482 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 483 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 484 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 485 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 486 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 487 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 488 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 489 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 490 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 491 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 492 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 493 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 494 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 495 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 496 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 497 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 498 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 499 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 500 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $z is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 501 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $z is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 502 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 503 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 504 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bmul($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 505 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 506 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 507 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 508 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 509 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 510 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 511 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 512 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 513 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 514 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 515 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 516 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 517 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 518 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 519 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 520 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 521 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 522 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 523 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 524 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 525 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 526 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 527 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 528 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 529 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 530 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 531 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 532 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 533 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 534 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 535 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 536 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 537 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 538 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 539 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 540 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 541 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 542 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 543 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 544 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 545 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 546 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 547 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 548 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 549 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 550 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 551 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 552 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 553 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 554 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 555 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 556 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 557 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 558 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 559 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 560 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 561 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 562 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 563 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 564 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 565 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 566 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 567 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 568 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 569 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 570 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 571 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 572 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 573 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 574 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 575 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 576 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 577 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 578 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 579 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 580 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 581 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 582 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 583 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 584 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 585 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 586 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 587 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 588 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 589 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 590 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 591 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 592 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 593 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 594 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 595 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 596 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 597 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 598 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 599 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 600 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 601 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 602 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 603 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 604 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 605 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 606 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 607 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 608 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 609 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 610 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 611 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 612 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 613 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 614 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 615 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 616 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 617 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 618 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 619 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 620 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 621 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 622 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 623 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 624 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 625 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 626 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 627 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 628 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 629 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 630 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 631 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 632 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 633 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 634 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 635 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 636 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 637 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 638 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 639 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 640 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 641 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 642 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 643 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 644 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 645 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 646 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 647 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 648 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 649 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 650 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 651 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 652 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 653 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 654 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 655 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 656 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 657 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 658 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 659 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 660 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 661 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 662 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 663 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 664 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 665 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 666 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 667 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 668 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 669 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 670 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 671 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 672 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 673 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 674 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 675 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 676 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 677 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 678 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 679 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 680 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 681 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 682 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 683 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 684 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 685 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 686 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 687 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 688 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 689 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 690 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 691 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 692 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 693 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 694 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 695 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 696 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 697 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 698 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 699 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 700 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 701 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 702 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 703 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 704 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 705 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 706 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 707 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 708 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 709 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 710 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 711 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 712 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 713 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 714 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 715 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 716 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 717 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 718 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 719 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 720 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 721 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 722 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 723 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 724 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 725 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 726 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 727 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 728 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 729 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 730 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 731 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 732 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 733 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 734 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 735 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 736 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 737 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 738 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 739 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 740 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 741 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 742 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 743 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 744 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 745 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 746 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 747 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 748 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 749 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 750 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 751 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 752 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 753 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 754 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 755 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 756 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 757 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 758 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 759 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 760 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 761 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 762 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 763 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 764 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 765 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 766 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 767 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 768 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 769 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 770 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 771 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 772 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 773 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 774 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 775 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 776 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 777 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 778 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 779 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 780 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 781 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 782 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 783 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 784 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 785 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 786 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 787 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 788 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 789 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 790 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 791 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 792 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 793 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 794 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 795 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 796 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 797 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 798 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 799 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 800 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 801 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 802 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 803 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 804 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 805 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 806 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 807 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 808 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 809 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 810 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 811 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 812 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 813 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 814 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 815 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 816 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 817 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 818 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 819 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 820 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 821 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 822 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 823 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 824 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 825 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 826 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 827 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 828 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 829 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 830 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 831 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 832 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 833 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 834 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 835 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 836 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 837 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 838 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 839 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 840 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 841 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 842 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 843 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 844 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 845 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 846 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 847 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 848 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 849 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 850 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 851 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 852 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 853 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 854 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 855 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 856 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 857 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 858 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 859 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 860 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 861 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 862 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 863 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 864 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 865 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 866 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 867 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 868 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 869 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 870 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 871 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 872 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 873 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 874 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 875 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 876 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 877 - $x = Math::BigInt->new("-0"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 878 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 879 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 880 - $x = Math::BigInt::Subclass->new("-0"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 881 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 882 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 883 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 884 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 885 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 886 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 887 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 888 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 889 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 890 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 891 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 892 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 893 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 894 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 895 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 896 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 897 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 898 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 899 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 900 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 901 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 902 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 903 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 904 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 905 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 906 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 907 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 908 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 909 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 910 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 911 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 912 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 913 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 914 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 915 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $q is a Math::BigInt ok 4 - $r is a Math::BigInt ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 916 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt ok 2 - $y is still a Math::BigInt ok 3 - $m is a Math::BigInt ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 917 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $q ok 918 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $q = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $q is a Math::BigInt::Subclass ok 4 - $r is a Math::BigInt::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 919 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigInt::Subclass ok 2 - $y is still a Math::BigInt::Subclass ok 3 - $m is a Math::BigInt::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 920 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $q is a Math::BigFloat ok 4 - $r is a Math::BigFloat ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 921 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $m is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 922 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); 1..7 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $q is a Math::BigFloat::Subclass ok 4 - $r is a Math::BigFloat::Subclass ok 5 - value of $x ok 6 - value of $y ok 7 - value of $q ok 923 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); ($q, $r) = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $m is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $m ok 924 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $m = $x->bmod($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 925 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 926 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 927 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 928 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 929 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 930 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 931 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 932 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 933 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 934 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 935 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 936 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 937 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 938 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 939 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 940 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 941 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 942 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 943 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 944 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 945 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 946 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 947 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 948 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 949 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 950 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 951 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 952 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 953 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 954 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 955 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 956 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 957 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 958 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 959 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 960 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 961 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 962 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 963 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 964 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 965 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 966 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 967 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 968 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 969 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 970 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 971 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 972 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 973 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 974 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 975 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 976 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 977 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 978 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 979 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 980 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 981 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 982 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 983 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 984 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 985 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 986 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 987 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 988 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 989 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 990 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 991 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 992 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 993 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 994 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 995 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 996 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 997 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 998 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 999 - $x = Math::BigFloat->new("-0"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1000 - $x = Math::BigFloat::Subclass->new("-0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1001 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1002 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1003 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1004 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1005 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1006 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat ok 2 - $y is still a Math::BigFloat ok 3 - $z is a Math::BigFloat ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1007 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = $x->bdiv($y); # Subtest: $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); 1..6 ok 1 - $x is a Math::BigFloat::Subclass ok 2 - $y is still a Math::BigFloat::Subclass ok 3 - $z is a Math::BigFloat::Subclass ok 4 - value of $x ok 5 - value of $y ok 6 - value of $z ok 1008 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = $x->bdiv($y); ok 1009 - NaN == NaN: "" ok 1010 - NaN != NaN: 1 ok 1011 - NaN == NaN: "" ok 1012 - NaN != NaN: 1 ok 1013 - 0 != NaN: 1 ok 1014 - 0 == NaN: "" ok 1015 - 0 < NaN: "" ok 1016 - 0 <= NaN: "" ok 1017 - 0 >= NaN: "" ok 1018 - NaN == NaN: "" ok 1019 - NaN != NaN: 1 ok 1020 - NaN == NaN: "" ok 1021 - NaN != NaN: 1 ok 1022 - 0 != NaN: 1 ok 1023 - 0 == NaN: "" ok 1024 - 0 < NaN: "" ok 1025 - 0 <= NaN: "" ok 1026 - 0 >= NaN: "" ok 1027 - NaN == NaN: "" ok 1028 - NaN != NaN: 1 ok 1029 - NaN == NaN: "" ok 1030 - NaN != NaN: 1 ok 1031 - 0 != NaN: 1 ok 1032 - 0 == NaN: "" ok 1033 - 0 < NaN: "" ok 1034 - 0 <= NaN: "" ok 1035 - 0 >= NaN: "" ok 1036 - NaN == NaN: "" ok 1037 - NaN != NaN: 1 ok 1038 - NaN == NaN: "" ok 1039 - NaN != NaN: 1 ok 1040 - 0 != NaN: 1 ok 1041 - 0 == NaN: "" ok 1042 - 0 < NaN: "" ok 1043 - 0 <= NaN: "" ok 1044 - 0 >= NaN: "" ok t/isa.t ....................... 1..13 ok 1 - An object of class 'Math::BigInt::Subclass' isa 'Math::BigInt' ok 2 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 3 - A Math::BigFloat isn't a Math::BigInt ok 4 - ref($x) = "Math::BigInt" ok 5 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 6 - ref($x) = "Math::BigInt" ok 7 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 8 - ref($x) = "Math::BigFloat" ok 9 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok 10 - ref($x) = "Math::BigFloat" ok 11 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok 12 - Math::BigFloat parent == subclass ok 13 - Math::BigFloat subclass == parent ok t/mbf_ali.t ................... 1..6 ok 1 - Math::BigFloat -> new(123) -> is_pos() ok 2 - Math::BigFloat -> new(123) -> is_neg() ok 3 - Math::BigFloat -> new(123) -> as_int() ok 4 - 'Math::BigFloat -> new(123) -> as_int() isa Math::BigInt' isa 'Math::BigInt' ok 5 - Math::BigFloat -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigFloat -> new(123) -> bneg() -> is_neg() ok t/mbi_ali.t ................... 1..6 ok 1 - Math::BigInt -> new(123) -> is_pos() ok 2 - Math::BigInt -> new(123) -> is_neg() ok 3 - Math::BigInt -> new(123) -> as_int() ok 4 - 'Math::BigInt -> new(123) -> as_int() isa Math::BigInt' isa 'Math::BigInt' ok 5 - Math::BigInt -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt -> new(123) -> bneg() -> is_neg() ok t/mbi_rand.t .................. 1..512 ok 1 - AdivB * B + 2 * AmodB - AmodB == A ok 2 - AdivB * B / B == AdivB ok 3 - AdivB * A + 2 * AmodB - AmodB == B ok 4 - AdivB * A / A == AdivB ok 5 - AdivB * B + 2 * AmodB - AmodB == A ok 6 - AdivB * B / B == AdivB ok 7 - AdivB * A + 2 * AmodB - AmodB == B ok 8 - AdivB * A / A == AdivB ok 9 - AdivB * B + 2 * AmodB - AmodB == A ok 10 - AdivB * B / B == AdivB ok 11 - AdivB * A + 2 * AmodB - AmodB == B ok 12 - AdivB * A / A == AdivB ok 13 - AdivB * B + 2 * AmodB - AmodB == A ok 14 - AdivB * B / B == AdivB ok 15 - AdivB * A + 2 * AmodB - AmodB == B ok 16 - AdivB * A / A == AdivB ok 17 - AdivB * B + 2 * AmodB - AmodB == A ok 18 - AdivB * B / B == AdivB ok 19 - AdivB * A + 2 * AmodB - AmodB == B ok 20 - AdivB * A / A == AdivB ok 21 - AdivB * B + 2 * AmodB - AmodB == A ok 22 - AdivB * B / B == AdivB ok 23 - AdivB * A + 2 * AmodB - AmodB == B ok 24 - AdivB * A / A == AdivB ok 25 - AdivB * B + 2 * AmodB - AmodB == A ok 26 - AdivB * B / B == AdivB ok 27 - AdivB * A + 2 * AmodB - AmodB == B ok 28 - AdivB * A / A == AdivB ok 29 - AdivB * B + 2 * AmodB - AmodB == A ok 30 - AdivB * B / B == AdivB ok 31 - AdivB * A + 2 * AmodB - AmodB == B ok 32 - AdivB * A / A == AdivB ok 33 - AdivB * B + 2 * AmodB - AmodB == A ok 34 - AdivB * B / B == AdivB ok 35 - AdivB * A + 2 * AmodB - AmodB == B ok 36 - AdivB * A / A == AdivB ok 37 - AdivB * B + 2 * AmodB - AmodB == A ok 38 - AdivB * B / B == AdivB ok 39 - AdivB * A + 2 * AmodB - AmodB == B ok 40 - AdivB * A / A == AdivB ok 41 - AdivB * B + 2 * AmodB - AmodB == A ok 42 - AdivB * B / B == AdivB ok 43 - AdivB * A + 2 * AmodB - AmodB == B ok 44 - AdivB * A / A == AdivB ok 45 - AdivB * B + 2 * AmodB - AmodB == A ok 46 - AdivB * B / B == AdivB ok 47 - AdivB * A + 2 * AmodB - AmodB == B ok 48 - AdivB * A / A == AdivB ok 49 - AdivB * B + 2 * AmodB - AmodB == A ok 50 - AdivB * B / B == AdivB ok 51 - AdivB * A + 2 * AmodB - AmodB == B ok 52 - AdivB * A / A == AdivB ok 53 - AdivB * B + 2 * AmodB - AmodB == A ok 54 - AdivB * B / B == AdivB ok 55 - AdivB * A + 2 * AmodB - AmodB == B ok 56 - AdivB * A / A == AdivB ok 57 - AdivB * B + 2 * AmodB - AmodB == A ok 58 - AdivB * B / B == AdivB ok 59 - AdivB * A + 2 * AmodB - AmodB == B ok 60 - AdivB * A / A == AdivB ok 61 - AdivB * B + 2 * AmodB - AmodB == A ok 62 - AdivB * B / B == AdivB ok 63 - AdivB * A + 2 * AmodB - AmodB == B ok 64 - AdivB * A / A == AdivB ok 65 - AdivB * B + 2 * AmodB - AmodB == A ok 66 - AdivB * B / B == AdivB ok 67 - AdivB * A + 2 * AmodB - AmodB == B ok 68 - AdivB * A / A == AdivB ok 69 - AdivB * B + 2 * AmodB - AmodB == A ok 70 - AdivB * B / B == AdivB ok 71 - AdivB * A + 2 * AmodB - AmodB == B ok 72 - AdivB * A / A == AdivB ok 73 - AdivB * B + 2 * AmodB - AmodB == A ok 74 - AdivB * B / B == AdivB ok 75 - AdivB * A + 2 * AmodB - AmodB == B ok 76 - AdivB * A / A == AdivB ok 77 - AdivB * B + 2 * AmodB - AmodB == A ok 78 - AdivB * B / B == AdivB ok 79 - AdivB * A + 2 * AmodB - AmodB == B ok 80 - AdivB * A / A == AdivB ok 81 - AdivB * B + 2 * AmodB - AmodB == A ok 82 - AdivB * B / B == AdivB ok 83 - AdivB * A + 2 * AmodB - AmodB == B ok 84 - AdivB * A / A == AdivB ok 85 - AdivB * B + 2 * AmodB - AmodB == A ok 86 - AdivB * B / B == AdivB ok 87 - AdivB * A + 2 * AmodB - AmodB == B ok 88 - AdivB * A / A == AdivB ok 89 - AdivB * B + 2 * AmodB - AmodB == A ok 90 - AdivB * B / B == AdivB ok 91 - AdivB * A + 2 * AmodB - AmodB == B ok 92 - AdivB * A / A == AdivB ok 93 - AdivB * B + 2 * AmodB - AmodB == A ok 94 - AdivB * B / B == AdivB ok 95 - AdivB * A + 2 * AmodB - AmodB == B ok 96 - AdivB * A / A == AdivB ok 97 - AdivB * B + 2 * AmodB - AmodB == A ok 98 - AdivB * B / B == AdivB ok 99 - AdivB * A + 2 * AmodB - AmodB == B ok 100 - AdivB * A / A == AdivB ok 101 - AdivB * B + 2 * AmodB - AmodB == A ok 102 - AdivB * B / B == AdivB ok 103 - AdivB * A + 2 * AmodB - AmodB == B ok 104 - AdivB * A / A == AdivB ok 105 - AdivB * B + 2 * AmodB - AmodB == A ok 106 - AdivB * B / B == AdivB ok 107 - AdivB * A + 2 * AmodB - AmodB == B ok 108 - AdivB * A / A == AdivB ok 109 - AdivB * B + 2 * AmodB - AmodB == A ok 110 - AdivB * B / B == AdivB ok 111 - AdivB * A + 2 * AmodB - AmodB == B ok 112 - AdivB * A / A == AdivB ok 113 - AdivB * B + 2 * AmodB - AmodB == A ok 114 - AdivB * B / B == AdivB ok 115 - AdivB * A + 2 * AmodB - AmodB == B ok 116 - AdivB * A / A == AdivB ok 117 - AdivB * B + 2 * AmodB - AmodB == A ok 118 - AdivB * B / B == AdivB ok 119 - AdivB * A + 2 * AmodB - AmodB == B ok 120 - AdivB * A / A == AdivB ok 121 - AdivB * B + 2 * AmodB - AmodB == A ok 122 - AdivB * B / B == AdivB ok 123 - AdivB * A + 2 * AmodB - AmodB == B ok 124 - AdivB * A / A == AdivB ok 125 - AdivB * B + 2 * AmodB - AmodB == A ok 126 - AdivB * B / B == AdivB ok 127 - AdivB * A + 2 * AmodB - AmodB == B ok 128 - AdivB * A / A == AdivB ok 129 - AdivB * B + 2 * AmodB - AmodB == A ok 130 - AdivB * B / B == AdivB ok 131 - AdivB * A + 2 * AmodB - AmodB == B ok 132 - AdivB * A / A == AdivB ok 133 - AdivB * B + 2 * AmodB - AmodB == A ok 134 - AdivB * B / B == AdivB ok 135 - AdivB * A + 2 * AmodB - AmodB == B ok 136 - AdivB * A / A == AdivB ok 137 - AdivB * B + 2 * AmodB - AmodB == A ok 138 - AdivB * B / B == AdivB ok 139 - AdivB * A + 2 * AmodB - AmodB == B ok 140 - AdivB * A / A == AdivB ok 141 - AdivB * B + 2 * AmodB - AmodB == A ok 142 - AdivB * B / B == AdivB ok 143 - AdivB * A + 2 * AmodB - AmodB == B ok 144 - AdivB * A / A == AdivB ok 145 - AdivB * B + 2 * AmodB - AmodB == A ok 146 - AdivB * B / B == AdivB ok 147 - AdivB * A + 2 * AmodB - AmodB == B ok 148 - AdivB * A / A == AdivB ok 149 - AdivB * B + 2 * AmodB - AmodB == A ok 150 - AdivB * B / B == AdivB ok 151 - AdivB * A + 2 * AmodB - AmodB == B ok 152 - AdivB * A / A == AdivB ok 153 - AdivB * B + 2 * AmodB - AmodB == A ok 154 - AdivB * B / B == AdivB ok 155 - AdivB * A + 2 * AmodB - AmodB == B ok 156 - AdivB * A / A == AdivB ok 157 - AdivB * B + 2 * AmodB - AmodB == A ok 158 - AdivB * B / B == AdivB ok 159 - AdivB * A + 2 * AmodB - AmodB == B ok 160 - AdivB * A / A == AdivB ok 161 - AdivB * B + 2 * AmodB - AmodB == A ok 162 - AdivB * B / B == AdivB ok 163 - AdivB * A + 2 * AmodB - AmodB == B ok 164 - AdivB * A / A == AdivB ok 165 - AdivB * B + 2 * AmodB - AmodB == A ok 166 - AdivB * B / B == AdivB ok 167 - AdivB * A + 2 * AmodB - AmodB == B ok 168 - AdivB * A / A == AdivB ok 169 - AdivB * B + 2 * AmodB - AmodB == A ok 170 - AdivB * B / B == AdivB ok 171 - AdivB * A + 2 * AmodB - AmodB == B ok 172 - AdivB * A / A == AdivB ok 173 - AdivB * B + 2 * AmodB - AmodB == A ok 174 - AdivB * B / B == AdivB ok 175 - AdivB * A + 2 * AmodB - AmodB == B ok 176 - AdivB * A / A == AdivB ok 177 - AdivB * B + 2 * AmodB - AmodB == A ok 178 - AdivB * B / B == AdivB ok 179 - AdivB * A + 2 * AmodB - AmodB == B ok 180 - AdivB * A / A == AdivB ok 181 - AdivB * B + 2 * AmodB - AmodB == A ok 182 - AdivB * B / B == AdivB ok 183 - AdivB * A + 2 * AmodB - AmodB == B ok 184 - AdivB * A / A == AdivB ok 185 - AdivB * B + 2 * AmodB - AmodB == A ok 186 - AdivB * B / B == AdivB ok 187 - AdivB * A + 2 * AmodB - AmodB == B ok 188 - AdivB * A / A == AdivB ok 189 - AdivB * B + 2 * AmodB - AmodB == A ok 190 - AdivB * B / B == AdivB ok 191 - AdivB * A + 2 * AmodB - AmodB == B ok 192 - AdivB * A / A == AdivB ok 193 - AdivB * B + 2 * AmodB - AmodB == A ok 194 - AdivB * B / B == AdivB ok 195 - AdivB * A + 2 * AmodB - AmodB == B ok 196 - AdivB * A / A == AdivB ok 197 - AdivB * B + 2 * AmodB - AmodB == A ok 198 - AdivB * B / B == AdivB ok 199 - AdivB * A + 2 * AmodB - AmodB == B ok 200 - AdivB * A / A == AdivB ok 201 - AdivB * B + 2 * AmodB - AmodB == A ok 202 - AdivB * B / B == AdivB ok 203 - AdivB * A + 2 * AmodB - AmodB == B ok 204 - AdivB * A / A == AdivB ok 205 - AdivB * B + 2 * AmodB - AmodB == A ok 206 - AdivB * B / B == AdivB ok 207 - AdivB * A + 2 * AmodB - AmodB == B ok 208 - AdivB * A / A == AdivB ok 209 - AdivB * B + 2 * AmodB - AmodB == A ok 210 - AdivB * B / B == AdivB ok 211 - AdivB * A + 2 * AmodB - AmodB == B ok 212 - AdivB * A / A == AdivB ok 213 - AdivB * B + 2 * AmodB - AmodB == A ok 214 - AdivB * B / B == AdivB ok 215 - AdivB * A + 2 * AmodB - AmodB == B ok 216 - AdivB * A / A == AdivB ok 217 - AdivB * B + 2 * AmodB - AmodB == A ok 218 - AdivB * B / B == AdivB ok 219 - AdivB * A + 2 * AmodB - AmodB == B ok 220 - AdivB * A / A == AdivB ok 221 - AdivB * B + 2 * AmodB - AmodB == A ok 222 - AdivB * B / B == AdivB ok 223 - AdivB * A + 2 * AmodB - AmodB == B ok 224 - AdivB * A / A == AdivB ok 225 - AdivB * B + 2 * AmodB - AmodB == A ok 226 - AdivB * B / B == AdivB ok 227 - AdivB * A + 2 * AmodB - AmodB == B ok 228 - AdivB * A / A == AdivB ok 229 - AdivB * B + 2 * AmodB - AmodB == A ok 230 - AdivB * B / B == AdivB ok 231 - AdivB * A + 2 * AmodB - AmodB == B ok 232 - AdivB * A / A == AdivB ok 233 - AdivB * B + 2 * AmodB - AmodB == A ok 234 - AdivB * B / B == AdivB ok 235 - AdivB * A + 2 * AmodB - AmodB == B ok 236 - AdivB * A / A == AdivB ok 237 - AdivB * B + 2 * AmodB - AmodB == A ok 238 - AdivB * B / B == AdivB ok 239 - AdivB * A + 2 * AmodB - AmodB == B ok 240 - AdivB * A / A == AdivB ok 241 - AdivB * B + 2 * AmodB - AmodB == A ok 242 - AdivB * B / B == AdivB ok 243 - AdivB * A + 2 * AmodB - AmodB == B ok 244 - AdivB * A / A == AdivB ok 245 - AdivB * B + 2 * AmodB - AmodB == A ok 246 - AdivB * B / B == AdivB ok 247 - AdivB * A + 2 * AmodB - AmodB == B ok 248 - AdivB * A / A == AdivB ok 249 - AdivB * B + 2 * AmodB - AmodB == A ok 250 - AdivB * B / B == AdivB ok 251 - AdivB * A + 2 * AmodB - AmodB == B ok 252 - AdivB * A / A == AdivB ok 253 - AdivB * B + 2 * AmodB - AmodB == A ok 254 - AdivB * B / B == AdivB ok 255 - AdivB * A + 2 * AmodB - AmodB == B ok 256 - AdivB * A / A == AdivB ok 257 - AdivB * B + 2 * AmodB - AmodB == A ok 258 - AdivB * B / B == AdivB ok 259 - AdivB * A + 2 * AmodB - AmodB == B ok 260 - AdivB * A / A == AdivB ok 261 - AdivB * B + 2 * AmodB - AmodB == A ok 262 - AdivB * B / B == AdivB ok 263 - AdivB * A + 2 * AmodB - AmodB == B ok 264 - AdivB * A / A == AdivB ok 265 - AdivB * B + 2 * AmodB - AmodB == A ok 266 - AdivB * B / B == AdivB ok 267 - AdivB * A + 2 * AmodB - AmodB == B ok 268 - AdivB * A / A == AdivB ok 269 - AdivB * B + 2 * AmodB - AmodB == A ok 270 - AdivB * B / B == AdivB ok 271 - AdivB * A + 2 * AmodB - AmodB == B ok 272 - AdivB * A / A == AdivB ok 273 - AdivB * B + 2 * AmodB - AmodB == A ok 274 - AdivB * B / B == AdivB ok 275 - AdivB * A + 2 * AmodB - AmodB == B ok 276 - AdivB * A / A == AdivB ok 277 - AdivB * B + 2 * AmodB - AmodB == A ok 278 - AdivB * B / B == AdivB ok 279 - AdivB * A + 2 * AmodB - AmodB == B ok 280 - AdivB * A / A == AdivB ok 281 - AdivB * B + 2 * AmodB - AmodB == A ok 282 - AdivB * B / B == AdivB ok 283 - AdivB * A + 2 * AmodB - AmodB == B ok 284 - AdivB * A / A == AdivB ok 285 - AdivB * B + 2 * AmodB - AmodB == A ok 286 - AdivB * B / B == AdivB ok 287 - AdivB * A + 2 * AmodB - AmodB == B ok 288 - AdivB * A / A == AdivB ok 289 - AdivB * B + 2 * AmodB - AmodB == A ok 290 - AdivB * B / B == AdivB ok 291 - AdivB * A + 2 * AmodB - AmodB == B ok 292 - AdivB * A / A == AdivB ok 293 - AdivB * B + 2 * AmodB - AmodB == A ok 294 - AdivB * B / B == AdivB ok 295 - AdivB * A + 2 * AmodB - AmodB == B ok 296 - AdivB * A / A == AdivB ok 297 - AdivB * B + 2 * AmodB - AmodB == A ok 298 - AdivB * B / B == AdivB ok 299 - AdivB * A + 2 * AmodB - AmodB == B ok 300 - AdivB * A / A == AdivB ok 301 - AdivB * B + 2 * AmodB - AmodB == A ok 302 - AdivB * B / B == AdivB ok 303 - AdivB * A + 2 * AmodB - AmodB == B ok 304 - AdivB * A / A == AdivB ok 305 - AdivB * B + 2 * AmodB - AmodB == A ok 306 - AdivB * B / B == AdivB ok 307 - AdivB * A + 2 * AmodB - AmodB == B ok 308 - AdivB * A / A == AdivB ok 309 - AdivB * B + 2 * AmodB - AmodB == A ok 310 - AdivB * B / B == AdivB ok 311 - AdivB * A + 2 * AmodB - AmodB == B ok 312 - AdivB * A / A == AdivB ok 313 - AdivB * B + 2 * AmodB - AmodB == A ok 314 - AdivB * B / B == AdivB ok 315 - AdivB * A + 2 * AmodB - AmodB == B ok 316 - AdivB * A / A == AdivB ok 317 - AdivB * B + 2 * AmodB - AmodB == A ok 318 - AdivB * B / B == AdivB ok 319 - AdivB * A + 2 * AmodB - AmodB == B ok 320 - AdivB * A / A == AdivB ok 321 - AdivB * B + 2 * AmodB - AmodB == A ok 322 - AdivB * B / B == AdivB ok 323 - AdivB * A + 2 * AmodB - AmodB == B ok 324 - AdivB * A / A == AdivB ok 325 - AdivB * B + 2 * AmodB - AmodB == A ok 326 - AdivB * B / B == AdivB ok 327 - AdivB * A + 2 * AmodB - AmodB == B ok 328 - AdivB * A / A == AdivB ok 329 - AdivB * B + 2 * AmodB - AmodB == A ok 330 - AdivB * B / B == AdivB ok 331 - AdivB * A + 2 * AmodB - AmodB == B ok 332 - AdivB * A / A == AdivB ok 333 - AdivB * B + 2 * AmodB - AmodB == A ok 334 - AdivB * B / B == AdivB ok 335 - AdivB * A + 2 * AmodB - AmodB == B ok 336 - AdivB * A / A == AdivB ok 337 - AdivB * B + 2 * AmodB - AmodB == A ok 338 - AdivB * B / B == AdivB ok 339 - AdivB * A + 2 * AmodB - AmodB == B ok 340 - AdivB * A / A == AdivB ok 341 - AdivB * B + 2 * AmodB - AmodB == A ok 342 - AdivB * B / B == AdivB ok 343 - AdivB * A + 2 * AmodB - AmodB == B ok 344 - AdivB * A / A == AdivB ok 345 - AdivB * B + 2 * AmodB - AmodB == A ok 346 - AdivB * B / B == AdivB ok 347 - AdivB * A + 2 * AmodB - AmodB == B ok 348 - AdivB * A / A == AdivB ok 349 - AdivB * B + 2 * AmodB - AmodB == A ok 350 - AdivB * B / B == AdivB ok 351 - AdivB * A + 2 * AmodB - AmodB == B ok 352 - AdivB * A / A == AdivB ok 353 - AdivB * B + 2 * AmodB - AmodB == A ok 354 - AdivB * B / B == AdivB ok 355 - AdivB * A + 2 * AmodB - AmodB == B ok 356 - AdivB * A / A == AdivB ok 357 - AdivB * B + 2 * AmodB - AmodB == A ok 358 - AdivB * B / B == AdivB ok 359 - AdivB * A + 2 * AmodB - AmodB == B ok 360 - AdivB * A / A == AdivB ok 361 - AdivB * B + 2 * AmodB - AmodB == A ok 362 - AdivB * B / B == AdivB ok 363 - AdivB * A + 2 * AmodB - AmodB == B ok 364 - AdivB * A / A == AdivB ok 365 - AdivB * B + 2 * AmodB - AmodB == A ok 366 - AdivB * B / B == AdivB ok 367 - AdivB * A + 2 * AmodB - AmodB == B ok 368 - AdivB * A / A == AdivB ok 369 - AdivB * B + 2 * AmodB - AmodB == A ok 370 - AdivB * B / B == AdivB ok 371 - AdivB * A + 2 * AmodB - AmodB == B ok 372 - AdivB * A / A == AdivB ok 373 - AdivB * B + 2 * AmodB - AmodB == A ok 374 - AdivB * B / B == AdivB ok 375 - AdivB * A + 2 * AmodB - AmodB == B ok 376 - AdivB * A / A == AdivB ok 377 - AdivB * B + 2 * AmodB - AmodB == A ok 378 - AdivB * B / B == AdivB ok 379 - AdivB * A + 2 * AmodB - AmodB == B ok 380 - AdivB * A / A == AdivB ok 381 - AdivB * B + 2 * AmodB - AmodB == A ok 382 - AdivB * B / B == AdivB ok 383 - AdivB * A + 2 * AmodB - AmodB == B ok 384 - AdivB * A / A == AdivB ok 385 - AdivB * B + 2 * AmodB - AmodB == A ok 386 - AdivB * B / B == AdivB ok 387 - AdivB * A + 2 * AmodB - AmodB == B ok 388 - AdivB * A / A == AdivB ok 389 - AdivB * B + 2 * AmodB - AmodB == A ok 390 - AdivB * B / B == AdivB ok 391 - AdivB * A + 2 * AmodB - AmodB == B ok 392 - AdivB * A / A == AdivB ok 393 - AdivB * B + 2 * AmodB - AmodB == A ok 394 - AdivB * B / B == AdivB ok 395 - AdivB * A + 2 * AmodB - AmodB == B ok 396 - AdivB * A / A == AdivB ok 397 - AdivB * B + 2 * AmodB - AmodB == A ok 398 - AdivB * B / B == AdivB ok 399 - AdivB * A + 2 * AmodB - AmodB == B ok 400 - AdivB * A / A == AdivB ok 401 - AdivB * B + 2 * AmodB - AmodB == A ok 402 - AdivB * B / B == AdivB ok 403 - AdivB * A + 2 * AmodB - AmodB == B ok 404 - AdivB * A / A == AdivB ok 405 - AdivB * B + 2 * AmodB - AmodB == A ok 406 - AdivB * B / B == AdivB ok 407 - AdivB * A + 2 * AmodB - AmodB == B ok 408 - AdivB * A / A == AdivB ok 409 - AdivB * B + 2 * AmodB - AmodB == A ok 410 - AdivB * B / B == AdivB ok 411 - AdivB * A + 2 * AmodB - AmodB == B ok 412 - AdivB * A / A == AdivB ok 413 - AdivB * B + 2 * AmodB - AmodB == A ok 414 - AdivB * B / B == AdivB ok 415 - AdivB * A + 2 * AmodB - AmodB == B ok 416 - AdivB * A / A == AdivB ok 417 - AdivB * B + 2 * AmodB - AmodB == A ok 418 - AdivB * B / B == AdivB ok 419 - AdivB * A + 2 * AmodB - AmodB == B ok 420 - AdivB * A / A == AdivB ok 421 - AdivB * B + 2 * AmodB - AmodB == A ok 422 - AdivB * B / B == AdivB ok 423 - AdivB * A + 2 * AmodB - AmodB == B ok 424 - AdivB * A / A == AdivB ok 425 - AdivB * B + 2 * AmodB - AmodB == A ok 426 - AdivB * B / B == AdivB ok 427 - AdivB * A + 2 * AmodB - AmodB == B ok 428 - AdivB * A / A == AdivB ok 429 - AdivB * B + 2 * AmodB - AmodB == A ok 430 - AdivB * B / B == AdivB ok 431 - AdivB * A + 2 * AmodB - AmodB == B ok 432 - AdivB * A / A == AdivB ok 433 - AdivB * B + 2 * AmodB - AmodB == A ok 434 - AdivB * B / B == AdivB ok 435 - AdivB * A + 2 * AmodB - AmodB == B ok 436 - AdivB * A / A == AdivB ok 437 - AdivB * B + 2 * AmodB - AmodB == A ok 438 - AdivB * B / B == AdivB ok 439 - AdivB * A + 2 * AmodB - AmodB == B ok 440 - AdivB * A / A == AdivB ok 441 - AdivB * B + 2 * AmodB - AmodB == A ok 442 - AdivB * B / B == AdivB ok 443 - AdivB * A + 2 * AmodB - AmodB == B ok 444 - AdivB * A / A == AdivB ok 445 - AdivB * B + 2 * AmodB - AmodB == A ok 446 - AdivB * B / B == AdivB ok 447 - AdivB * A + 2 * AmodB - AmodB == B ok 448 - AdivB * A / A == AdivB ok 449 - AdivB * B + 2 * AmodB - AmodB == A ok 450 - AdivB * B / B == AdivB ok 451 - AdivB * A + 2 * AmodB - AmodB == B ok 452 - AdivB * A / A == AdivB ok 453 - AdivB * B + 2 * AmodB - AmodB == A ok 454 - AdivB * B / B == AdivB ok 455 - AdivB * A + 2 * AmodB - AmodB == B ok 456 - AdivB * A / A == AdivB ok 457 - AdivB * B + 2 * AmodB - AmodB == A ok 458 - AdivB * B / B == AdivB ok 459 - AdivB * A + 2 * AmodB - AmodB == B ok 460 - AdivB * A / A == AdivB ok 461 - AdivB * B + 2 * AmodB - AmodB == A ok 462 - AdivB * B / B == AdivB ok 463 - AdivB * A + 2 * AmodB - AmodB == B ok 464 - AdivB * A / A == AdivB ok 465 - AdivB * B + 2 * AmodB - AmodB == A ok 466 - AdivB * B / B == AdivB ok 467 - AdivB * A + 2 * AmodB - AmodB == B ok 468 - AdivB * A / A == AdivB ok 469 # skip $A and/or $B are zero. ok 470 # skip $A and/or $B are zero. ok 471 # skip $A and/or $B are zero. ok 472 # skip $A and/or $B are zero. ok 473 - AdivB * B + 2 * AmodB - AmodB == A ok 474 - AdivB * B / B == AdivB ok 475 - AdivB * A + 2 * AmodB - AmodB == B ok 476 - AdivB * A / A == AdivB ok 477 - AdivB * B + 2 * AmodB - AmodB == A ok 478 - AdivB * B / B == AdivB ok 479 - AdivB * A + 2 * AmodB - AmodB == B ok 480 - AdivB * A / A == AdivB ok 481 - AdivB * B + 2 * AmodB - AmodB == A ok 482 - AdivB * B / B == AdivB ok 483 - AdivB * A + 2 * AmodB - AmodB == B ok 484 - AdivB * A / A == AdivB ok 485 - AdivB * B + 2 * AmodB - AmodB == A ok 486 - AdivB * B / B == AdivB ok 487 - AdivB * A + 2 * AmodB - AmodB == B ok 488 - AdivB * A / A == AdivB ok 489 - AdivB * B + 2 * AmodB - AmodB == A ok 490 - AdivB * B / B == AdivB ok 491 - AdivB * A + 2 * AmodB - AmodB == B ok 492 - AdivB * A / A == AdivB ok 493 - AdivB * B + 2 * AmodB - AmodB == A ok 494 - AdivB * B / B == AdivB ok 495 - AdivB * A + 2 * AmodB - AmodB == B ok 496 - AdivB * A / A == AdivB ok 497 - AdivB * B + 2 * AmodB - AmodB == A ok 498 - AdivB * B / B == AdivB ok 499 - AdivB * A + 2 * AmodB - AmodB == B ok 500 - AdivB * A / A == AdivB ok 501 - AdivB * B + 2 * AmodB - AmodB == A ok 502 - AdivB * B / B == AdivB ok 503 - AdivB * A + 2 * AmodB - AmodB == B ok 504 - AdivB * A / A == AdivB ok 505 - AdivB * B + 2 * AmodB - AmodB == A ok 506 - AdivB * B / B == AdivB ok 507 - AdivB * A + 2 * AmodB - AmodB == B ok 508 - AdivB * A / A == AdivB ok 509 - AdivB * B + 2 * AmodB - AmodB == A ok 510 - AdivB * B / B == AdivB ok 511 - AdivB * A + 2 * AmodB - AmodB == B ok 512 - AdivB * A / A == AdivB ok t/mbimbf.t .................... 1..764 ok 1 - ${"Math::BigInt::accuracy"} ok 2 - ${"Math::BigInt::precision"} ok 3 - Math::BigInt->accuracy() ok 4 - Math::BigInt->precision() ok 5 - ${"Math::BigInt::div_scale"} ok 6 - ${"Math::BigInt::round_mode"} ok 7 - Math::BigInt->round_mode() ok 8 - ${"Math::BigFloat::accuracy"} ok 9 - ${"Math::BigFloat::precision"} ok 10 - Math::BigFloat->precision() ok 11 - Math::BigFloat->precision() ok 12 - ${"Math::BigFloat::div_scale"} ok 13 - ${"Math::BigFloat::round_mode"} ok 14 - Math::BigFloat->round_mode() ok 15 - Math::BigInt->accuracy() ok 16 - Math::BigInt->precision() ok 17 - Math::BigInt->round_mode() ok 18 - Math::BigInt->div_scale() ok 19 - Math::BigInt->div_scale(20) ok 20 - Math::BigInt->div_scale() ok 21 - Math::BigInt->round_mode("odd") ok 22 - Math::BigInt->round_mode() ok 23 - Math::BigInt->accuracy(2) ok 24 - Math::BigInt->accuracy() ok 25 - Math::BigInt->accuracy(undef) ok 26 - Math::BigInt->precision(2) ok 27 - Math::BigInt->precision(-2) ok 28 - Math::BigInt->precision() ok 29 - Math::BigInt->precision(undef) ok 30 - Math::BigFloat->accuracy() ok 31 - Math::BigFloat->precision() ok 32 - Math::BigFloat->round_mode() ok 33 - Math::BigFloat->div_scale() ok 34 - Math::BigFloat->div_scale(20) ok 35 - Math::BigFloat->div_scale() ok 36 - Math::BigFloat->round_mode("odd") ok 37 - Math::BigFloat->round_mode() ok 38 - Math::BigFloat->accuracy(2) ok 39 - Math::BigFloat->accuracy() ok 40 - Math::BigFloat->accuracy(undef) ok 41 - Math::BigFloat->precision(2) ok 42 - Math::BigFloat->precision(-2) ok 43 - Math::BigFloat->precision() ok 44 - Math::BigFloat->precision(undef) ok 45 - ${"Math::BigFloat::accuracy"} = 5 ok 46 - ${"Math::BigInt::accuracy"} = 5 ok 47 - ${"Math::BigFloat::accuracy"} = 42 ok 48 - ${"Math::BigInt::accuracy"} = 42 ok 49 - ${"Math::BigFloat::accuracy"} = -1 ok 50 - ${"Math::BigInt::accuracy"} = -1 ok 51 - ${"Math::BigFloat::accuracy"} = 0 ok 52 - ${"Math::BigInt::accuracy"} = 0 ok 53 - ${"Math::BigFloat::accuracy"} = undef ok 54 - ${"Math::BigInt::accuracy"} = undef ok 55 - ${"Math::BigFloat::precision"} = 5 ok 56 - ${"Math::BigInt::precision"} = 5 ok 57 - ${"Math::BigFloat::precision"} = 42 ok 58 - ${"Math::BigInt::precision"} = 42 ok 59 - ${"Math::BigFloat::precision"} = -1 ok 60 - ${"Math::BigInt::precision"} = -1 ok 61 - ${"Math::BigFloat::precision"} = 0 ok 62 - ${"Math::BigInt::precision"} = 0 ok 63 - ${"Math::BigFloat::precision"} = undef ok 64 - ${"Math::BigInt::precision"} = undef ok 65 - ${"Math::BigFloat::div_scale"} = 5 ok 66 - ${"Math::BigInt::div_scale"} = 5 ok 67 - ${"Math::BigFloat::div_scale"} = 42 ok 68 - ${"Math::BigInt::div_scale"} = 42 ok 69 - ${"Math::BigFloat::div_scale"} = 1 ok 70 - ${"Math::BigInt::div_scale"} = 1 ok 71 - ${"Math::BigFloat::round_mode"} = "odd" ok 72 - ${"Math::BigInt::round_mode"} = "odd" ok 73 - ${"Math::BigFloat::round_mode"} = "even" ok 74 - ${"Math::BigInt::round_mode"} = "even" ok 75 - ${"Math::BigFloat::round_mode"} = "zero" ok 76 - ${"Math::BigInt::round_mode"} = "zero" ok 77 - ${"Math::BigFloat::round_mode"} = "trunc" ok 78 - ${"Math::BigInt::round_mode"} = "trunc" ok 79 - ${"Math::BigFloat::round_mode"} = "+inf" ok 80 - ${"Math::BigInt::round_mode"} = "+inf" ok 81 - ${"Math::BigFloat::round_mode"} = "-inf" ok 82 - ${"Math::BigInt::round_mode"} = "-inf" ok 83 - ${"Math::BigFloat::round_mode"} ok 84 - ${"Math::BigInt::round_mode"} ok 85 - $x->accuracy() ok 86 - $x->accuracy(5) ok 87 - $x->accuracy(undef) ok 88 - $x->precision() ok 89 - $x->precision(5) ok 90 - $x->precision(undef) ok 91 - ${"Math::BigInt::accuracy"} = 42 ok 92 - ${"Math::BigFloat::accuracy"} = 64 ok 93 - ${"Math::BigInt::accuracy"} = 42 ok 94 - ${"Math::BigFloat::accuracy"} = 64 ok 95 - Math::BigInt->new(123456) = 123500 ok 96 - Math::BigInt->new(123456) = 123000 ok 97 - Math::BigFloat->new("123.456") = 123.5 ok 98 - Math::BigFloat->new("123.456") = 123.5 ok 99 - Math::BigFloat->new("123.456") = 123.456 ok 100 - $x = Math::BigFloat->new("123.456"); $x->accuracy(4) ok 101 - $x = Math::BigFloat->new("123.456"); $x->precision(-2) ok 102 - $x = Math::BigInt->new(123456); $x->accuracy(4) ok 103 - $x = Math::BigInt->new(123456); $x->precision(2) ok 104 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5) ok 105 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(4) ok 106 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5, 2) ok 107 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, -2) ok 108 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, 2) ok 109 - $x = Math::BigInt->new("123"); $x->round(5, 2) ok 110 - $x = Math::BigFloat->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 111 - $x = Math::BigFloat->new("123.4567"); $y = $x->copy()->bround() ok 112 - $y = $x->copy()->round(5); $y->accuracy() ok 113 - $y = $x->copy()->round(5); $y->precision() ok 114 - $y = $x->copy()->round(undef, 2); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 116 - $x = $mbf->new("123.4567") ok 117 - $x->accuracy(4) ok 118 - $x->precision(-2) ok 119 - $x->accuracy() ok 120 - $x = $mbf->new("123.4567") ok 121 - $x->precision(-2) ok 122 - $x->accuracy(4) ok 123 - $x->precision() ok 124 - $z = $x->copy(); $z->accuracy() ok 125 - $z = $x->copy(); $z->precision() ok 126 - $x->copy()->bdiv(3, 4) ok 127 - $x->copy()->bdiv(3, 8) ok 128 - $x->copy()->bdiv(3, 16) ok 129 - $x->copy()->bdiv(3, 32) ok 130 - $x = Math::BigInt->bzero(); $x->accuracy(5); $x->{accuracy} ok 131 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{precision} ok 132 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{accuracy} ok 133 - $x = Math::BigInt->new(0); $x->precision(5); $x->{precision} ok 134 - $x = Math::BigInt->bzero(); $x->round(5); $x->{accuracy} ok 135 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{precision} ok 136 - $x = Math::BigInt->new(0); $x->round(5); $x->{accuracy} ok 137 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{precision} ok 138 - $x = Math::BigInt->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 139 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{accuracy} ok 140 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{precision} ok 141 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{accuracy} ok 142 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{precision} ok 143 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{accuracy} ok 144 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{precision} ok 145 - $x = Math::BigFloat->new(0); $x->round(5); $x->{accuracy} ok 146 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{precision} ok 147 - $x = Math::BigFloat->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 148 - Math::BigInt->new(123)->badd(123) ok 149 - Math::BigInt->badd(123, 321) ok 150 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 151 - Math::BigInt->new(123)->bsub(122) ok 152 - Math::BigInt->bsub(321, 123) ok 153 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 154 - Math::BigInt->new(123)->bmul(123) ok 155 - Math::BigInt->bmul(123, 123) ok 156 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 157 - Math::BigInt->new(15131)->bmod(123) ok 158 - Math::BigInt->bmod(15131, 123) ok 159 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 160 - Math::BigInt->new(2)->bpow(16) ok 161 - Math::BigInt->bpow(2, 16) ok 162 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 163 - Math::BigInt->new(2**15)->brsft(1) ok 164 - Math::BigInt->brsft(2**15, 1) ok 165 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 166 - Math::BigInt->new(2**13)->blsft(1) ok 167 - Math::BigInt->blsft(2**13, 1) ok 168 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 169 - Math::BigFloat->new(123)->badd(123) ok 170 - Math::BigFloat->badd(123, 321) ok 171 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 172 - Math::BigFloat->new(123)->bsub(122) ok 173 - Math::BigFloat->bsub(321, 123) ok 174 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 175 - Math::BigFloat->new(123)->bmul(123) ok 176 - Math::BigFloat->bmul(123, 123) ok 177 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 178 - Math::BigFloat->new(15131)->bmod(123) ok 179 - Math::BigFloat->bmod(15131, 123) ok 180 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 181 - Math::BigFloat->new(2)->bpow(16) ok 182 - Math::BigFloat->bpow(2, 16) ok 183 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 184 - Math::BigFloat->new(2**15)->brsft(1) ok 185 - Math::BigFloat->brsft(2**15, 1) ok 186 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 187 - Math::BigFloat->new(2**13)->blsft(1) ok 188 - Math::BigFloat->blsft(2**13, 1) ok 189 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{accuracy} ok 209 - $x->bdiv($y) ok 210 - $x->{accuracy} ok 211 - $x->bdiv($y) ok 212 - $x->{accuracy} ok 213 - $x->bdiv($y) ok 214 - $x->{accuracy} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{accuracy} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{accuracy} ok 253 - $x->bdiv($y) ok 254 - $x->{accuracy} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{accuracy} = 4 ok 260 - $y->{accuracy} = 4 ok 261 - $x->{precision} = undef ok 262 - $y->{precision} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{precision} = -2 ok 265 - $y->{precision} = -2 ok 266 - $x->{accuracy} = undef ok 267 - $y->{accuracy} = undef ok 268 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 269 - $x = "1.000" ok 270 - $x->{accuracy} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{accuracy} = 3 ok 274 - $x = "1230" # bround(n) should set accuracy ok 275 - $x = "1200" ok 276 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 277 - $x = "12300" ok 278 - $x->{accuracy} = 4 # bround(-n) should set accuracy ok 279 - $x = "12000" ok 280 - $x->{accuracy} = 3 # bround(-n) should set accuracy ok 281 - $x = "10000" ok 282 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 283 - $x = "0" ok 284 - $x->{accuracy} = 1 # bround(-n) should be no-op if n too big ok 285 - $x = "0" ok 286 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 287 - $x = "100000" ok 288 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 289 - $x = "100000" ok 290 - $x->{accuracy} = 0 # bround(n) should set accuracy ok 291 - $x = "12345" ok 292 - $x->{accuracy} = 5 # bround(n) should set accuracy ok 293 - $x = "12345" ok 294 - $x = "0.01" ok 295 - $x = "0.00" ok 296 - $x = "0.00" ok 297 - $x = "12340" ok 298 - $x = "12340" # MBI::bfround should clear A for negative P ok 299 - $x->{accuracy} = undef # test that bfround() and bround() work with large numbers ok 300 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 302 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" # rounding with already set precision/accuracy ok 303 - $x = "1.00000" # further rounding down ok 304 - $x->bfround(-2) = "1.00" ok 305 - $x->{precision} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{accuracy} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{accuracy} = 2 # mantissa/exponent format and A/P ok 310 - $x = "12350" ok 311 - $x->{accuracy} = 4 ok 312 - $x->{precision} = undef # check for no A/P in case of fallback result ok 313 - $x->{accuracy} = undef ok 314 - $x->{precision} = undef # result & remainder ok 315 - $x->{accuracy} = undef ok 316 - $x->{precision} = undef ok 317 - $y->{accuracy} = undef ok 318 - $y->{precision} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x = Math::BigInt->new(2)->bzero(); $x->{accuracy} ok 348 - $x = Math::BigInt->new(2)->bzero(); $x->{precision} ok 349 - $x = Math::BigInt->new(2)->bone(); $x->{accuracy} ok 350 - $x = Math::BigInt->new(2)->bone(); $x->{precision} ok 351 - $x = Math::BigInt->new(2)->binf(); $x->{accuracy} ok 352 - $x = Math::BigInt->new(2)->binf(); $x->{precision} ok 353 - $x = Math::BigInt->new(2)->bnan(); $x->{accuracy} ok 354 - $x = Math::BigInt->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 355 - $x = Math::BigInt->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 356 - $x = Math::BigInt->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 357 - $x = Math::BigInt->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 358 - $x = Math::BigInt->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 359 - $x = Math::BigInt->new(2, 1); $x->{accuracy} ok 360 - $x = Math::BigInt->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 361 - $x = Math::BigInt->new(2, undef, 1); $x->{accuracy} ok 362 - $x = Math::BigInt->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 363 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{accuracy} ok 364 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 365 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{accuracy} ok 366 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 367 - $x = Math::BigInt->new(2, 1)->bone(); $x->{accuracy} ok 368 - $x = Math::BigInt->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 369 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{accuracy} ok 370 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 371 - $x = Math::BigInt->new(2); $x->{accuracy} ok 372 - $x = Math::BigInt->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 373 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 374 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 375 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 376 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 377 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 378 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 379 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{accuracy} ok 380 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 381 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 382 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{precision} ok 383 - $x = Math::BigFloat->new(2)->bzero(); $x->{accuracy} ok 384 - $x = Math::BigFloat->new(2)->bzero(); $x->{precision} ok 385 - $x = Math::BigFloat->new(2)->bone(); $x->{accuracy} ok 386 - $x = Math::BigFloat->new(2)->bone(); $x->{precision} ok 387 - $x = Math::BigFloat->new(2)->binf(); $x->{accuracy} ok 388 - $x = Math::BigFloat->new(2)->binf(); $x->{precision} ok 389 - $x = Math::BigFloat->new(2)->bnan(); $x->{accuracy} ok 390 - $x = Math::BigFloat->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 391 - $x = Math::BigFloat->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 392 - $x = Math::BigFloat->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 393 - $x = Math::BigFloat->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 394 - $x = Math::BigFloat->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 395 - $x = Math::BigFloat->new(2, 1); $x->{accuracy} ok 396 - $x = Math::BigFloat->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 397 - $x = Math::BigFloat->new(2, undef, 1); $x->{accuracy} ok 398 - $x = Math::BigFloat->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 399 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{accuracy} ok 400 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 401 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{accuracy} ok 402 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 403 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{accuracy} ok 404 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 405 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{accuracy} ok 406 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 407 - $x = Math::BigFloat->new(2); $x->{accuracy} ok 408 - $x = Math::BigFloat->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 409 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 410 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 411 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 412 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 413 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 414 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 415 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{accuracy} ok 416 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 417 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 418 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{precision} # Verify that class accuracy is copied into new objects. ok 419 - Math::BigInt->accuracy(3); $x = Math::BigInt->bzero(); $x->accuracy() ok 420 - Math::BigInt->accuracy(3); $x = Math::BigInt->bone(); $x->accuracy() ok 421 - Math::BigInt->accuracy(3); $x = Math::BigInt->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 422 - Math::BigInt->precision(-4); $x = Math::BigInt->bzero(); $x->precision() ok 423 - Math::BigInt->precision(-4); $x = Math::BigInt->bone(); $x->precision() ok 424 - Math::BigInt->precision(-4); $x = Math::BigInt->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 425 - Math::BigInt->accuracy(2); $x = Math::BigInt->bzero(5); $x->accuracy() ok 426 # skip 1 ok 427 - Math::BigInt->accuracy(2); $x = Math::BigInt->bone("+", 5); $x->accuracy() ok 428 # skip 1 ok 429 - Math::BigInt->accuracy(2); $x = Math::BigInt->new(2, 5); $x->accuracy() ok 430 # skip 1 # Verify that setting precision as method argument overrides class variable ok 431 - Math::BigInt->precision(-2); $x = Math::BigInt->bzero(undef, -6); $x->precision() ok 432 # skip 1 ok 433 - Math::BigInt->precision(-2); $x = Math::BigInt->bone("+", undef, -6); $x->precision() ok 434 # skip 1 ok 435 - Math::BigInt->precision(-2); $x = Math::BigInt->new(2, undef, -6); $x->precision() ok 436 # skip 1 # Verify that class accuracy is copied into new objects. ok 437 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->bzero(); $x->accuracy() ok 438 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->bone(); $x->accuracy() ok 439 - Math::BigFloat->accuracy(3); $x = Math::BigFloat->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 440 - Math::BigFloat->precision(-4); $x = Math::BigFloat->bzero(); $x->precision() ok 441 - Math::BigFloat->precision(-4); $x = Math::BigFloat->bone(); $x->precision() ok 442 - Math::BigFloat->precision(-4); $x = Math::BigFloat->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 443 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->bzero(5); $x->accuracy() ok 444 # skip 1 ok 445 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->bone("+", 5); $x->accuracy() ok 446 # skip 1 ok 447 - Math::BigFloat->accuracy(2); $x = Math::BigFloat->new(2, 5); $x->accuracy() ok 448 # skip 1 # Verify that setting precision as method argument overrides class variable ok 449 - Math::BigFloat->precision(-2); $x = Math::BigFloat->bzero(undef, -6); $x->precision() ok 450 # skip 1 ok 451 - Math::BigFloat->precision(-2); $x = Math::BigFloat->bone("+", undef, -6); $x->precision() ok 452 # skip 1 ok 453 - Math::BigFloat->precision(-2); $x = Math::BigFloat->new(2, undef, -6); $x->precision() ok 454 # skip 1 ok 455 - mixing A and P creates a NaN ok 456 - $class->new(123) = "NaN" ok 457 - mixing A and P creates a NaN ok 458 - $class->new(123) = "NaN" ok 459 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->badd($y); ok 460 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bsub($y); ok 461 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmul($y); ok 462 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bpow($y); ok 463 - my $x = Math::BigInt->new(1234); $x->accuracy(5); my $y = Math::BigInt->new(12); $y->precision(-3); $x->bmod($y); ok 464 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->badd($y); ok 465 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bsub($y); ok 466 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmul($y); ok 467 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bpow($y); ok 468 - my $x = Math::BigFloat->new(1234); $x->accuracy(5); my $y = Math::BigFloat->new(12); $y->precision(-3); $x->bmod($y); ok 469 - my $x = Math::BigInt->new(1234, 5, -3); ok 470 - my $x = Math::BigInt->bsqrt(1234, 5, -3); ok 471 - $x = 120 ok 472 - $x = 120 ok 473 - $x = 120 ok 474 - $x = 120 ok 475 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->badd($y); ok 476 - is a valid object ok 477 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->badd($y); ok 478 - is a valid object ok 479 - $x->{accuracy} == 3 ok 480 - $x->{precision} is undef ok 481 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->badd($y); ok 482 - is a valid object ok 483 - $x->{precision} == -3 ok 484 - $x->{accuracy} is undef ok 485 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->badd($y); ok 486 - is a valid object ok 487 - $x->{accuracy} == 3 ok 488 - $x->{precision} is undef ok 489 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->badd($y); ok 490 - is a valid object ok 491 - $x->{precision} == -3 ok 492 - $x->{accuracy} is undef ok 493 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->bmul($y); ok 494 - is a valid object ok 495 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("0"); $x->bmul($y); ok 496 - is a valid object ok 497 - $x->{accuracy} == 3 ok 498 - $x->{precision} is undef ok 499 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("0"); $x->bmul($y); ok 500 - is a valid object ok 501 - $x->{precision} == -3 ok 502 - $x->{accuracy} is undef ok 503 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->accuracy(3); $x->bmul($y); ok 504 - is a valid object ok 505 - $x->{accuracy} == 3 ok 506 - $x->{precision} is undef ok 507 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("0"); $y->precision(-3); $x->bmul($y); ok 508 - is a valid object ok 509 - $x->{precision} == -3 ok 510 - $x->{accuracy} is undef ok 511 - $x = Math::BigInt->new("123"); $x->accuracy(3); $y = Math::BigInt->new("1"); $x->bmul($y); ok 512 - is a valid object ok 513 - $x->{accuracy} == 3 ok 514 - $x->{precision} is undef ok 515 - $x = Math::BigInt->new("123"); $x->precision(-3); $y = Math::BigInt->new("1"); $x->bmul($y); ok 516 - is a valid object ok 517 - $x->{precision} == -3 ok 518 - $x->{accuracy} is undef ok 519 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(3); $x->bmul($y); ok 520 - is a valid object ok 521 - $x->{accuracy} == 3 ok 522 - $x->{precision} is undef ok 523 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-3); $x->bmul($y); ok 524 - is a valid object ok 525 - $x->{precision} == -3 ok 526 - $x->{accuracy} is undef ok 527 - $x = Math::BigInt->new("1"); $x->accuracy(3); $y = Math::BigInt->new("123"); $x->bmul($y); ok 528 - is a valid object ok 529 - $x->{accuracy} == 3 ok 530 - $x->{precision} is undef ok 531 - $x = Math::BigInt->new("1"); $x->precision(-3); $y = Math::BigInt->new("123"); $x->bmul($y); ok 532 - is a valid object ok 533 - $x->{precision} == -3 ok 534 - $x->{accuracy} is undef ok 535 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(3); $x->bmul($y); ok 536 - is a valid object ok 537 - $x->{accuracy} == 3 ok 538 - $x->{precision} is undef ok 539 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-3); $x->bmul($y); ok 540 - is a valid object ok 541 - $x->{precision} == -3 ok 542 - $x->{accuracy} is undef ok 543 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 544 - is a valid object ok 545 - $x = Math::BigInt->new("123"); $x->accuracy(4); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 546 - is a valid object ok 547 - $x->{accuracy} == 4 ok 548 - $x->{precision} is undef ok 549 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->accuracy(4); $x->bdiv($y); ok 550 - is a valid object ok 551 - $x->{accuracy} == 4 ok 552 - $x->{precision} is undef ok 553 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("1"); $y->precision(-4); $x->bdiv($y); ok 554 - is a valid object ok 555 - $x->{precision} == -4 ok 556 - $x->{accuracy} is undef ok 557 - $x = Math::BigInt->new("123"); $x->precision(-4); $y = Math::BigInt->new("1"); $x->bdiv($y); ok 558 - is a valid object ok 559 - $x->{precision} == -4 ok 560 - $x->{accuracy} is undef ok 561 - $x = Math::BigInt->new("1"); $x->accuracy(4); $y = Math::BigInt->new("123"); $x->bdiv($y); ok 562 - is a valid object ok 563 - $x->{accuracy} == 4 ok 564 - $x->{precision} is undef ok 565 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->accuracy(4); $x->bdiv($y); ok 566 - is a valid object ok 567 - $x->{accuracy} == 4 ok 568 - $x->{precision} is undef ok 569 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("123"); $y->precision(-4); $x->bdiv($y); ok 570 - is a valid object ok 571 - $x->{precision} == -4 ok 572 - $x->{accuracy} is undef ok 573 - $x = Math::BigInt->new("1"); $x->precision(-4); $y = Math::BigInt->new("123"); $x->bdiv($y); ok 574 - is a valid object ok 575 - $x->{precision} == -4 ok 576 - $x->{accuracy} is undef ok 577 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->band($y); ok 578 - is a valid object ok 579 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->band($y); ok 580 - is a valid object ok 581 - $x->{accuracy} == 1 ok 582 - $x->{precision} is undef ok 583 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->band($y); ok 584 - is a valid object ok 585 - $x->{accuracy} == 1 ok 586 - $x->{precision} is undef ok 587 - $x = Math::BigInt->new("1234"); $x->precision(-1); $y = Math::BigInt->new("0"); $x->band($y); ok 588 - is a valid object ok 589 - $x->{precision} == -1 ok 590 - $x->{accuracy} is undef ok 591 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(-1); $x->band($y); ok 592 - is a valid object ok 593 - $x->{precision} == -1 ok 594 - $x->{accuracy} is undef ok 595 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->band($y); ok 596 - is a valid object ok 597 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->band($y); ok 598 - is a valid object ok 599 - $x->{accuracy} == 2 ok 600 - $x->{precision} is undef ok 601 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->band($y); ok 602 - is a valid object ok 603 - $x->{accuracy} == 2 ok 604 - $x->{precision} is undef ok 605 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->band($y); ok 606 - is a valid object ok 607 - $x->{precision} == 1 ok 608 - $x->{accuracy} is undef ok 609 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->band($y); ok 610 - is a valid object ok 611 - $x->{precision} == 1 ok 612 - $x->{accuracy} is undef ok 613 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bxor($y); ok 614 - is a valid object ok 615 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->bxor($y); ok 616 - is a valid object ok 617 - $x->{accuracy} == 1 ok 618 - $x->{precision} is undef ok 619 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->bxor($y); ok 620 - is a valid object ok 621 - $x->{accuracy} == 1 ok 622 - $x->{precision} is undef ok 623 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->bxor($y); ok 624 - is a valid object ok 625 - $x->{precision} == 3 ok 626 - $x->{accuracy} is undef ok 627 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->bxor($y); ok 628 - is a valid object ok 629 - $x->{precision} == 3 ok 630 - $x->{accuracy} is undef ok 631 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->bxor($y); ok 632 - is a valid object ok 633 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->bxor($y); ok 634 - is a valid object ok 635 - $x->{accuracy} == 2 ok 636 - $x->{precision} is undef ok 637 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->accuracy(2); $x->bxor($y); ok 638 - is a valid object ok 639 - $x->{accuracy} == 2 ok 640 - $x->{precision} is undef ok 641 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->bxor($y); ok 642 - is a valid object ok 643 - $x->{precision} == 1 ok 644 - $x->{accuracy} is undef ok 645 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->bxor($y); ok 646 - is a valid object ok 647 - $x->{precision} == 1 ok 648 - $x->{accuracy} is undef ok 649 - $x = Math::BigInt->new("0xFF"); $x->accuracy(2); $y = Math::BigInt->new("0xFFF"); $x->bxor($y); ok 650 - is a valid object ok 651 - $x->{accuracy} == 2 ok 652 - $x->{precision} is undef ok 653 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->accuracy(2); $x->bxor($y); ok 654 - is a valid object ok 655 - $x->{accuracy} == 2 ok 656 - $x->{precision} is undef ok 657 - $x = Math::BigInt->new("0xFF"); $x->precision(2); $y = Math::BigInt->new("0xFFF"); $x->bxor($y); ok 658 - is a valid object ok 659 - $x->{precision} == 2 ok 660 - $x->{accuracy} is undef ok 661 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFFF"); $y->precision(2); $x->bxor($y); ok 662 - is a valid object ok 663 - $x->{precision} == 2 ok 664 - $x->{accuracy} is undef ok 665 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x->bior($y); ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("1234"); $x->accuracy(1); $y = Math::BigInt->new("0"); $x->bior($y); ok 668 - is a valid object ok 669 - $x->{accuracy} == 1 ok 670 - $x->{precision} is undef ok 671 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->accuracy(1); $x->bior($y); ok 672 - is a valid object ok 673 - $x->{accuracy} == 1 ok 674 - $x->{precision} is undef ok 675 - $x = Math::BigInt->new("1234"); $x->precision(3); $y = Math::BigInt->new("0"); $x->bior($y); ok 676 - is a valid object ok 677 - $x->{precision} == 3 ok 678 - $x->{accuracy} is undef ok 679 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); $y->precision(3); $x->bior($y); ok 680 - is a valid object ok 681 - $x->{precision} == 3 ok 682 - $x->{accuracy} is undef ok 683 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0x10"); $x->bior($y); ok 684 - is a valid object ok 685 - $x = Math::BigInt->new("250"); $x->accuracy(2); $y = Math::BigInt->new("0xFF"); $x->bior($y); ok 686 - is a valid object ok 687 - $x->{accuracy} == 2 ok 688 - $x->{precision} is undef ok 689 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("250"); $y->accuracy(2); $x->bior($y); ok 690 - is a valid object ok 691 - $x->{accuracy} == 2 ok 692 - $x->{precision} is undef ok 693 - $x = Math::BigInt->new("0xFF"); $x->precision(1); $y = Math::BigInt->new("0xFF"); $x->bior($y); ok 694 - is a valid object ok 695 - $x->{precision} == 1 ok 696 - $x->{accuracy} is undef ok 697 - $x = Math::BigInt->new("0xFF"); $y = Math::BigInt->new("0xFF"); $y->precision(1); $x->bior($y); ok 698 - is a valid object ok 699 - $x->{precision} == 1 ok 700 - $x->{accuracy} is undef ok 701 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x->bpow($y); ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x->bpow($y); ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("2"); $x->accuracy(2); $y = Math::BigInt->new("0"); $x->bpow($y); ok 706 - is a valid object ok 707 - $x->{accuracy} == 2 ok 708 - $x->{precision} is undef ok 709 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $y->accuracy(2); $x->bpow($y); ok 710 - is a valid object ok 711 - $x->{accuracy} == 2 ok 712 - $x->{precision} is undef ok 713 - $Math::BigInt::rnd_mode = "even" ok 714 - $Math::BigFloat::rnd_mode = "even" ok 715 - $mbi->round_mode("huhmbi") ok 716 - $mbf->round_mode("huhmbf") ok 717 - $Math::BigInt::rnd_mode = "huhmbi" ok 718 - $Math::BigFloat::rnd_mode = "huhmbf" ok 719 - $Math::BigInt::rnd_mode = "odd" ok 720 - $Math::BigInt::rnd_mode = "odd" ok 721 - set A ... ok 722 - ... and now P must be cleared ok 723 - set P ... ok 724 - ... and now A must be cleared ok 725 - set A ... ok 726 - ... and now P must be cleared ok 727 - set P ... ok 728 - ... and now A must be cleared ok 729 - Math::BigInt has A of 1 ok 730 - $x has A of 1 ok 731 - $x has A of 2 ok 732 - Math::BigInt has A of 3 ok 733 - $x still has A of 2 ok 734 - $x now has A of undef ok 735 - Math::BigInt still has A of 3 ok 736 - Math::BigInt now has A of undef ok 737 - Math::BigInt has A of 1 ok 738 - $x has A of 1 ok 739 - $x has A of 2 ok 740 - Math::BigInt has A of 3 ok 741 - $x still has A of 2 ok 742 - $x now has A of undef ok 743 - Math::BigInt still has A of 3 ok 744 - Math::BigInt now has A of undef ok 745 - Math::BigFloat has A of 1 ok 746 - $x has A of 1 ok 747 - $x has A of 2 ok 748 - Math::BigFloat has A of 3 ok 749 - $x still has A of 2 ok 750 - $x now has A of undef ok 751 - Math::BigFloat still has A of 3 ok 752 - Math::BigFloat now has A of undef ok 753 - Math::BigFloat has A of 1 ok 754 - $x has A of 1 ok 755 - $x has A of 2 ok 756 - Math::BigFloat has A of 3 ok 757 - $x still has A of 2 ok 758 - $x now has A of undef ok 759 - Math::BigFloat still has A of 3 ok 760 - Math::BigFloat now has A of undef ok 761 - bug with blog(Math::BigFloat, Math::BigInt) ok 762 - $x->bsqrt() with many digits ok 763 - $x->bsqrt() with many digits ok 764 - $x->bsqrt() with many digits ok t/mbr_ali.t ................... 1..6 ok 1 - Math::BigRat -> new(123) -> is_pos() ok 2 - Math::BigRat -> new(123) -> is_neg() ok 3 - Math::BigRat -> new(123) -> as_int() ok 4 - 'Math::BigRat -> new(123) -> as_int() isa Math::BigInt' isa 'Math::BigInt' ok 5 - Math::BigRat -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigRat -> new(123) -> bneg() -> is_neg() ok t/nan_cmp.t ................... 1..26 ok 1 - Math::BigInt->bone() == Math::BigInt->bone() ok 2 - Math::BigInt->bone() != Math::BigInt->bnan() ok 3 - Math::BigInt->bnan() != Math::BigInt->bone() ok 4 - Math::BigInt->bnan() != Math::BigInt->bnan() ok 5 - Math::BigInt->bnan() == Math::BigInt->bone() ok 6 - Math::BigInt->bone() == Math::BigInt->bnan() ok 7 - Math::BigInt->bnan() == Math::BigInt->bnan() ok 8 - Math::BigInt->bnan() <= Math::BigInt->bone() ok 9 - Math::BigInt->bone() <= Math::BigInt->bnan() ok 10 - Math::BigInt->bnan() <= Math::BigInt->bnan() ok 11 - Math::BigInt->bnan() >= Math::BigInt->bone() ok 12 - Math::BigInt->bone() >= Math::BigInt->bnan() ok 13 - Math::BigInt->bnan() >= Math::BigInt->bnan() ok 14 - Math::BigFloat->bone() == Math::BigFloat->bone() ok 15 - Math::BigFloat->bone() != Math::BigFloat->bnan() ok 16 - Math::BigFloat->bnan() != Math::BigFloat->bone() ok 17 - Math::BigFloat->bnan() != Math::BigFloat->bnan() ok 18 - Math::BigFloat->bnan() == Math::BigFloat->bone() ok 19 - Math::BigFloat->bone() == Math::BigFloat->bnan() ok 20 - Math::BigFloat->bnan() == Math::BigFloat->bnan() ok 21 - Math::BigFloat->bnan() <= Math::BigFloat->bone() ok 22 - Math::BigFloat->bone() <= Math::BigFloat->bnan() ok 23 - Math::BigFloat->bnan() <= Math::BigFloat->bnan() ok 24 - Math::BigFloat->bnan() >= Math::BigFloat->bone() ok 25 - Math::BigFloat->bone() >= Math::BigFloat->bnan() ok 26 - Math::BigFloat->bnan() >= Math::BigFloat->bnan() ok t/new_overloaded.t ............ 1..4 ok 1 - Overloaded::Num->new(2.23) ok 2 - Math::BigFloat->new() accepts overloaded numbers ok 3 - Math::BigInt->new() accepts overloaded numbers ok 4 - Math::BigFloat->new() accepts a Math::BigInt ok t/round.t ..................... 1..95 ok 1 - round(3) ok 2 - round(3.1) ok 3 - round(3.5) ok 4 - round(3.6) ok 5 - round(3.9) ok 6 - bfround(3) ok 7 - bfround(3.1) ok 8 - bfround(3.5) ok 9 - bfround(3.6) ok 10 - bfround(3.9) ok 11 - bfround(2) ok 12 - bfround(2.1) ok 13 - bfround(2.5) ok 14 - bfround(2.6) ok 15 - bfround(2.9) ok 16 - bfround(-2) ok 17 - bfround(-2.1) ok 18 - bfround(-2.5) ok 19 - bfround(-2.6) ok 20 - bfround(-2.9) ok 21 - bfround(-3) ok 22 - bfround(-3.1) ok 23 - bfround(-3.5) ok 24 - bfround(-3.6) ok 25 - bfround(-3.9) ok 26 - bround(4) ok 27 - bround(4.1) ok 28 - bround(4.5) ok 29 - bround(4.6) ok 30 - bround(4.9) ok 31 - bround(3) ok 32 - bround(3.1) ok 33 - bround(3.5) ok 34 - bround(3.6) ok 35 - bround(3.9) ok 36 - bround(2) ok 37 - bround(2.1) ok 38 - bround(2.5) ok 39 - bround(2.6) ok 40 - bround(2.9) ok 41 - bsqrt(4) ok 42 - bsqrt(4.1) ok 43 - bsqrt(4.5) ok 44 - bsqrt(4.6) ok 45 - bsqrt(4.9) ok 46 - bsqrt(3) ok 47 - bsqrt(3.1) ok 48 - bsqrt(3.5) ok 49 - bsqrt(3.6) ok 50 - bsqrt(3.9) ok 51 - bsqrt(2) ok 52 - bsqrt(2.1) ok 53 - bsqrt(2.5) ok 54 - bsqrt(2.6) ok 55 - bsqrt(2.9) ok 56 - bsqrt(undef, 2) ok 57 - bsqrt(undef, 2.1) ok 58 - bsqrt(undef.2.5) ok 59 - bsqrt(undef, 2.6) ok 60 - bsqrt(undef, 2.9) ok 61 - bsqrt(undef, -2) ok 62 - bsqrt(undef, -2.1) ok 63 - bsqrt(undef.-2.5) ok 64 - bsqrt(undef, -2.6) ok 65 - bsqrt(undef, -2.9) ok 66 - bdiv(2, 6) ok 67 - bdiv(2, 6.1) ok 68 - bdiv(2, 6.5) ok 69 - bdiv(2, 6.6) ok 70 - bdiv(2, 6.9) ok 71 - bdiv(2, 4) ok 72 - bdiv(2, 4.1) ok 73 - bdiv(2, 4.5) ok 74 - bdiv(2, 4.6) ok 75 - bdiv(2, 4.9) ok 76 - bdiv(2, 3) ok 77 - bdiv(2, 3.1) ok 78 - bdiv(2, 3.5) ok 79 - bdiv(2, 3.6) ok 80 - bdiv(2, 3.9) ok 81 - bdiv(undef, -6) ok 82 - bdiv(2, undef, -6.1) ok 83 - bdiv(2, undef, -6.5) ok 84 - bdiv(2, undef, -6.6) ok 85 - bdiv(2, undef, -6.9) ok 86 - bdiv(undef, -4) ok 87 - bdiv(2, undef, -4.1) ok 88 - bdiv(2, undef, -4.5) ok 89 - bdiv(2, undef, -4.6) ok 90 - bdiv(2, undef, -4.9) ok 91 - bdiv(undef, -3) ok 92 - bdiv(2, undef, -3.1) ok 93 - bdiv(2, undef, -3.5) ok 94 - bdiv(2, undef, -3.6) ok 95 - bdiv(2, undef, -3.9) ok t/rt-16221.t .................. 1..2 ok 1 - $int * $int_percent = 10 ok 2 - $float * $float_percent = 10 ok t/rt121139.t .................. 1..2 ok 1 ok 2 ok t/sub_ali.t ................... 1..6 ok 1 - Math::BigInt::Subclass -> new(123) -> is_pos() ok 2 - Math::BigInt::Subclass -> new(123) -> is_neg() ok 3 - Math::BigInt::Subclass -> new(123) -> as_int() ok 4 - 'Math::BigInt::Subclass -> new(123) -> as_int() isa Math::BigInt' isa 'Math::BigInt' ok 5 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_neg() ok t/sub_mbf.t ................... 1..3080 ok 1 - Math::BigFloat::Subclass->config('lib') ok 2 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass->bgcd($x, $y); ok 3 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass->bgcd($x, $y); ok 4 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass->bgcd($x, $y); ok 5 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("12"); Math::BigFloat::Subclass->bgcd($x, $y); ok 6 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 7 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 8 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 9 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 10 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 11 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 12 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 13 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 14 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 15 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); Math::BigFloat::Subclass->bgcd($x, $y); ok 16 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->bgcd($x, $y); ok 17 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->bgcd($x, $y); ok 18 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 19 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 20 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->bgcd($x, $y); ok 21 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->bgcd($x, $y); ok 22 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 23 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 24 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->bgcd($x, $y); ok 25 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->bgcd($x, $y); ok 26 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 27 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bgcd($x, $y); ok 28 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->bgcd($x, $y); ok 29 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->bgcd($x, $y); ok 30 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); Math::BigFloat::Subclass->bgcd($x, $y); ok 31 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); Math::BigFloat::Subclass->bgcd($x, $y); ok 32 - $x = Math::BigFloat::Subclass->new("+3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 33 - $x = Math::BigFloat::Subclass->new("+3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 34 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 35 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("+2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 36 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 37 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); Math::BigFloat::Subclass->bgcd($x, $y); ok 38 - $x = Math::BigFloat::Subclass->new("-144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 39 - $x = Math::BigFloat::Subclass->new("-144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 40 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 41 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("-60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 42 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 43 - $x = Math::BigFloat::Subclass->new("144"); $y = Math::BigFloat::Subclass->new("60"); Math::BigFloat::Subclass->bgcd($x, $y); ok 44 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("625"); Math::BigFloat::Subclass->bgcd($x, $y); ok 45 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("625"); Math::BigFloat::Subclass->bgcd($x, $y); ok 46 - $x = Math::BigFloat::Subclass->new("4096"); $y = Math::BigFloat::Subclass->new("81"); Math::BigFloat::Subclass->bgcd($x, $y); ok 47 - $x = Math::BigFloat::Subclass->new("4096"); $y = Math::BigFloat::Subclass->new("81"); Math::BigFloat::Subclass->bgcd($x, $y); ok 48 - $x = Math::BigFloat::Subclass->new("1034"); $y = Math::BigFloat::Subclass->new("804"); Math::BigFloat::Subclass->bgcd($x, $y); ok 49 - $x = Math::BigFloat::Subclass->new("1034"); $y = Math::BigFloat::Subclass->new("804"); Math::BigFloat::Subclass->bgcd($x, $y); ok 50 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("56"); Math::BigFloat::Subclass->bgcd($x, $y, $z); ok 51 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("56"); Math::BigFloat::Subclass->bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("54"); Math::BigFloat::Subclass->bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat::Subclass->new("27"); $y = Math::BigFloat::Subclass->new("90"); $z = Math::BigFloat::Subclass->new("54"); Math::BigFloat::Subclass->bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->blcm($x, $y); ok 55 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->blcm($x, $y); ok 56 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 57 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 58 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->blcm($x, $y); ok 59 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); Math::BigFloat::Subclass->blcm($x, $y); ok 60 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 61 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 62 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 63 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->blcm($x, $y); ok 64 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->blcm($x, $y); ok 65 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); Math::BigFloat::Subclass->blcm($x, $y); ok 66 - $x = Math::BigFloat::Subclass->new("+27"); $y = Math::BigFloat::Subclass->new("+90"); Math::BigFloat::Subclass->blcm($x, $y); ok 67 - $x = Math::BigFloat::Subclass->new("+27"); $y = Math::BigFloat::Subclass->new("+90"); Math::BigFloat::Subclass->blcm($x, $y); ok 68 - $x = Math::BigFloat::Subclass->new("+1034"); $y = Math::BigFloat::Subclass->new("+804"); Math::BigFloat::Subclass->blcm($x, $y); ok 69 - $x = Math::BigFloat::Subclass->new("+1034"); $y = Math::BigFloat::Subclass->new("+804"); Math::BigFloat::Subclass->blcm($x, $y); ok 70 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 71 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 73 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 74 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 75 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 77 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 78 - $x = Math::BigFloat::Subclass->new("2.4"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 79 - $x = Math::BigFloat::Subclass->new("2.4"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 80 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 81 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 82 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bcos($y); ok 83 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bcos($y); ok 84 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 85 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bcos($y); ok 86 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 87 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("12"); $x->bcos($y); ok 88 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 89 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 90 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 91 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 92 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 93 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 94 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 95 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 96 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 97 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->bsin($y); ok 98 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bsin($y); ok 99 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("20"); $x->bsin($y); ok 100 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 101 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 102 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 103 - $x = Math::BigFloat::Subclass->new("1.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 104 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 105 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->bsin($y); ok 106 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 107 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("12"); $x->bsin($y); ok 108 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 109 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 110 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 111 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 117 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("10"); $x->batan($y); ok 118 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 119 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->batan($y); ok 121 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("13"); $x->batan($y); ok 122 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 123 - $x = Math::BigFloat::Subclass->new("0.2"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat::Subclass->new("2.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat::Subclass->new("2.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat::Subclass->new("2.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat::Subclass->new("2.5"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 136 - $x = Math::BigFloat::Subclass->new("3.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 137 - $x = Math::BigFloat::Subclass->new("3.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat::Subclass->new("6.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat::Subclass->new("6.0"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 140 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 141 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 142 - $x = Math::BigFloat::Subclass->new("24"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 143 - $x = Math::BigFloat::Subclass->new("24"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 144 - $x = Math::BigFloat::Subclass->new("48"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 145 - $x = Math::BigFloat::Subclass->new("48"); $y = Math::BigFloat::Subclass->new("14"); $x->batan($y); ok 146 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 147 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $z = Math::BigFloat::Subclass->new("10"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 153 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 154 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 155 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 163 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 164 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 165 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 174 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 175 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 183 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 184 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 185 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 193 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 194 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 195 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("13"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("13"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("11"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("11"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("77"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("8"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 224 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("24"); $x->batan2($y, $z); ok 225 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $z = Math::BigFloat::Subclass->new("24"); $x->batan2($y, $z); ok 226 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 227 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 228 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 229 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $z = Math::BigFloat::Subclass->new("14"); $x->batan2($y, $z); ok 230 - $x = Math::BigFloat::Subclass->new("150"); Math::BigFloat::Subclass->bpi($x); ok 231 - $x = Math::BigFloat::Subclass->new("150"); Math::BigFloat::Subclass->bpi($x); ok 232 - $x = Math::BigFloat::Subclass->new("77"); Math::BigFloat::Subclass->bpi($x); ok 233 - $x = Math::BigFloat::Subclass->new("77"); Math::BigFloat::Subclass->bpi($x); ok 234 - $x = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bpi($x); ok 235 - $x = Math::BigFloat::Subclass->new("+0"); Math::BigFloat::Subclass->bpi($x); ok 236 - $x = Math::BigFloat::Subclass->new("11"); Math::BigFloat::Subclass->bpi($x); ok 237 - $x = Math::BigFloat::Subclass->new("11"); Math::BigFloat::Subclass->bpi($x); ok 238 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bnok($y); ok 239 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("10"); $x->bnok($y); ok 240 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 241 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 242 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 243 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 244 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 245 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bnok($y); ok 246 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 247 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 248 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bnok($y); ok 249 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bnok($y); ok 250 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 251 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 252 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bnok($y); ok 253 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bnok($y); ok 254 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 255 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bnok($y); ok 256 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("6"); $x->bnok($y); ok 257 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("6"); $x->bnok($y); ok 258 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("90"); $x->bnok($y); ok 259 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("90"); $x->bnok($y); ok 260 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("95"); $x->bnok($y); ok 261 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("95"); $x->bnok($y); ok 262 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 263 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 264 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 265 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bnok($y); ok 266 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 267 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bnok($y); ok 268 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 269 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 271 - $x = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 272 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 273 - $x = Math::BigFloat::Subclass->new("-2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 274 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(-1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 275 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(-1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 276 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(0); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 277 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(0); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 278 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 279 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 280 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 281 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 282 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 283 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(1); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 284 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(2); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 285 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new(2); $Math::BigFloat::Subclass::div_scale = 40; $x->blog($y); ok 286 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 287 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 288 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 289 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 290 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 20; $x->blog(); ok 291 - $x = Math::BigFloat::Subclass->new("2.718281828"); $Math::BigFloat::Subclass::div_scale = 20; $x->blog(); ok 292 - $x = Math::BigFloat::Subclass->new("123"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 293 - $x = Math::BigFloat::Subclass->new("123"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 298 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 299 - $x = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 300 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 301 - $x = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 302 - $x = Math::BigFloat::Subclass->new("3.1415"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 303 - $x = Math::BigFloat::Subclass->new("3.1415"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 304 - $x = Math::BigFloat::Subclass->new("12345"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 305 - $x = Math::BigFloat::Subclass->new("12345"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 306 - $x = Math::BigFloat::Subclass->new("0.001"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 307 - $x = Math::BigFloat::Subclass->new("0.001"); $Math::BigFloat::Subclass::div_scale = 15; $x->blog(); ok 308 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new(10); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 309 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new(10); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 310 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new(100); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 311 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new(100); $Math::BigFloat::Subclass::div_scale = 15; $x->blog($y); ok 312 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 313 - $x = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->blog(); ok 314 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("2"); $x->brsft($y); ok 315 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("2"); $x->brsft($y); ok 316 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->brsft($y); ok 317 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->brsft($y); ok 318 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 319 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 320 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 321 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 322 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 323 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 324 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 325 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("1"); $x->brsft($y); ok 326 - $x = Math::BigFloat::Subclass->new("32"); $y = Math::BigFloat::Subclass->new("3"); $x->brsft($y); ok 327 - $x = Math::BigFloat::Subclass->new("32"); $y = Math::BigFloat::Subclass->new("3"); $x->brsft($y); ok 328 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("0"); $x->blsft($y); ok 329 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("0"); $x->blsft($y); ok 330 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->blsft($y); ok 331 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->blsft($y); ok 332 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->blsft($y); ok 333 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->blsft($y); ok 334 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x->blsft($y); ok 335 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x->blsft($y); ok 336 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->blsft($y); ok 337 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->blsft($y); ok 338 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x->blsft($y); ok 339 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x->blsft($y); ok 340 - $x = Math::BigFloat::Subclass->new("1"); $x; ok 341 - $x = Math::BigFloat::Subclass->new("1"); $x; ok 342 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 343 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 344 - $x = Math::BigFloat::Subclass->new("invalid"); $x; ok 345 - $x = Math::BigFloat::Subclass->new("invalid"); $x; ok 346 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 347 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 348 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 349 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 350 - $x = Math::BigFloat::Subclass->new("123"); $x; ok 351 - $x = Math::BigFloat::Subclass->new("123"); $x; ok 352 - $x = Math::BigFloat::Subclass->new("-123.4567"); $x; ok 353 - $x = Math::BigFloat::Subclass->new("-123.4567"); $x; ok 354 - $x = Math::BigFloat::Subclass->new(".2E-3."); $x; ok 355 - $x = Math::BigFloat::Subclass->new(".2E-3."); $x; ok 356 - $x = Math::BigFloat::Subclass->new("1e3e4"); $x; ok 357 - $x = Math::BigFloat::Subclass->new("1e3e4"); $x; ok 358 - $x = Math::BigFloat::Subclass->new(".2E2"); $x; ok 359 - $x = Math::BigFloat::Subclass->new(".2E2"); $x; ok 360 - $x = Math::BigFloat::Subclass->new("1.E3"); $x; ok 361 - $x = Math::BigFloat::Subclass->new("1.E3"); $x; ok 362 - $x = Math::BigFloat::Subclass->new("0e0"); $x; ok 363 - $x = Math::BigFloat::Subclass->new("0e0"); $x; ok 364 - $x = Math::BigFloat::Subclass->new("+0e0"); $x; ok 365 - $x = Math::BigFloat::Subclass->new("+0e0"); $x; ok 366 - $x = Math::BigFloat::Subclass->new("+0e+0"); $x; ok 367 - $x = Math::BigFloat::Subclass->new("+0e+0"); $x; ok 368 - $x = Math::BigFloat::Subclass->new("-0e+0"); $x; ok 369 - $x = Math::BigFloat::Subclass->new("-0e+0"); $x; ok 370 - $x = Math::BigFloat::Subclass->new("0e-0"); $x; ok 371 - $x = Math::BigFloat::Subclass->new("0e-0"); $x; ok 372 - $x = Math::BigFloat::Subclass->new("-0e-0"); $x; ok 373 - $x = Math::BigFloat::Subclass->new("-0e-0"); $x; ok 374 - $x = Math::BigFloat::Subclass->new("+0e-0"); $x; ok 375 - $x = Math::BigFloat::Subclass->new("+0e-0"); $x; ok 376 - $x = Math::BigFloat::Subclass->new("000"); $x; ok 377 - $x = Math::BigFloat::Subclass->new("000"); $x; ok 378 - $x = Math::BigFloat::Subclass->new("00e2"); $x; ok 379 - $x = Math::BigFloat::Subclass->new("00e2"); $x; ok 380 - $x = Math::BigFloat::Subclass->new("00e02"); $x; ok 381 - $x = Math::BigFloat::Subclass->new("00e02"); $x; ok 382 - $x = Math::BigFloat::Subclass->new("000e002"); $x; ok 383 - $x = Math::BigFloat::Subclass->new("000e002"); $x; ok 384 - $x = Math::BigFloat::Subclass->new("000e1230"); $x; ok 385 - $x = Math::BigFloat::Subclass->new("000e1230"); $x; ok 386 - $x = Math::BigFloat::Subclass->new("00e-3"); $x; ok 387 - $x = Math::BigFloat::Subclass->new("00e-3"); $x; ok 388 - $x = Math::BigFloat::Subclass->new("00e+3"); $x; ok 389 - $x = Math::BigFloat::Subclass->new("00e+3"); $x; ok 390 - $x = Math::BigFloat::Subclass->new("00e-03"); $x; ok 391 - $x = Math::BigFloat::Subclass->new("00e-03"); $x; ok 392 - $x = Math::BigFloat::Subclass->new("00e+03"); $x; ok 393 - $x = Math::BigFloat::Subclass->new("00e+03"); $x; ok 394 - $x = Math::BigFloat::Subclass->new("-000"); $x; ok 395 - $x = Math::BigFloat::Subclass->new("-000"); $x; ok 396 - $x = Math::BigFloat::Subclass->new("-00e2"); $x; ok 397 - $x = Math::BigFloat::Subclass->new("-00e2"); $x; ok 398 - $x = Math::BigFloat::Subclass->new("-00e02"); $x; ok 399 - $x = Math::BigFloat::Subclass->new("-00e02"); $x; ok 400 - $x = Math::BigFloat::Subclass->new("-000e002"); $x; ok 401 - $x = Math::BigFloat::Subclass->new("-000e002"); $x; ok 402 - $x = Math::BigFloat::Subclass->new("-000e1230"); $x; ok 403 - $x = Math::BigFloat::Subclass->new("-000e1230"); $x; ok 404 - $x = Math::BigFloat::Subclass->new("-00e-3"); $x; ok 405 - $x = Math::BigFloat::Subclass->new("-00e-3"); $x; ok 406 - $x = Math::BigFloat::Subclass->new("-00e+3"); $x; ok 407 - $x = Math::BigFloat::Subclass->new("-00e+3"); $x; ok 408 - $x = Math::BigFloat::Subclass->new("-00e-03"); $x; ok 409 - $x = Math::BigFloat::Subclass->new("-00e-03"); $x; ok 410 - $x = Math::BigFloat::Subclass->new("-00e+03"); $x; ok 411 - $x = Math::BigFloat::Subclass->new("-00e+03"); $x; ok 412 - $x = Math::BigFloat::Subclass->new("0"); $x->as_number(); ok 413 - $x = Math::BigFloat::Subclass->new("1"); $x->as_number(); ok 414 - $x = Math::BigFloat::Subclass->new("1.2"); $x->as_number(); ok 415 - $x = Math::BigFloat::Subclass->new("2.345"); $x->as_number(); ok 416 - $x = Math::BigFloat::Subclass->new("-2"); $x->as_number(); ok 417 - $x = Math::BigFloat::Subclass->new("-123.456"); $x->as_number(); ok 418 - $x = Math::BigFloat::Subclass->new("-200"); $x->as_number(); ok 419 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_number(); ok 420 - $x = Math::BigFloat::Subclass->new("inf"); $x->as_number(); ok 421 - $x = Math::BigFloat::Subclass->new("NaN"); $x->as_number(); ok 422 - $x = Math::BigFloat::Subclass->new("71243225429896467497217836789578596379"); $x->as_number(); ok 423 - $x = Math::BigFloat::Subclass->new("0.000641"); $x->as_number(); ok 424 - $x = Math::BigFloat::Subclass->new("0.0006412"); $x->as_number(); ok 425 - $x = Math::BigFloat::Subclass->new("0.00064123"); $x->as_number(); ok 426 - $x = Math::BigFloat::Subclass->new("0.000641234"); $x->as_number(); ok 427 - $x = Math::BigFloat::Subclass->new("0.0006412345"); $x->as_number(); ok 428 - $x = Math::BigFloat::Subclass->new("0.00064123456"); $x->as_number(); ok 429 - $x = Math::BigFloat::Subclass->new("0.000641234567"); $x->as_number(); ok 430 - $x = Math::BigFloat::Subclass->new("0.0006412345678"); $x->as_number(); ok 431 - $x = Math::BigFloat::Subclass->new("0.00064123456789"); $x->as_number(); ok 432 - $x = Math::BigFloat::Subclass->new("0.1"); $x->as_number(); ok 433 - $x = Math::BigFloat::Subclass->new("0.01"); $x->as_number(); ok 434 - $x = Math::BigFloat::Subclass->new("0.001"); $x->as_number(); ok 435 - $x = Math::BigFloat::Subclass->new("0.0001"); $x->as_number(); ok 436 - $x = Math::BigFloat::Subclass->new("0.00001"); $x->as_number(); ok 437 - $x = Math::BigFloat::Subclass->new("0.000001"); $x->as_number(); ok 438 - $x = Math::BigFloat::Subclass->new("0.0000001"); $x->as_number(); ok 439 - $x = Math::BigFloat::Subclass->new("0.00000001"); $x->as_number(); ok 440 - $x = Math::BigFloat::Subclass->new("0.000000001"); $x->as_number(); ok 441 - $x = Math::BigFloat::Subclass->new("0.0000000001"); $x->as_number(); ok 442 - $x = Math::BigFloat::Subclass->new("0.00000000001"); $x->as_number(); ok 443 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->as_number(); ok 444 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->as_number(); ok 445 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->as_number(); ok 446 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->as_number(); ok 447 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->as_number(); ok 448 - $x = Math::BigFloat::Subclass->new("1"); $x->binf("+"); ok 449 - $x = Math::BigFloat::Subclass->new("1"); $x->binf("+"); ok 450 - $x = Math::BigFloat::Subclass->new("2"); $x->binf("-"); ok 451 - $x = Math::BigFloat::Subclass->new("2"); $x->binf("-"); ok 452 - $x = Math::BigFloat::Subclass->new("3"); $x->binf("abc"); ok 453 - $x = Math::BigFloat::Subclass->new("3"); $x->binf("abc"); ok 454 - $x = Math::BigFloat::Subclass->new("128"); $x->as_hex(); ok 455 - $x = Math::BigFloat::Subclass->new("-128"); $x->as_hex(); ok 456 - $x = Math::BigFloat::Subclass->new("0"); $x->as_hex(); ok 457 - $x = Math::BigFloat::Subclass->new("-0"); $x->as_hex(); ok 458 - $x = Math::BigFloat::Subclass->new("1"); $x->as_hex(); ok 459 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->as_hex(); ok 460 - $x = Math::BigFloat::Subclass->new("+inf"); $x->as_hex(); ok 461 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_hex(); ok 462 - $x = Math::BigFloat::Subclass->new("invalid"); $x->as_hex(); ok 463 - $x = Math::BigFloat::Subclass->new("128"); $x->as_bin(); ok 464 - $x = Math::BigFloat::Subclass->new("-128"); $x->as_bin(); ok 465 - $x = Math::BigFloat::Subclass->new("0"); $x->as_bin(); ok 466 - $x = Math::BigFloat::Subclass->new("-0"); $x->as_bin(); ok 467 - $x = Math::BigFloat::Subclass->new("1"); $x->as_bin(); ok 468 - $x = Math::BigFloat::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 469 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->as_bin(); ok 470 - $x = Math::BigFloat::Subclass->new("+inf"); $x->as_bin(); ok 471 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_bin(); ok 472 - $x = Math::BigFloat::Subclass->new("invalid"); $x->as_bin(); ok 473 - $x = Math::BigFloat::Subclass->new("128"); $x->as_oct(); ok 474 - $x = Math::BigFloat::Subclass->new("-128"); $x->as_oct(); ok 475 - $x = Math::BigFloat::Subclass->new("0"); $x->as_oct(); ok 476 - $x = Math::BigFloat::Subclass->new("-0"); $x->as_oct(); ok 477 - $x = Math::BigFloat::Subclass->new("1"); $x->as_oct(); ok 478 - $x = Math::BigFloat::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 479 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->as_oct(); ok 480 - $x = Math::BigFloat::Subclass->new("+inf"); $x->as_oct(); ok 481 - $x = Math::BigFloat::Subclass->new("-inf"); $x->as_oct(); ok 482 - $x = Math::BigFloat::Subclass->new("invalid"); $x->as_oct(); ok 483 - $x = Math::BigFloat::Subclass->new("128"); $x->to_hex(); ok 484 - $x = Math::BigFloat::Subclass->new("-128"); $x->to_hex(); ok 485 - $x = Math::BigFloat::Subclass->new("0"); $x->to_hex(); ok 486 - $x = Math::BigFloat::Subclass->new("-0"); $x->to_hex(); ok 487 - $x = Math::BigFloat::Subclass->new("1"); $x->to_hex(); ok 488 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->to_hex(); ok 489 - $x = Math::BigFloat::Subclass->new("+inf"); $x->to_hex(); ok 490 - $x = Math::BigFloat::Subclass->new("-inf"); $x->to_hex(); ok 491 - $x = Math::BigFloat::Subclass->new("invalid"); $x->to_hex(); ok 492 - $x = Math::BigFloat::Subclass->new("128"); $x->to_bin(); ok 493 - $x = Math::BigFloat::Subclass->new("-128"); $x->to_bin(); ok 494 - $x = Math::BigFloat::Subclass->new("0"); $x->to_bin(); ok 495 - $x = Math::BigFloat::Subclass->new("-0"); $x->to_bin(); ok 496 - $x = Math::BigFloat::Subclass->new("1"); $x->to_bin(); ok 497 - $x = Math::BigFloat::Subclass->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 498 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->to_bin(); ok 499 - $x = Math::BigFloat::Subclass->new("+inf"); $x->to_bin(); ok 500 - $x = Math::BigFloat::Subclass->new("-inf"); $x->to_bin(); ok 501 - $x = Math::BigFloat::Subclass->new("invalid"); $x->to_bin(); ok 502 - $x = Math::BigFloat::Subclass->new("128"); $x->to_oct(); ok 503 - $x = Math::BigFloat::Subclass->new("-128"); $x->to_oct(); ok 504 - $x = Math::BigFloat::Subclass->new("0"); $x->to_oct(); ok 505 - $x = Math::BigFloat::Subclass->new("-0"); $x->to_oct(); ok 506 - $x = Math::BigFloat::Subclass->new("1"); $x->to_oct(); ok 507 - $x = Math::BigFloat::Subclass->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 508 - $x = Math::BigFloat::Subclass->new("0x123456789123456789"); $x->to_oct(); ok 509 - $x = Math::BigFloat::Subclass->new("+inf"); $x->to_oct(); ok 510 - $x = Math::BigFloat::Subclass->new("-inf"); $x->to_oct(); ok 511 - $x = Math::BigFloat::Subclass->new("invalid"); $x->to_oct(); ok 512 - $x = Math::BigFloat::Subclass->new("0"); $x->numify(); ok 513 - $x = Math::BigFloat::Subclass->new("+1"); $x->numify(); ok 514 - $x = Math::BigFloat::Subclass->new("1234"); $x->numify(); ok 515 - $x = Math::BigFloat::Subclass->new("-5"); $x->numify(); ok 516 - $x = Math::BigFloat::Subclass->new("100"); $x->numify(); ok 517 - $x = Math::BigFloat::Subclass->new("-100"); $x->numify(); ok 518 - $x = Math::BigFloat::Subclass->new("abc"); $x->bnan(); ok 519 - $x = Math::BigFloat::Subclass->new("abc"); $x->bnan(); ok 520 - $x = Math::BigFloat::Subclass->new("2"); $x->bnan(); ok 521 - $x = Math::BigFloat::Subclass->new("2"); $x->bnan(); ok 522 - $x = Math::BigFloat::Subclass->new("-2"); $x->bnan(); ok 523 - $x = Math::BigFloat::Subclass->new("-2"); $x->bnan(); ok 524 - $x = Math::BigFloat::Subclass->new("0"); $x->bnan(); ok 525 - $x = Math::BigFloat::Subclass->new("0"); $x->bnan(); ok 526 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("+"); ok 527 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("+"); ok 528 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("-"); ok 529 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("-"); ok 530 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("+"); ok 531 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone("+"); ok 532 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("-"); ok 533 - $x = Math::BigFloat::Subclass->new("2"); $x->bone("-"); ok 534 - $x = Math::BigFloat::Subclass->new("0"); $x->bone(); ok 535 - $x = Math::BigFloat::Subclass->new("0"); $x->bone(); ok 536 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone(); ok 537 - $x = Math::BigFloat::Subclass->new("-2"); $x->bone(); ok 538 - $x = Math::BigFloat::Subclass->new("abc"); $x->bone(); ok 539 - $x = Math::BigFloat::Subclass->new("abc"); $x->bone(); ok 540 - $x = Math::BigFloat::Subclass->new("2"); $x->bone(); ok 541 - $x = Math::BigFloat::Subclass->new("2"); $x->bone(); ok 542 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bsstr(); ok 543 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bsstr(); ok 544 - $x = Math::BigFloat::Subclass->new("abcfsstr"); $x->bsstr(); ok 545 - $x = Math::BigFloat::Subclass->new("-abcfsstr"); $x->bsstr(); ok 546 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->bsstr(); ok 547 - $x = Math::BigFloat::Subclass->new("123"); $x->bsstr(); ok 548 - $x = Math::BigFloat::Subclass->new("-5"); $x->bsstr(); ok 549 - $x = Math::BigFloat::Subclass->new("-100"); $x->bsstr(); ok 550 - $x = Math::BigFloat::Subclass->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 551 - $x = Math::BigFloat::Subclass->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 552 - $x = Math::BigFloat::Subclass->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 553 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 554 - $x = Math::BigFloat::Subclass->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 555 - $x = Math::BigFloat::Subclass->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 556 - $x = Math::BigFloat::Subclass->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 557 - $x = Math::BigFloat::Subclass->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 558 - $x = Math::BigFloat::Subclass->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 559 - $x = Math::BigFloat::Subclass->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 560 - $x = Math::BigFloat::Subclass->new("inf"); $x; ok 561 - $x = Math::BigFloat::Subclass->new("inf"); $x; ok 562 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 563 - $x = Math::BigFloat::Subclass->new("+inf"); $x; ok 564 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 565 - $x = Math::BigFloat::Subclass->new("-inf"); $x; ok 566 - $x = Math::BigFloat::Subclass->new("+infinity"); $x; ok 567 - $x = Math::BigFloat::Subclass->new("+infinity"); $x; ok 568 - $x = Math::BigFloat::Subclass->new("+-inf"); $x; ok 569 - $x = Math::BigFloat::Subclass->new("+-inf"); $x; ok 570 - $x = Math::BigFloat::Subclass->new("abc"); $x; ok 571 - $x = Math::BigFloat::Subclass->new("abc"); $x; ok 572 - $x = Math::BigFloat::Subclass->new(" 1 a"); $x; ok 573 - $x = Math::BigFloat::Subclass->new(" 1 a"); $x; ok 574 - $x = Math::BigFloat::Subclass->new("1bcd2"); $x; ok 575 - $x = Math::BigFloat::Subclass->new("1bcd2"); $x; ok 576 - $x = Math::BigFloat::Subclass->new("11111b"); $x; ok 577 - $x = Math::BigFloat::Subclass->new("11111b"); $x; ok 578 - $x = Math::BigFloat::Subclass->new("+1z"); $x; ok 579 - $x = Math::BigFloat::Subclass->new("+1z"); $x; ok 580 - $x = Math::BigFloat::Subclass->new("-1z"); $x; ok 581 - $x = Math::BigFloat::Subclass->new("-1z"); $x; ok 582 - $x = Math::BigFloat::Subclass->new("0e999"); $x; ok 583 - $x = Math::BigFloat::Subclass->new("0e999"); $x; ok 584 - $x = Math::BigFloat::Subclass->new("0e-999"); $x; ok 585 - $x = Math::BigFloat::Subclass->new("0e-999"); $x; ok 586 - $x = Math::BigFloat::Subclass->new("-0e999"); $x; ok 587 - $x = Math::BigFloat::Subclass->new("-0e999"); $x; ok 588 - $x = Math::BigFloat::Subclass->new("-0e-999"); $x; ok 589 - $x = Math::BigFloat::Subclass->new("-0e-999"); $x; ok 590 - $x = Math::BigFloat::Subclass->new("0"); $x; ok 591 - $x = Math::BigFloat::Subclass->new("0"); $x; ok 592 - $x = Math::BigFloat::Subclass->new("+0"); $x; ok 593 - $x = Math::BigFloat::Subclass->new("+0"); $x; ok 594 - $x = Math::BigFloat::Subclass->new("+00"); $x; ok 595 - $x = Math::BigFloat::Subclass->new("+00"); $x; ok 596 - $x = Math::BigFloat::Subclass->new("+0_0_0"); $x; ok 597 - $x = Math::BigFloat::Subclass->new("+0_0_0"); $x; ok 598 - $x = Math::BigFloat::Subclass->new("000000_0000000_00000"); $x; ok 599 - $x = Math::BigFloat::Subclass->new("000000_0000000_00000"); $x; ok 600 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 601 - $x = Math::BigFloat::Subclass->new("-0"); $x; ok 602 - $x = Math::BigFloat::Subclass->new("-0000"); $x; ok 603 - $x = Math::BigFloat::Subclass->new("-0000"); $x; ok 604 - $x = Math::BigFloat::Subclass->new("+1"); $x; ok 605 - $x = Math::BigFloat::Subclass->new("+1"); $x; ok 606 - $x = Math::BigFloat::Subclass->new("+01"); $x; ok 607 - $x = Math::BigFloat::Subclass->new("+01"); $x; ok 608 - $x = Math::BigFloat::Subclass->new("+001"); $x; ok 609 - $x = Math::BigFloat::Subclass->new("+001"); $x; ok 610 - $x = Math::BigFloat::Subclass->new("+00000100000"); $x; ok 611 - $x = Math::BigFloat::Subclass->new("+00000100000"); $x; ok 612 - $x = Math::BigFloat::Subclass->new("123456789"); $x; ok 613 - $x = Math::BigFloat::Subclass->new("123456789"); $x; ok 614 - $x = Math::BigFloat::Subclass->new("-1"); $x; ok 615 - $x = Math::BigFloat::Subclass->new("-1"); $x; ok 616 - $x = Math::BigFloat::Subclass->new("-01"); $x; ok 617 - $x = Math::BigFloat::Subclass->new("-01"); $x; ok 618 - $x = Math::BigFloat::Subclass->new("-001"); $x; ok 619 - $x = Math::BigFloat::Subclass->new("-001"); $x; ok 620 - $x = Math::BigFloat::Subclass->new("-123456789"); $x; ok 621 - $x = Math::BigFloat::Subclass->new("-123456789"); $x; ok 622 - $x = Math::BigFloat::Subclass->new("-00000100000"); $x; ok 623 - $x = Math::BigFloat::Subclass->new("-00000100000"); $x; ok 624 - $x = Math::BigFloat::Subclass->new("123.456a"); $x; ok 625 - $x = Math::BigFloat::Subclass->new("123.456a"); $x; ok 626 - $x = Math::BigFloat::Subclass->new("123.456"); $x; ok 627 - $x = Math::BigFloat::Subclass->new("123.456"); $x; ok 628 - $x = Math::BigFloat::Subclass->new("0.01"); $x; ok 629 - $x = Math::BigFloat::Subclass->new("0.01"); $x; ok 630 - $x = Math::BigFloat::Subclass->new(".002"); $x; ok 631 - $x = Math::BigFloat::Subclass->new(".002"); $x; ok 632 - $x = Math::BigFloat::Subclass->new("+.2"); $x; ok 633 - $x = Math::BigFloat::Subclass->new("+.2"); $x; ok 634 - $x = Math::BigFloat::Subclass->new("-0.0003"); $x; ok 635 - $x = Math::BigFloat::Subclass->new("-0.0003"); $x; ok 636 - $x = Math::BigFloat::Subclass->new("-.0000000004"); $x; ok 637 - $x = Math::BigFloat::Subclass->new("-.0000000004"); $x; ok 638 - $x = Math::BigFloat::Subclass->new("123456E2"); $x; ok 639 - $x = Math::BigFloat::Subclass->new("123456E2"); $x; ok 640 - $x = Math::BigFloat::Subclass->new("123456E-2"); $x; ok 641 - $x = Math::BigFloat::Subclass->new("123456E-2"); $x; ok 642 - $x = Math::BigFloat::Subclass->new("-123456E2"); $x; ok 643 - $x = Math::BigFloat::Subclass->new("-123456E2"); $x; ok 644 - $x = Math::BigFloat::Subclass->new("-123456E-2"); $x; ok 645 - $x = Math::BigFloat::Subclass->new("-123456E-2"); $x; ok 646 - $x = Math::BigFloat::Subclass->new("1e1"); $x; ok 647 - $x = Math::BigFloat::Subclass->new("1e1"); $x; ok 648 - $x = Math::BigFloat::Subclass->new("2e-11"); $x; ok 649 - $x = Math::BigFloat::Subclass->new("2e-11"); $x; ok 650 - $x = Math::BigFloat::Subclass->new(" .02e-1"); $x; ok 651 - $x = Math::BigFloat::Subclass->new(" .02e-1"); $x; ok 652 - $x = Math::BigFloat::Subclass->new(" 000001"); $x; ok 653 - $x = Math::BigFloat::Subclass->new(" 000001"); $x; ok 654 - $x = Math::BigFloat::Subclass->new(" -00001"); $x; ok 655 - $x = Math::BigFloat::Subclass->new(" -00001"); $x; ok 656 - $x = Math::BigFloat::Subclass->new(" -1"); $x; ok 657 - $x = Math::BigFloat::Subclass->new(" -1"); $x; ok 658 - $x = Math::BigFloat::Subclass->new(" 000.01"); $x; ok 659 - $x = Math::BigFloat::Subclass->new(" 000.01"); $x; ok 660 - $x = Math::BigFloat::Subclass->new(" -000.0023"); $x; ok 661 - $x = Math::BigFloat::Subclass->new(" -000.0023"); $x; ok 662 - $x = Math::BigFloat::Subclass->new(" 1.1e1"); $x; ok 663 - $x = Math::BigFloat::Subclass->new(" 1.1e1"); $x; ok 664 - $x = Math::BigFloat::Subclass->new("-3e111"); $x; ok 665 - $x = Math::BigFloat::Subclass->new("-3e111"); $x; ok 666 - $x = Math::BigFloat::Subclass->new("-4e-1111"); $x; ok 667 - $x = Math::BigFloat::Subclass->new("-4e-1111"); $x; ok 668 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("123.456"); $x->bpow($y); ok 669 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("123.456"); $x->bpow($y); ok 670 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("abc"); $x->bpow($y); ok 671 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("abc"); $x->bpow($y); ok 672 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 673 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 674 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 675 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 676 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 677 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 678 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 679 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 680 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 681 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 682 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 683 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 684 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 685 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 686 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 687 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 688 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 689 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 690 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 691 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 692 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 693 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 694 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 695 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 696 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 697 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 698 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 699 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 700 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 701 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 702 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 703 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 704 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 705 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 706 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 707 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 708 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 709 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 710 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 711 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 712 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 713 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 714 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 715 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 716 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 717 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 718 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 719 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 720 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 721 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 722 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 723 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 724 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 725 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 726 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 727 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 728 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 729 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 730 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 731 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 732 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 733 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 734 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 735 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 736 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 737 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 738 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 739 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 740 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 741 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 742 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 743 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 744 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 745 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 746 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 747 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 748 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 749 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 750 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 751 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 752 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 753 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 754 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 755 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 756 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 757 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 758 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 759 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 760 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 761 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 763 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 764 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 765 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 766 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 767 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 768 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 769 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 770 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 771 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 772 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 773 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 774 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 775 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 776 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 777 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 778 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 779 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 780 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 781 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 782 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 783 - $x = Math::BigFloat::Subclass->new("-1.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 784 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 785 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 786 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 787 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 788 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 789 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 790 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 791 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 792 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 793 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 794 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 795 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 796 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 797 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 798 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 799 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 800 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 801 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 802 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 803 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 804 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 805 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 806 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 807 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 808 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 809 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 810 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 811 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 812 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 813 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 814 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 815 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 816 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 817 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 818 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 819 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 820 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 821 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 822 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 823 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 824 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 825 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 826 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 827 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 828 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 829 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 830 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 831 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 832 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 833 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 834 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 835 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 836 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 837 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 838 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 839 - $x = Math::BigFloat::Subclass->new("-0.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 840 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 841 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 842 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 843 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 844 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 845 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 846 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 847 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 848 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 849 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 850 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 851 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 852 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 853 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 854 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 855 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 856 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 857 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 858 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 859 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 860 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 861 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 862 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 863 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 864 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 865 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 866 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 867 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 868 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 869 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 870 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 871 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 872 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 873 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 874 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 875 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 876 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 877 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 878 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 879 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 880 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 881 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 882 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 883 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 884 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 885 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 886 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 887 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 888 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 889 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 890 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 891 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 892 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 893 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 894 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 895 - $x = Math::BigFloat::Subclass->new("0.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 896 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 897 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 898 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 899 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 900 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 901 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 902 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 903 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 904 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 905 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 906 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 907 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 908 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 909 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 910 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 911 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 912 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 913 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 914 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 915 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 916 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 917 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 918 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 919 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 920 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 921 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 922 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 923 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 924 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 925 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 926 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 927 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 928 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 929 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 930 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 931 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 932 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 933 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 934 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 935 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 936 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 937 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 938 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 939 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 940 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 941 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 942 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 943 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 944 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 945 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 946 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 947 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 948 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 949 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 950 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 951 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 952 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 953 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 954 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 955 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 956 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 957 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 958 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 959 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 960 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 961 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 962 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 963 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 964 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 965 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 966 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 967 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 968 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 969 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 970 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 971 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 972 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 973 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 974 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 975 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 976 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 977 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 978 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 979 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 980 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 981 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 982 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 983 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 984 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 985 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 986 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 987 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 988 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 989 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 990 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 991 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 992 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 993 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 994 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 995 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 996 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 997 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 998 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 999 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 1000 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1001 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1002 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1003 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1004 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1005 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1006 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1007 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1008 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 1009 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 1010 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 1011 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 1012 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1013 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1014 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 1015 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 1016 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 1017 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 1018 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 1019 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 1020 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 1021 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 1022 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 1023 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 1024 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 1025 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 1026 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 1027 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 1028 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1029 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1030 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1031 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1032 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1033 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1034 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1035 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1036 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 1037 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bpow($y); ok 1038 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 1039 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-3"); $x->bpow($y); ok 1040 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1041 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1042 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 1043 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1.5"); $x->bpow($y); ok 1044 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 1045 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-1"); $x->bpow($y); ok 1046 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 1047 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-0.5"); $x->bpow($y); ok 1048 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 1049 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $x->bpow($y); ok 1050 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 1051 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0.5"); $x->bpow($y); ok 1052 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 1053 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bpow($y); ok 1054 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 1055 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bpow($y); ok 1056 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1057 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1058 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1059 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("3"); $x->bpow($y); ok 1060 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1061 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $x->bpow($y); ok 1062 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1063 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bpow($y); ok 1064 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1065 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $x->bpow($y); ok 1066 - $x = Math::BigFloat::Subclass->new("128"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1067 - $x = Math::BigFloat::Subclass->new("128"); $y = Math::BigFloat::Subclass->new("-2"); $x->bpow($y); ok 1068 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x->bpow($y); ok 1069 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x->bpow($y); ok 1070 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x->bpow($y); ok 1071 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.45"); $x->bpow($y); ok 1072 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x->bpow($y); ok 1073 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x->bpow($y); ok 1074 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x->bpow($y); ok 1075 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.45"); $x->bpow($y); ok 1076 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bneg(); ok 1077 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bneg(); ok 1078 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bneg(); ok 1079 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bneg(); ok 1080 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bneg(); ok 1081 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bneg(); ok 1082 - $x = Math::BigFloat::Subclass->new("+0"); $x->bneg(); ok 1083 - $x = Math::BigFloat::Subclass->new("+0"); $x->bneg(); ok 1084 - $x = Math::BigFloat::Subclass->new("+1"); $x->bneg(); ok 1085 - $x = Math::BigFloat::Subclass->new("+1"); $x->bneg(); ok 1086 - $x = Math::BigFloat::Subclass->new("-1"); $x->bneg(); ok 1087 - $x = Math::BigFloat::Subclass->new("-1"); $x->bneg(); ok 1088 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->bneg(); ok 1089 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->bneg(); ok 1090 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->bneg(); ok 1091 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->bneg(); ok 1092 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->bneg(); ok 1093 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->bneg(); ok 1094 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->bneg(); ok 1095 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->bneg(); ok 1096 - $x = Math::BigFloat::Subclass->new("invalid"); $x->babs(); ok 1097 - $x = Math::BigFloat::Subclass->new("invalid"); $x->babs(); ok 1098 - $x = Math::BigFloat::Subclass->new("+inf"); $x->babs(); ok 1099 - $x = Math::BigFloat::Subclass->new("+inf"); $x->babs(); ok 1100 - $x = Math::BigFloat::Subclass->new("-inf"); $x->babs(); ok 1101 - $x = Math::BigFloat::Subclass->new("-inf"); $x->babs(); ok 1102 - $x = Math::BigFloat::Subclass->new("+0"); $x->babs(); ok 1103 - $x = Math::BigFloat::Subclass->new("+0"); $x->babs(); ok 1104 - $x = Math::BigFloat::Subclass->new("+1"); $x->babs(); ok 1105 - $x = Math::BigFloat::Subclass->new("+1"); $x->babs(); ok 1106 - $x = Math::BigFloat::Subclass->new("-1"); $x->babs(); ok 1107 - $x = Math::BigFloat::Subclass->new("-1"); $x->babs(); ok 1108 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->babs(); ok 1109 - $x = Math::BigFloat::Subclass->new("+123456789"); $x->babs(); ok 1110 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->babs(); ok 1111 - $x = Math::BigFloat::Subclass->new("-123456789"); $x->babs(); ok 1112 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->babs(); ok 1113 - $x = Math::BigFloat::Subclass->new("+123.456789"); $x->babs(); ok 1114 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->babs(); ok 1115 - $x = Math::BigFloat::Subclass->new("-123456.789"); $x->babs(); ok 1116 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1117 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1118 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1119 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1120 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1121 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1122 - $x = Math::BigFloat::Subclass->new("invalid"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1123 - $x = Math::BigFloat::Subclass->new("invalid"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1124 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1125 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1126 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1127 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1128 - $x = Math::BigFloat::Subclass->new("+10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1129 - $x = Math::BigFloat::Subclass->new("+10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1130 - $x = Math::BigFloat::Subclass->new("-10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1131 - $x = Math::BigFloat::Subclass->new("-10123456789.123"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(5); ok 1132 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 1133 - $x = Math::BigFloat::Subclass->new("+10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 1134 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 1135 - $x = Math::BigFloat::Subclass->new("-10123456789"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(9); ok 1136 - $x = Math::BigFloat::Subclass->new("+101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 1137 - $x = Math::BigFloat::Subclass->new("+101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 1138 - $x = Math::BigFloat::Subclass->new("-101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 1139 - $x = Math::BigFloat::Subclass->new("-101234500"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bround(6); ok 1140 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1141 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1142 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1143 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1144 - $x = Math::BigFloat::Subclass->new("+20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1145 - $x = Math::BigFloat::Subclass->new("+20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1146 - $x = Math::BigFloat::Subclass->new("-20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1147 - $x = Math::BigFloat::Subclass->new("-20123456789.123"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(5); ok 1148 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 1149 - $x = Math::BigFloat::Subclass->new("+20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 1150 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 1151 - $x = Math::BigFloat::Subclass->new("-20123456789"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(9); ok 1152 - $x = Math::BigFloat::Subclass->new("+201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 1153 - $x = Math::BigFloat::Subclass->new("+201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 1154 - $x = Math::BigFloat::Subclass->new("-201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 1155 - $x = Math::BigFloat::Subclass->new("-201234500"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bround(6); ok 1156 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1157 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1158 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1159 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1160 - $x = Math::BigFloat::Subclass->new("+30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1161 - $x = Math::BigFloat::Subclass->new("+30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1162 - $x = Math::BigFloat::Subclass->new("-30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1163 - $x = Math::BigFloat::Subclass->new("-30123456789.123"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(5); ok 1164 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 1165 - $x = Math::BigFloat::Subclass->new("+30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 1166 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 1167 - $x = Math::BigFloat::Subclass->new("-30123456789"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(9); ok 1168 - $x = Math::BigFloat::Subclass->new("+301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 1169 - $x = Math::BigFloat::Subclass->new("+301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 1170 - $x = Math::BigFloat::Subclass->new("-301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 1171 - $x = Math::BigFloat::Subclass->new("-301234500"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bround(6); ok 1172 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1173 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1174 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1175 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1176 - $x = Math::BigFloat::Subclass->new("+40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1177 - $x = Math::BigFloat::Subclass->new("+40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1178 - $x = Math::BigFloat::Subclass->new("-40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1179 - $x = Math::BigFloat::Subclass->new("-40123456789.123"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(5); ok 1180 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 1181 - $x = Math::BigFloat::Subclass->new("+40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 1182 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 1183 - $x = Math::BigFloat::Subclass->new("-40123456789"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(9); ok 1184 - $x = Math::BigFloat::Subclass->new("+401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 1185 - $x = Math::BigFloat::Subclass->new("+401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 1186 - $x = Math::BigFloat::Subclass->new("-401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 1187 - $x = Math::BigFloat::Subclass->new("-401234500"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bround(6); ok 1188 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1189 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1190 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1191 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1192 - $x = Math::BigFloat::Subclass->new("+50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1193 - $x = Math::BigFloat::Subclass->new("+50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1194 - $x = Math::BigFloat::Subclass->new("-50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1195 - $x = Math::BigFloat::Subclass->new("-50123456789.123"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(5); ok 1196 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 1197 - $x = Math::BigFloat::Subclass->new("+50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 1198 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 1199 - $x = Math::BigFloat::Subclass->new("-50123456789"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(9); ok 1200 - $x = Math::BigFloat::Subclass->new("+501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 1201 - $x = Math::BigFloat::Subclass->new("+501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 1202 - $x = Math::BigFloat::Subclass->new("-501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 1203 - $x = Math::BigFloat::Subclass->new("-501234500"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bround(6); ok 1204 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1205 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1206 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1207 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1208 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 1209 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 1210 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 1211 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(9); ok 1212 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 1213 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 1214 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 1215 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(6); ok 1216 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1217 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1218 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1219 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bround(5); ok 1220 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1221 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1222 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1223 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1224 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1225 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1226 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1227 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1228 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 1229 - $x = Math::BigFloat::Subclass->new("+60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 1230 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 1231 - $x = Math::BigFloat::Subclass->new("-60123456789"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(9); ok 1232 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1233 - $x = Math::BigFloat::Subclass->new("+601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1234 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1235 - $x = Math::BigFloat::Subclass->new("-601234500"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1236 - $x = Math::BigFloat::Subclass->new("+601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1237 - $x = Math::BigFloat::Subclass->new("+601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1238 - $x = Math::BigFloat::Subclass->new("-601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1239 - $x = Math::BigFloat::Subclass->new("-601234400"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1240 - $x = Math::BigFloat::Subclass->new("+601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1241 - $x = Math::BigFloat::Subclass->new("+601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1242 - $x = Math::BigFloat::Subclass->new("-601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1243 - $x = Math::BigFloat::Subclass->new("-601234600"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1244 - $x = Math::BigFloat::Subclass->new("+601234300"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1245 - $x = Math::BigFloat::Subclass->new("+601234300"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(6); ok 1246 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1247 - $x = Math::BigFloat::Subclass->new("+60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1248 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1249 - $x = Math::BigFloat::Subclass->new("-60123456789.0123"); $Math::BigFloat::Subclass::round_mode = "common"; $x->bround(5); ok 1250 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1251 - $x = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1252 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1253 - $x = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1254 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1255 - $x = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1256 - $x = Math::BigFloat::Subclass->new("invalid"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1257 - $x = Math::BigFloat::Subclass->new("invalid"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(5); ok 1258 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1259 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1260 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1261 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1262 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1263 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1264 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1265 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1266 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1267 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1268 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1269 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1270 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1271 - $x = Math::BigFloat::Subclass->new("+1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1272 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1273 - $x = Math::BigFloat::Subclass->new("+1.234"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1274 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1275 - $x = Math::BigFloat::Subclass->new("+1.2345"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1276 - $x = Math::BigFloat::Subclass->new("-1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1277 - $x = Math::BigFloat::Subclass->new("-1.23"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1278 - $x = Math::BigFloat::Subclass->new("+1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1279 - $x = Math::BigFloat::Subclass->new("+1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1280 - $x = Math::BigFloat::Subclass->new("-1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1281 - $x = Math::BigFloat::Subclass->new("-1.27"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1282 - $x = Math::BigFloat::Subclass->new("+1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1283 - $x = Math::BigFloat::Subclass->new("+1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1284 - $x = Math::BigFloat::Subclass->new("-1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1285 - $x = Math::BigFloat::Subclass->new("-1.25"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1286 - $x = Math::BigFloat::Subclass->new("+1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1287 - $x = Math::BigFloat::Subclass->new("+1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1288 - $x = Math::BigFloat::Subclass->new("-1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1289 - $x = Math::BigFloat::Subclass->new("-1.35"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1290 - $x = Math::BigFloat::Subclass->new("-0.0061234567890"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1291 - $x = Math::BigFloat::Subclass->new("-0.0061234567890"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1292 - $x = Math::BigFloat::Subclass->new("-0.0061"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1293 - $x = Math::BigFloat::Subclass->new("-0.0061"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1294 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1295 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1296 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1297 - $x = Math::BigFloat::Subclass->new("-0.00612"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1298 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1299 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-1); ok 1300 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1301 - $x = Math::BigFloat::Subclass->new("-0.006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1302 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1303 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-2); ok 1304 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1305 - $x = Math::BigFloat::Subclass->new("-0.0006"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1306 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-3); ok 1307 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-4); ok 1308 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(-5); ok 1309 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1310 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1311 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1312 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1313 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1314 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1315 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1316 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "trunc"; $x->bfround(0); ok 1317 - $x = Math::BigFloat::Subclass->new("+2.23"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1318 - $x = Math::BigFloat::Subclass->new("-2.23"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1319 - $x = Math::BigFloat::Subclass->new("+2.27"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1320 - $x = Math::BigFloat::Subclass->new("-2.27"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1321 - $x = Math::BigFloat::Subclass->new("+2.25"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1322 - $x = Math::BigFloat::Subclass->new("-2.25"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1323 - $x = Math::BigFloat::Subclass->new("+2.35"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1324 - $x = Math::BigFloat::Subclass->new("-2.35"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1325 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1326 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-1); ok 1327 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-2); ok 1328 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-3); ok 1329 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-4); ok 1330 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(-5); ok 1331 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1332 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1333 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1334 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1335 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1336 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1337 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1338 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "zero"; $x->bfround(0); ok 1339 - $x = Math::BigFloat::Subclass->new("+3.23"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1340 - $x = Math::BigFloat::Subclass->new("-3.23"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1341 - $x = Math::BigFloat::Subclass->new("+3.27"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1342 - $x = Math::BigFloat::Subclass->new("-3.27"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1343 - $x = Math::BigFloat::Subclass->new("+3.25"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1344 - $x = Math::BigFloat::Subclass->new("-3.25"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1345 - $x = Math::BigFloat::Subclass->new("+3.35"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1346 - $x = Math::BigFloat::Subclass->new("-3.35"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1347 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1348 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-1); ok 1349 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-2); ok 1350 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-3); ok 1351 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-4); ok 1352 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(-5); ok 1353 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1354 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1355 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1356 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1357 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1358 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1359 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1360 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "+inf"; $x->bfround(0); ok 1361 - $x = Math::BigFloat::Subclass->new("+4.23"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1362 - $x = Math::BigFloat::Subclass->new("-4.23"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1363 - $x = Math::BigFloat::Subclass->new("+4.27"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1364 - $x = Math::BigFloat::Subclass->new("-4.27"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1365 - $x = Math::BigFloat::Subclass->new("+4.25"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1366 - $x = Math::BigFloat::Subclass->new("-4.25"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1367 - $x = Math::BigFloat::Subclass->new("+4.35"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1368 - $x = Math::BigFloat::Subclass->new("-4.35"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1369 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1370 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-1); ok 1371 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-2); ok 1372 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-3); ok 1373 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-4); ok 1374 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(-5); ok 1375 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1376 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1377 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1378 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1379 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1380 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1381 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1382 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "-inf"; $x->bfround(0); ok 1383 - $x = Math::BigFloat::Subclass->new("+5.23"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1384 - $x = Math::BigFloat::Subclass->new("-5.23"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1385 - $x = Math::BigFloat::Subclass->new("+5.27"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1386 - $x = Math::BigFloat::Subclass->new("-5.27"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1387 - $x = Math::BigFloat::Subclass->new("+5.25"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1388 - $x = Math::BigFloat::Subclass->new("-5.25"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1389 - $x = Math::BigFloat::Subclass->new("+5.35"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1390 - $x = Math::BigFloat::Subclass->new("-5.35"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1391 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1392 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-1); ok 1393 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-2); ok 1394 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-3); ok 1395 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-4); ok 1396 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(-5); ok 1397 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1398 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1399 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1400 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1401 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1402 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1403 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1404 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "odd"; $x->bfround(0); ok 1405 - $x = Math::BigFloat::Subclass->new("+6.23"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1406 - $x = Math::BigFloat::Subclass->new("-6.23"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1407 - $x = Math::BigFloat::Subclass->new("+6.27"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1408 - $x = Math::BigFloat::Subclass->new("-6.27"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1409 - $x = Math::BigFloat::Subclass->new("+6.25"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1410 - $x = Math::BigFloat::Subclass->new("-6.25"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1411 - $x = Math::BigFloat::Subclass->new("+6.35"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1412 - $x = Math::BigFloat::Subclass->new("-6.35"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1413 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1414 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-1); ok 1415 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-2); ok 1416 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1417 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1418 - $x = Math::BigFloat::Subclass->new("-0.0065"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1419 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1420 - $x = Math::BigFloat::Subclass->new("0.05"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1421 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1422 - $x = Math::BigFloat::Subclass->new("0.5"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1423 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1424 - $x = Math::BigFloat::Subclass->new("0.51"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1425 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1426 - $x = Math::BigFloat::Subclass->new("0.41"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(0); ok 1427 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1428 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-3); ok 1429 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1430 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-4); ok 1431 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1432 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-5); ok 1433 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-6); ok 1434 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-6); ok 1435 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-7); ok 1436 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-7); ok 1437 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-8); ok 1438 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-8); ok 1439 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-9); ok 1440 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-9); ok 1441 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-12); ok 1442 - $x = Math::BigFloat::Subclass->new("0.01234567"); $Math::BigFloat::Subclass::round_mode = "even"; $x->bfround(-12); ok 1443 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bcmp($y); ok 1444 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1445 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bcmp($y); ok 1446 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1447 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1448 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1449 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1450 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1451 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1452 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1453 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bcmp($y); ok 1454 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bcmp($y); ok 1455 - $x = Math::BigFloat::Subclass->new("-1.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1456 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1.1"); $x->bcmp($y); ok 1457 - $x = Math::BigFloat::Subclass->new("+1.1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bcmp($y); ok 1458 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1.1"); $x->bcmp($y); ok 1459 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1460 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+12"); $x->bcmp($y); ok 1461 - $x = Math::BigFloat::Subclass->new("+12"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1462 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1463 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-12"); $x->bcmp($y); ok 1464 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1465 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+124"); $x->bcmp($y); ok 1466 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+123"); $x->bcmp($y); ok 1467 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-124"); $x->bcmp($y); ok 1468 - $x = Math::BigFloat::Subclass->new("-124"); $y = Math::BigFloat::Subclass->new("-123"); $x->bcmp($y); ok 1469 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.01"); $x->bcmp($y); ok 1470 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1471 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001"); $x->bcmp($y); ok 1472 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.1"); $x->bcmp($y); ok 1473 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1474 - $x = Math::BigFloat::Subclass->new("0.00001"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1475 - $x = Math::BigFloat::Subclass->new("-0.0001"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1476 - $x = Math::BigFloat::Subclass->new("-0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1477 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->bcmp($y); ok 1478 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001234"); $x->bcmp($y); ok 1479 - $x = Math::BigFloat::Subclass->new("0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1480 - $x = Math::BigFloat::Subclass->new("-0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bcmp($y); ok 1481 - $x = Math::BigFloat::Subclass->new("0.0001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1482 - $x = Math::BigFloat::Subclass->new("0.0005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1483 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1484 - $x = Math::BigFloat::Subclass->new("0.001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1485 - $x = Math::BigFloat::Subclass->new("0.000001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1486 - $x = Math::BigFloat::Subclass->new("0.00000123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1487 - $x = Math::BigFloat::Subclass->new("0.00512"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bcmp($y); ok 1488 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.000112"); $x->bcmp($y); ok 1489 - $x = Math::BigFloat::Subclass->new("0.00123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bcmp($y); ok 1490 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bcmp($y); ok 1491 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bcmp($y); ok 1492 - $x = Math::BigFloat::Subclass->new("1.54321"); $y = Math::BigFloat::Subclass->new("234"); $x->bcmp($y); ok 1493 - $x = Math::BigFloat::Subclass->new("234"); $y = Math::BigFloat::Subclass->new("1.54321"); $x->bcmp($y); ok 1494 - $x = Math::BigFloat::Subclass->new("1e1234567890987654321"); $y = Math::BigFloat::Subclass->new("1e1234567890987654320"); $x->bcmp($y); ok 1495 - $x = Math::BigFloat::Subclass->new("1e-1234567890987654321"); $y = Math::BigFloat::Subclass->new("1e-1234567890987654320"); $x->bcmp($y); ok 1496 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bcmp($y); ok 1497 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bcmp($y); ok 1498 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bcmp($y); ok 1499 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bcmp($y); ok 1500 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bcmp($y); ok 1501 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bcmp($y); ok 1502 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bcmp($y); ok 1503 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bcmp($y); ok 1504 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bcmp($y); ok 1505 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1506 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1507 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bcmp($y); ok 1508 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bcmp($y); ok 1509 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $x->bcmp($y); ok 1510 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bcmp($y); ok 1511 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bcmp($y); ok 1512 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bacmp($y); ok 1513 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1514 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bacmp($y); ok 1515 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1516 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1517 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1518 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1519 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1520 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1521 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1522 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bacmp($y); ok 1523 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bacmp($y); ok 1524 - $x = Math::BigFloat::Subclass->new("-1.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1525 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1.1"); $x->bacmp($y); ok 1526 - $x = Math::BigFloat::Subclass->new("+1.1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bacmp($y); ok 1527 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1.1"); $x->bacmp($y); ok 1528 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1529 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+12"); $x->bacmp($y); ok 1530 - $x = Math::BigFloat::Subclass->new("+12"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1531 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1532 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-12"); $x->bacmp($y); ok 1533 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1534 - $x = Math::BigFloat::Subclass->new("+123"); $y = Math::BigFloat::Subclass->new("+124"); $x->bacmp($y); ok 1535 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+123"); $x->bacmp($y); ok 1536 - $x = Math::BigFloat::Subclass->new("-123"); $y = Math::BigFloat::Subclass->new("-124"); $x->bacmp($y); ok 1537 - $x = Math::BigFloat::Subclass->new("-124"); $y = Math::BigFloat::Subclass->new("-123"); $x->bacmp($y); ok 1538 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.01"); $x->bacmp($y); ok 1539 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1540 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001"); $x->bacmp($y); ok 1541 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.1"); $x->bacmp($y); ok 1542 - $x = Math::BigFloat::Subclass->new("0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1543 - $x = Math::BigFloat::Subclass->new("0.00001"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1544 - $x = Math::BigFloat::Subclass->new("-0.0001"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1545 - $x = Math::BigFloat::Subclass->new("-0.1"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1546 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->bacmp($y); ok 1547 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-0.0001234"); $x->bacmp($y); ok 1548 - $x = Math::BigFloat::Subclass->new("0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1549 - $x = Math::BigFloat::Subclass->new("-0.0001234"); $y = Math::BigFloat::Subclass->new("0"); $x->bacmp($y); ok 1550 - $x = Math::BigFloat::Subclass->new("0.0001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1551 - $x = Math::BigFloat::Subclass->new("0.0005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1552 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1553 - $x = Math::BigFloat::Subclass->new("0.001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1554 - $x = Math::BigFloat::Subclass->new("0.000001"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1555 - $x = Math::BigFloat::Subclass->new("0.00000123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1556 - $x = Math::BigFloat::Subclass->new("0.00512"); $y = Math::BigFloat::Subclass->new("0.0001"); $x->bacmp($y); ok 1557 - $x = Math::BigFloat::Subclass->new("0.005"); $y = Math::BigFloat::Subclass->new("0.000112"); $x->bacmp($y); ok 1558 - $x = Math::BigFloat::Subclass->new("0.00123"); $y = Math::BigFloat::Subclass->new("0.0005"); $x->bacmp($y); ok 1559 - $x = Math::BigFloat::Subclass->new("1.5"); $y = Math::BigFloat::Subclass->new("2"); $x->bacmp($y); ok 1560 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.5"); $x->bacmp($y); ok 1561 - $x = Math::BigFloat::Subclass->new("1.54321"); $y = Math::BigFloat::Subclass->new("234"); $x->bacmp($y); ok 1562 - $x = Math::BigFloat::Subclass->new("234"); $y = Math::BigFloat::Subclass->new("1.54321"); $x->bacmp($y); ok 1563 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bacmp($y); ok 1564 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5432112345"); $x->bacmp($y); ok 1565 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bacmp($y); ok 1566 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-5432112345"); $x->bacmp($y); ok 1567 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bacmp($y); ok 1568 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("54321.12345"); $x->bacmp($y); ok 1569 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bacmp($y); ok 1570 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-54321.12345"); $x->bacmp($y); ok 1571 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bacmp($y); ok 1572 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1573 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1574 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bacmp($y); ok 1575 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1576 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1577 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1578 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1579 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bacmp($y); ok 1580 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("inf"); $x->bacmp($y); ok 1581 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bacmp($y); ok 1582 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bacmp($y); ok 1583 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bdec(); ok 1584 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bdec(); ok 1585 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bdec(); ok 1586 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bdec(); ok 1587 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bdec(); ok 1588 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bdec(); ok 1589 - $x = Math::BigFloat::Subclass->new("+0"); $x->bdec(); ok 1590 - $x = Math::BigFloat::Subclass->new("+0"); $x->bdec(); ok 1591 - $x = Math::BigFloat::Subclass->new("+1"); $x->bdec(); ok 1592 - $x = Math::BigFloat::Subclass->new("+1"); $x->bdec(); ok 1593 - $x = Math::BigFloat::Subclass->new("-1"); $x->bdec(); ok 1594 - $x = Math::BigFloat::Subclass->new("-1"); $x->bdec(); ok 1595 - $x = Math::BigFloat::Subclass->new("1.23"); $x->bdec(); ok 1596 - $x = Math::BigFloat::Subclass->new("1.23"); $x->bdec(); ok 1597 - $x = Math::BigFloat::Subclass->new("-1.23"); $x->bdec(); ok 1598 - $x = Math::BigFloat::Subclass->new("-1.23"); $x->bdec(); ok 1599 - $x = Math::BigFloat::Subclass->new("100"); $x->bdec(); ok 1600 - $x = Math::BigFloat::Subclass->new("100"); $x->bdec(); ok 1601 - $x = Math::BigFloat::Subclass->new("101"); $x->bdec(); ok 1602 - $x = Math::BigFloat::Subclass->new("101"); $x->bdec(); ok 1603 - $x = Math::BigFloat::Subclass->new("-100"); $x->bdec(); ok 1604 - $x = Math::BigFloat::Subclass->new("-100"); $x->bdec(); ok 1605 - $x = Math::BigFloat::Subclass->new("-99"); $x->bdec(); ok 1606 - $x = Math::BigFloat::Subclass->new("-99"); $x->bdec(); ok 1607 - $x = Math::BigFloat::Subclass->new("-98"); $x->bdec(); ok 1608 - $x = Math::BigFloat::Subclass->new("-98"); $x->bdec(); ok 1609 - $x = Math::BigFloat::Subclass->new("99"); $x->bdec(); ok 1610 - $x = Math::BigFloat::Subclass->new("99"); $x->bdec(); ok 1611 - $x = Math::BigFloat::Subclass->new("invalid"); $x->binc(); ok 1612 - $x = Math::BigFloat::Subclass->new("invalid"); $x->binc(); ok 1613 - $x = Math::BigFloat::Subclass->new("+inf"); $x->binc(); ok 1614 - $x = Math::BigFloat::Subclass->new("+inf"); $x->binc(); ok 1615 - $x = Math::BigFloat::Subclass->new("-inf"); $x->binc(); ok 1616 - $x = Math::BigFloat::Subclass->new("-inf"); $x->binc(); ok 1617 - $x = Math::BigFloat::Subclass->new("+0"); $x->binc(); ok 1618 - $x = Math::BigFloat::Subclass->new("+0"); $x->binc(); ok 1619 - $x = Math::BigFloat::Subclass->new("+1"); $x->binc(); ok 1620 - $x = Math::BigFloat::Subclass->new("+1"); $x->binc(); ok 1621 - $x = Math::BigFloat::Subclass->new("-1"); $x->binc(); ok 1622 - $x = Math::BigFloat::Subclass->new("-1"); $x->binc(); ok 1623 - $x = Math::BigFloat::Subclass->new("1.23"); $x->binc(); ok 1624 - $x = Math::BigFloat::Subclass->new("1.23"); $x->binc(); ok 1625 - $x = Math::BigFloat::Subclass->new("-1.23"); $x->binc(); ok 1626 - $x = Math::BigFloat::Subclass->new("-1.23"); $x->binc(); ok 1627 - $x = Math::BigFloat::Subclass->new("100"); $x->binc(); ok 1628 - $x = Math::BigFloat::Subclass->new("100"); $x->binc(); ok 1629 - $x = Math::BigFloat::Subclass->new("-100"); $x->binc(); ok 1630 - $x = Math::BigFloat::Subclass->new("-100"); $x->binc(); ok 1631 - $x = Math::BigFloat::Subclass->new("-99"); $x->binc(); ok 1632 - $x = Math::BigFloat::Subclass->new("-99"); $x->binc(); ok 1633 - $x = Math::BigFloat::Subclass->new("-101"); $x->binc(); ok 1634 - $x = Math::BigFloat::Subclass->new("-101"); $x->binc(); ok 1635 - $x = Math::BigFloat::Subclass->new("99"); $x->binc(); ok 1636 - $x = Math::BigFloat::Subclass->new("99"); $x->binc(); ok 1637 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->badd($y); ok 1638 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->badd($y); ok 1639 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1640 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1641 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->badd($y); ok 1642 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->badd($y); ok 1643 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->badd($y); ok 1644 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->badd($y); ok 1645 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1646 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1647 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1648 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1649 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->badd($y); ok 1650 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->badd($y); ok 1651 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1652 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1653 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1654 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->badd($y); ok 1655 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->badd($y); ok 1656 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->badd($y); ok 1657 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->badd($y); ok 1658 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->badd($y); ok 1659 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1660 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1661 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1662 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1663 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1664 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1665 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1666 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1667 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1668 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->badd($y); ok 1669 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1670 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1671 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1672 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1673 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1674 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1675 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1676 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1677 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1678 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1679 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1680 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1681 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1682 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1683 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1684 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1685 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1686 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1687 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1688 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1689 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1690 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1691 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1692 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1693 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1694 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1695 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1696 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1697 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1698 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->badd($y); ok 1699 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1700 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1701 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1702 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1703 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1704 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1705 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1706 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1707 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1708 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1709 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1710 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1711 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1712 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1713 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1714 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1715 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1716 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1717 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1718 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->badd($y); ok 1719 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->badd($y); ok 1720 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->badd($y); ok 1721 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->badd($y); ok 1722 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->badd($y); ok 1723 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->badd($y); ok 1724 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->badd($y); ok 1725 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->badd($y); ok 1726 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->badd($y); ok 1727 - $x = Math::BigFloat::Subclass->new("0.001234"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->badd($y); ok 1728 - $x = Math::BigFloat::Subclass->new("0.001234"); $y = Math::BigFloat::Subclass->new("0.0001234"); $x->badd($y); ok 1729 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bsub($y); ok 1730 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bsub($y); ok 1731 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1732 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1733 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->bsub($y); ok 1734 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->bsub($y); ok 1735 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bsub($y); ok 1736 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bsub($y); ok 1737 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1738 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1739 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1740 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1741 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bsub($y); ok 1742 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bsub($y); ok 1743 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1744 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1745 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1746 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bsub($y); ok 1747 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bsub($y); ok 1748 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bsub($y); ok 1749 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bsub($y); ok 1750 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bsub($y); ok 1751 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1752 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1753 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1754 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1755 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1756 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1757 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1758 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1759 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1760 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bsub($y); ok 1761 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1762 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1763 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1764 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1765 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1766 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1767 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1768 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1769 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1770 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1771 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1772 - $x = Math::BigFloat::Subclass->new("+99"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1773 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1774 - $x = Math::BigFloat::Subclass->new("+999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1775 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1776 - $x = Math::BigFloat::Subclass->new("+9999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1777 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1778 - $x = Math::BigFloat::Subclass->new("+99999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1779 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1780 - $x = Math::BigFloat::Subclass->new("+999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1781 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1782 - $x = Math::BigFloat::Subclass->new("+9999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1783 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1784 - $x = Math::BigFloat::Subclass->new("+99999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1785 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1786 - $x = Math::BigFloat::Subclass->new("+999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1787 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1788 - $x = Math::BigFloat::Subclass->new("+9999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1789 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1790 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+1"); $x->bsub($y); ok 1791 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1792 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1793 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1794 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1795 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1796 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1797 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1798 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1799 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1800 - $x = Math::BigFloat::Subclass->new("+100000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1801 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1802 - $x = Math::BigFloat::Subclass->new("+1000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1803 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1804 - $x = Math::BigFloat::Subclass->new("+10000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1805 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1806 - $x = Math::BigFloat::Subclass->new("+100000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1807 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1808 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1809 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1810 - $x = Math::BigFloat::Subclass->new("+10000000000"); $y = Math::BigFloat::Subclass->new("-1"); $x->bsub($y); ok 1811 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->bsub($y); ok 1812 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->bsub($y); ok 1813 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->bsub($y); ok 1814 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("+987654321"); $x->bsub($y); ok 1815 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->bsub($y); ok 1816 - $x = Math::BigFloat::Subclass->new("-123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->bsub($y); ok 1817 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->bsub($y); ok 1818 - $x = Math::BigFloat::Subclass->new("+123456789"); $y = Math::BigFloat::Subclass->new("-987654321"); $x->bsub($y); ok 1819 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1820 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1821 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1822 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1823 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1824 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1825 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1826 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1827 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1828 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1829 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1830 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1831 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1832 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("invalid"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1833 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1834 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1835 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1836 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1837 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1838 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1839 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1840 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("+inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1841 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1842 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1843 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1844 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1845 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1846 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1847 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1848 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1849 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1850 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1851 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1852 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1853 - $x = Math::BigFloat::Subclass->new("123456789123456789"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1854 - $x = Math::BigFloat::Subclass->new("123456789123456789"); $y = Math::BigFloat::Subclass->new("0"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1855 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("123456789123456789"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1856 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("123456789123456789"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1857 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1858 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1859 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1860 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1861 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1862 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1863 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1864 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1865 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1866 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1867 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1868 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1869 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1870 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1871 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1872 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1873 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1874 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1875 - $x = Math::BigFloat::Subclass->new("111"); $y = Math::BigFloat::Subclass->new("111"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1876 - $x = Math::BigFloat::Subclass->new("111"); $y = Math::BigFloat::Subclass->new("111"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1877 - $x = Math::BigFloat::Subclass->new("10101"); $y = Math::BigFloat::Subclass->new("10101"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1878 - $x = Math::BigFloat::Subclass->new("10101"); $y = Math::BigFloat::Subclass->new("10101"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1879 - $x = Math::BigFloat::Subclass->new("1001001"); $y = Math::BigFloat::Subclass->new("1001001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1880 - $x = Math::BigFloat::Subclass->new("1001001"); $y = Math::BigFloat::Subclass->new("1001001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1881 - $x = Math::BigFloat::Subclass->new("100010001"); $y = Math::BigFloat::Subclass->new("100010001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1882 - $x = Math::BigFloat::Subclass->new("100010001"); $y = Math::BigFloat::Subclass->new("100010001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1883 - $x = Math::BigFloat::Subclass->new("10000100001"); $y = Math::BigFloat::Subclass->new("10000100001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1884 - $x = Math::BigFloat::Subclass->new("10000100001"); $y = Math::BigFloat::Subclass->new("10000100001"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1885 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1886 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1887 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1888 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1889 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1890 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1891 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1892 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1893 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1894 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1895 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1896 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1897 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1898 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1899 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1900 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1901 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1902 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("0"); $x->bmuladd($y, $z); ok 1903 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1904 - $x = Math::BigFloat::Subclass->new("11111111111"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1905 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1906 - $x = Math::BigFloat::Subclass->new("22222222222"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1907 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1908 - $x = Math::BigFloat::Subclass->new("33333333333"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1909 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1910 - $x = Math::BigFloat::Subclass->new("44444444444"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1911 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1912 - $x = Math::BigFloat::Subclass->new("55555555555"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1913 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1914 - $x = Math::BigFloat::Subclass->new("66666666666"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1915 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1916 - $x = Math::BigFloat::Subclass->new("77777777777"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1917 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1918 - $x = Math::BigFloat::Subclass->new("88888888888"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1919 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1920 - $x = Math::BigFloat::Subclass->new("99999999999"); $y = Math::BigFloat::Subclass->new("9"); $z = Math::BigFloat::Subclass->new("1"); $x->bmuladd($y, $z); ok 1921 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1922 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1923 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1924 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1925 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1926 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1927 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1928 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1929 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1930 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1931 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1932 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-4"); $z = Math::BigFloat::Subclass->new("5"); $x->bmuladd($y, $z); ok 1933 - $x = Math::BigFloat::Subclass->new("9999999999999999999"); $y = Math::BigFloat::Subclass->new("10000000000000000000"); $z = Math::BigFloat::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1934 - $x = Math::BigFloat::Subclass->new("9999999999999999999"); $y = Math::BigFloat::Subclass->new("10000000000000000000"); $z = Math::BigFloat::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1935 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("5.7"); $z = Math::BigFloat::Subclass->new("8.9"); $x->bmuladd($y, $z); ok 1936 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("5.7"); $z = Math::BigFloat::Subclass->new("8.9"); $x->bmuladd($y, $z); ok 1937 - $x = Math::BigFloat::Subclass->new("-3.2"); $y = Math::BigFloat::Subclass->new("5.197"); $z = Math::BigFloat::Subclass->new("6.05"); $x->bmuladd($y, $z); ok 1938 - $x = Math::BigFloat::Subclass->new("-3.2"); $y = Math::BigFloat::Subclass->new("5.197"); $z = Math::BigFloat::Subclass->new("6.05"); $x->bmuladd($y, $z); ok 1939 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("8"); $x->bmodpow($y, $z); ok 1940 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("8"); $x->bmodpow($y, $z); ok 1941 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1942 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1943 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1944 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $z = Math::BigFloat::Subclass->new("7"); $x->bmodpow($y, $z); ok 1945 - $x = Math::BigFloat::Subclass->new("77777"); $y = Math::BigFloat::Subclass->new("777"); $z = Math::BigFloat::Subclass->new("123456789"); $x->bmodpow($y, $z); ok 1946 - $x = Math::BigFloat::Subclass->new("77777"); $y = Math::BigFloat::Subclass->new("777"); $z = Math::BigFloat::Subclass->new("123456789"); $x->bmodpow($y, $z); ok 1947 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("6.2"); $z = Math::BigFloat::Subclass->new("5.2"); $x->bmodpow($y, $z); ok 1948 - $x = Math::BigFloat::Subclass->new("3.2"); $y = Math::BigFloat::Subclass->new("6.2"); $z = Math::BigFloat::Subclass->new("5.2"); $x->bmodpow($y, $z); ok 1949 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmul($y); ok 1950 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmul($y); ok 1951 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1952 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1953 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmul($y); ok 1954 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmul($y); ok 1955 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bmul($y); ok 1956 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bmul($y); ok 1957 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bmul($y); ok 1958 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("invalid"); $x->bmul($y); ok 1959 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1960 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1961 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1962 - $x = Math::BigFloat::Subclass->new("invalid"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1963 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1964 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1965 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1966 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1967 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1968 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1969 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1970 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1971 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x->bmul($y); ok 1972 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x->bmul($y); ok 1973 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x->bmul($y); ok 1974 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x->bmul($y); ok 1975 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x->bmul($y); ok 1976 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("123.34"); $x->bmul($y); ok 1977 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x->bmul($y); ok 1978 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-123.34"); $x->bmul($y); ok 1979 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1980 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1981 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1982 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("+inf"); $x->bmul($y); ok 1983 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1984 - $x = Math::BigFloat::Subclass->new("123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1985 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1986 - $x = Math::BigFloat::Subclass->new("-123.34"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmul($y); ok 1987 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1988 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1989 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 1990 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 1991 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1992 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1993 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 1994 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 1995 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1996 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1997 - $x = Math::BigFloat::Subclass->new("+123456789123456789"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1998 - $x = Math::BigFloat::Subclass->new("+123456789123456789"); $y = Math::BigFloat::Subclass->new("+0"); $x->bmul($y); ok 1999 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+123456789123456789"); $x->bmul($y); ok 2000 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+123456789123456789"); $x->bmul($y); ok 2001 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 2002 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 2003 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 2004 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 2005 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 2006 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmul($y); ok 2007 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 2008 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $x->bmul($y); ok 2009 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $x->bmul($y); ok 2010 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+3"); $x->bmul($y); ok 2011 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $x->bmul($y); ok 2012 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("+3"); $x->bmul($y); ok 2013 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmul($y); ok 2014 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmul($y); ok 2015 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmul($y); ok 2016 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmul($y); ok 2017 - $x = Math::BigFloat::Subclass->new("+111"); $y = Math::BigFloat::Subclass->new("+111"); $x->bmul($y); ok 2018 - $x = Math::BigFloat::Subclass->new("+111"); $y = Math::BigFloat::Subclass->new("+111"); $x->bmul($y); ok 2019 - $x = Math::BigFloat::Subclass->new("+10101"); $y = Math::BigFloat::Subclass->new("+10101"); $x->bmul($y); ok 2020 - $x = Math::BigFloat::Subclass->new("+10101"); $y = Math::BigFloat::Subclass->new("+10101"); $x->bmul($y); ok 2021 - $x = Math::BigFloat::Subclass->new("+1001001"); $y = Math::BigFloat::Subclass->new("+1001001"); $x->bmul($y); ok 2022 - $x = Math::BigFloat::Subclass->new("+1001001"); $y = Math::BigFloat::Subclass->new("+1001001"); $x->bmul($y); ok 2023 - $x = Math::BigFloat::Subclass->new("+100010001"); $y = Math::BigFloat::Subclass->new("+100010001"); $x->bmul($y); ok 2024 - $x = Math::BigFloat::Subclass->new("+100010001"); $y = Math::BigFloat::Subclass->new("+100010001"); $x->bmul($y); ok 2025 - $x = Math::BigFloat::Subclass->new("+10000100001"); $y = Math::BigFloat::Subclass->new("+10000100001"); $x->bmul($y); ok 2026 - $x = Math::BigFloat::Subclass->new("+10000100001"); $y = Math::BigFloat::Subclass->new("+10000100001"); $x->bmul($y); ok 2027 - $x = Math::BigFloat::Subclass->new("+11111111111"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2028 - $x = Math::BigFloat::Subclass->new("+11111111111"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2029 - $x = Math::BigFloat::Subclass->new("+22222222222"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2030 - $x = Math::BigFloat::Subclass->new("+22222222222"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2031 - $x = Math::BigFloat::Subclass->new("+33333333333"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2032 - $x = Math::BigFloat::Subclass->new("+33333333333"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2033 - $x = Math::BigFloat::Subclass->new("+44444444444"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2034 - $x = Math::BigFloat::Subclass->new("+44444444444"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2035 - $x = Math::BigFloat::Subclass->new("+55555555555"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2036 - $x = Math::BigFloat::Subclass->new("+55555555555"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2037 - $x = Math::BigFloat::Subclass->new("+66666666666"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2038 - $x = Math::BigFloat::Subclass->new("+66666666666"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2039 - $x = Math::BigFloat::Subclass->new("+77777777777"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2040 - $x = Math::BigFloat::Subclass->new("+77777777777"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2041 - $x = Math::BigFloat::Subclass->new("+88888888888"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2042 - $x = Math::BigFloat::Subclass->new("+88888888888"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2043 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2044 - $x = Math::BigFloat::Subclass->new("+99999999999"); $y = Math::BigFloat::Subclass->new("+9"); $x->bmul($y); ok 2045 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("120"); $x->bmul($y); ok 2046 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("120"); $x->bmul($y); ok 2047 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("10000"); $x->bmul($y); ok 2048 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("10000"); $x->bmul($y); ok 2049 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2050 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2051 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2052 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("5"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2053 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2054 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2055 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2056 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::round_mode = "even"; join(",", $x->bdiv($y)); ok 2057 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2058 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2059 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2060 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2061 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2062 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2063 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2064 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2065 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2066 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("abc"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2067 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2068 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2069 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2070 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2071 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2072 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2073 - $x = Math::BigFloat::Subclass->new("+3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2074 - $x = Math::BigFloat::Subclass->new("+3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2075 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2076 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2077 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2078 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2079 - $x = Math::BigFloat::Subclass->new("-3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2080 - $x = Math::BigFloat::Subclass->new("-3214"); $y = Math::BigFloat::Subclass->new("+0"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2081 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2082 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2083 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2084 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2085 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2086 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2087 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2088 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2089 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+2"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2090 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("+2"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2091 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2092 - $x = Math::BigFloat::Subclass->new("+2"); $y = Math::BigFloat::Subclass->new("+1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2093 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2094 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("+inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2095 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2096 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2097 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("+5"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2098 - $x = Math::BigFloat::Subclass->new("+10"); $y = Math::BigFloat::Subclass->new("+5"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2099 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("+4"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2100 - $x = Math::BigFloat::Subclass->new("+100"); $y = Math::BigFloat::Subclass->new("+4"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2101 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("+8"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2102 - $x = Math::BigFloat::Subclass->new("+1000"); $y = Math::BigFloat::Subclass->new("+8"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2103 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("+16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2104 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("+16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2105 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2106 - $x = Math::BigFloat::Subclass->new("+10000"); $y = Math::BigFloat::Subclass->new("-16"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2107 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2108 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2109 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+99"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2110 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+99"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2111 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2112 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2113 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2114 - $x = Math::BigFloat::Subclass->new("+999999999999"); $y = Math::BigFloat::Subclass->new("+9999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2115 - $x = Math::BigFloat::Subclass->new("+999999999999999"); $y = Math::BigFloat::Subclass->new("+99999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2116 - $x = Math::BigFloat::Subclass->new("+999999999999999"); $y = Math::BigFloat::Subclass->new("+99999"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2117 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2118 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2119 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2120 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2121 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2122 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2123 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2124 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2125 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2126 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2127 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2128 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2129 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2130 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2131 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2132 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2133 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2134 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2135 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2136 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2137 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2138 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2139 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2140 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2141 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2142 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2143 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2144 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2145 - $x = Math::BigFloat::Subclass->new("123456"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2146 - $x = Math::BigFloat::Subclass->new("123456"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $Math::BigFloat::Subclass::round_mode = "even"; scalar $x->bdiv($y); ok 2147 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2148 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2149 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2150 - $x = Math::BigFloat::Subclass->new("+2000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2151 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2152 - $x = Math::BigFloat::Subclass->new("+3000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2153 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2154 - $x = Math::BigFloat::Subclass->new("+4000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2155 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2156 - $x = Math::BigFloat::Subclass->new("+5000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2157 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2158 - $x = Math::BigFloat::Subclass->new("+6000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2159 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2160 - $x = Math::BigFloat::Subclass->new("+7000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2161 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2162 - $x = Math::BigFloat::Subclass->new("+8000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2163 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2164 - $x = Math::BigFloat::Subclass->new("+9000000000"); $y = Math::BigFloat::Subclass->new("+9"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2165 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2166 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2167 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2168 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("100"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2169 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2170 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1000"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2171 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10000"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2172 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("10000"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2173 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("504"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2174 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("504"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2175 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.987654321"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2176 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1.987654321"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2177 - $x = Math::BigFloat::Subclass->new("123456789.123456789123456789123456789"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2178 - $x = Math::BigFloat::Subclass->new("123456789.123456789123456789123456789"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2179 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2180 - $x = Math::BigFloat::Subclass->new("+35500000"); $y = Math::BigFloat::Subclass->new("+113"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2181 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2182 - $x = Math::BigFloat::Subclass->new("+71000000"); $y = Math::BigFloat::Subclass->new("+226"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2183 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2184 - $x = Math::BigFloat::Subclass->new("+106500000"); $y = Math::BigFloat::Subclass->new("+339"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2185 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2186 - $x = Math::BigFloat::Subclass->new("+1000000000"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 20; scalar $x->bdiv($y); ok 2187 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 1; scalar $x->bdiv($y); ok 2188 - $x = Math::BigFloat::Subclass->new("+124"); $y = Math::BigFloat::Subclass->new("+3"); $Math::BigFloat::Subclass::div_scale = 1; scalar $x->bdiv($y); ok 2189 - $x = Math::BigFloat::Subclass->new("123456789.1234"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 1; scalar $x->bdiv($y); ok 2190 - $x = Math::BigFloat::Subclass->new("123456789.1234"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 1; scalar $x->bdiv($y); ok 2191 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("4"); $x->bmod($y); ok 2192 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("4"); $x->bmod($y); ok 2193 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2194 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2195 - $x = Math::BigFloat::Subclass->new("+9000"); $y = Math::BigFloat::Subclass->new("56"); $x->bmod($y); ok 2196 - $x = Math::BigFloat::Subclass->new("+9000"); $y = Math::BigFloat::Subclass->new("56"); $x->bmod($y); ok 2197 - $x = Math::BigFloat::Subclass->new("+56"); $y = Math::BigFloat::Subclass->new("9000"); $x->bmod($y); ok 2198 - $x = Math::BigFloat::Subclass->new("+56"); $y = Math::BigFloat::Subclass->new("9000"); $x->bmod($y); ok 2199 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2200 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2201 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2202 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2203 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2204 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2205 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2206 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2207 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2208 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2209 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2210 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2211 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2212 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2213 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2214 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2215 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2216 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2217 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2218 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2219 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2220 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2221 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2222 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2223 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2224 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2225 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2226 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2227 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2228 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmod($y); ok 2229 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2230 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmod($y); ok 2231 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2232 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2233 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2234 - $x = Math::BigFloat::Subclass->new("inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2235 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2236 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2237 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2238 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2239 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2240 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2241 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmod($y); ok 2242 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmod($y); ok 2243 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2244 - $x = Math::BigFloat::Subclass->new("abc"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2245 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmod($y); ok 2246 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("abc"); $x->bmod($y); ok 2247 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2248 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2249 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2250 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2251 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2252 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2253 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2254 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $x->bmod($y); ok 2255 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2256 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2257 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2258 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2259 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2260 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2261 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2262 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2263 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmod($y); ok 2264 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmod($y); ok 2265 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2266 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2267 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2268 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2269 - $x = Math::BigFloat::Subclass->new("2000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2270 - $x = Math::BigFloat::Subclass->new("2000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2271 - $x = Math::BigFloat::Subclass->new("3000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2272 - $x = Math::BigFloat::Subclass->new("3000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2273 - $x = Math::BigFloat::Subclass->new("4000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2274 - $x = Math::BigFloat::Subclass->new("4000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2275 - $x = Math::BigFloat::Subclass->new("5000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2276 - $x = Math::BigFloat::Subclass->new("5000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2277 - $x = Math::BigFloat::Subclass->new("6000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2278 - $x = Math::BigFloat::Subclass->new("6000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2279 - $x = Math::BigFloat::Subclass->new("7000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2280 - $x = Math::BigFloat::Subclass->new("7000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2281 - $x = Math::BigFloat::Subclass->new("8000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2282 - $x = Math::BigFloat::Subclass->new("8000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2283 - $x = Math::BigFloat::Subclass->new("9000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2284 - $x = Math::BigFloat::Subclass->new("9000000000"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2285 - $x = Math::BigFloat::Subclass->new("35500000"); $y = Math::BigFloat::Subclass->new("113"); $x->bmod($y); ok 2286 - $x = Math::BigFloat::Subclass->new("35500000"); $y = Math::BigFloat::Subclass->new("113"); $x->bmod($y); ok 2287 - $x = Math::BigFloat::Subclass->new("71000000"); $y = Math::BigFloat::Subclass->new("226"); $x->bmod($y); ok 2288 - $x = Math::BigFloat::Subclass->new("71000000"); $y = Math::BigFloat::Subclass->new("226"); $x->bmod($y); ok 2289 - $x = Math::BigFloat::Subclass->new("106500000"); $y = Math::BigFloat::Subclass->new("339"); $x->bmod($y); ok 2290 - $x = Math::BigFloat::Subclass->new("106500000"); $y = Math::BigFloat::Subclass->new("339"); $x->bmod($y); ok 2291 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2292 - $x = Math::BigFloat::Subclass->new("1000000000"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2293 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2294 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x->bmod($y); ok 2295 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("4"); $x->bmod($y); ok 2296 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("4"); $x->bmod($y); ok 2297 - $x = Math::BigFloat::Subclass->new("1000"); $y = Math::BigFloat::Subclass->new("8"); $x->bmod($y); ok 2298 - $x = Math::BigFloat::Subclass->new("1000"); $y = Math::BigFloat::Subclass->new("8"); $x->bmod($y); ok 2299 - $x = Math::BigFloat::Subclass->new("10000"); $y = Math::BigFloat::Subclass->new("16"); $x->bmod($y); ok 2300 - $x = Math::BigFloat::Subclass->new("10000"); $y = Math::BigFloat::Subclass->new("16"); $x->bmod($y); ok 2301 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2302 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9"); $x->bmod($y); ok 2303 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("99"); $x->bmod($y); ok 2304 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("99"); $x->bmod($y); ok 2305 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("999"); $x->bmod($y); ok 2306 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("999"); $x->bmod($y); ok 2307 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9999"); $x->bmod($y); ok 2308 - $x = Math::BigFloat::Subclass->new("999999999999"); $y = Math::BigFloat::Subclass->new("9999"); $x->bmod($y); ok 2309 - $x = Math::BigFloat::Subclass->new("999999999999999"); $y = Math::BigFloat::Subclass->new("99999"); $x->bmod($y); ok 2310 - $x = Math::BigFloat::Subclass->new("999999999999999"); $y = Math::BigFloat::Subclass->new("99999"); $x->bmod($y); ok 2311 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("+5"); $x->bmod($y); ok 2312 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("+5"); $x->bmod($y); ok 2313 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2314 - $x = Math::BigFloat::Subclass->new("+9"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2315 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2316 - $x = Math::BigFloat::Subclass->new("-9"); $y = Math::BigFloat::Subclass->new("-5"); $x->bmod($y); ok 2317 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2318 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2319 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2320 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2321 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2322 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2323 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2324 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2325 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2326 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2327 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2328 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2329 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2330 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2331 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2332 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("-3"); $x->bmod($y); ok 2333 - $x = Math::BigFloat::Subclass->new("4095"); $y = Math::BigFloat::Subclass->new("4095"); $x->bmod($y); ok 2334 - $x = Math::BigFloat::Subclass->new("4095"); $y = Math::BigFloat::Subclass->new("4095"); $x->bmod($y); ok 2335 - $x = Math::BigFloat::Subclass->new("100041000510123"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2336 - $x = Math::BigFloat::Subclass->new("100041000510123"); $y = Math::BigFloat::Subclass->new("3"); $x->bmod($y); ok 2337 - $x = Math::BigFloat::Subclass->new("152403346"); $y = Math::BigFloat::Subclass->new("12345"); $x->bmod($y); ok 2338 - $x = Math::BigFloat::Subclass->new("152403346"); $y = Math::BigFloat::Subclass->new("12345"); $x->bmod($y); ok 2339 - $x = Math::BigFloat::Subclass->new("87654321"); $y = Math::BigFloat::Subclass->new("87654321"); $x->bmod($y); ok 2340 - $x = Math::BigFloat::Subclass->new("87654321"); $y = Math::BigFloat::Subclass->new("87654321"); $x->bmod($y); ok 2341 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2342 - $x = Math::BigFloat::Subclass->new("123"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2343 - $x = Math::BigFloat::Subclass->new("1230"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2344 - $x = Math::BigFloat::Subclass->new("1230"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2345 - $x = Math::BigFloat::Subclass->new("123.4"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2346 - $x = Math::BigFloat::Subclass->new("123.4"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmod($y); ok 2347 - $x = Math::BigFloat::Subclass->new("123e1"); $y = Math::BigFloat::Subclass->new("25"); $x->bmod($y); ok 2348 - $x = Math::BigFloat::Subclass->new("123e1"); $y = Math::BigFloat::Subclass->new("25"); $x->bmod($y); ok 2349 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2350 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2351 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2352 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2353 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2354 - $x = Math::BigFloat::Subclass->new("-2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2355 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2356 - $x = Math::BigFloat::Subclass->new("2.1"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2357 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2358 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2359 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2360 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmod($y); ok 2361 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2362 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2363 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2364 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmod($y); ok 2365 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bfac(); ok 2366 - $x = Math::BigFloat::Subclass->new("invalid"); $x->bfac(); ok 2367 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfac(); ok 2368 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfac(); ok 2369 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfac(); ok 2370 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfac(); ok 2371 - $x = Math::BigFloat::Subclass->new("-1"); $x->bfac(); ok 2372 - $x = Math::BigFloat::Subclass->new("-1"); $x->bfac(); ok 2373 - $x = Math::BigFloat::Subclass->new("0"); $x->bfac(); ok 2374 - $x = Math::BigFloat::Subclass->new("0"); $x->bfac(); ok 2375 - $x = Math::BigFloat::Subclass->new("1"); $x->bfac(); ok 2376 - $x = Math::BigFloat::Subclass->new("1"); $x->bfac(); ok 2377 - $x = Math::BigFloat::Subclass->new("2"); $x->bfac(); ok 2378 - $x = Math::BigFloat::Subclass->new("2"); $x->bfac(); ok 2379 - $x = Math::BigFloat::Subclass->new("3"); $x->bfac(); ok 2380 - $x = Math::BigFloat::Subclass->new("3"); $x->bfac(); ok 2381 - $x = Math::BigFloat::Subclass->new("4"); $x->bfac(); ok 2382 - $x = Math::BigFloat::Subclass->new("4"); $x->bfac(); ok 2383 - $x = Math::BigFloat::Subclass->new("5"); $x->bfac(); ok 2384 - $x = Math::BigFloat::Subclass->new("5"); $x->bfac(); ok 2385 - $x = Math::BigFloat::Subclass->new("6"); $x->bfac(); ok 2386 - $x = Math::BigFloat::Subclass->new("6"); $x->bfac(); ok 2387 - $x = Math::BigFloat::Subclass->new("7"); $x->bfac(); ok 2388 - $x = Math::BigFloat::Subclass->new("7"); $x->bfac(); ok 2389 - $x = Math::BigFloat::Subclass->new("8"); $x->bfac(); ok 2390 - $x = Math::BigFloat::Subclass->new("8"); $x->bfac(); ok 2391 - $x = Math::BigFloat::Subclass->new("9"); $x->bfac(); ok 2392 - $x = Math::BigFloat::Subclass->new("9"); $x->bfac(); ok 2393 - $x = Math::BigFloat::Subclass->new("10"); $x->bfac(); ok 2394 - $x = Math::BigFloat::Subclass->new("10"); $x->bfac(); ok 2395 - $x = Math::BigFloat::Subclass->new("11"); $x->bfac(); ok 2396 - $x = Math::BigFloat::Subclass->new("11"); $x->bfac(); ok 2397 - $x = Math::BigFloat::Subclass->new("12"); $x->bfac(); ok 2398 - $x = Math::BigFloat::Subclass->new("12"); $x->bfac(); ok 2399 - $x = Math::BigFloat::Subclass->new("20"); $x->bfac(); ok 2400 - $x = Math::BigFloat::Subclass->new("20"); $x->bfac(); ok 2401 - $x = Math::BigFloat::Subclass->new("22"); $x->bfac(); ok 2402 - $x = Math::BigFloat::Subclass->new("22"); $x->bfac(); ok 2403 - $x = Math::BigFloat::Subclass->new("69"); $x->bfac(); ok 2404 - $x = Math::BigFloat::Subclass->new("69"); $x->bfac(); ok 2405 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bdfac(); ok 2406 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bdfac(); ok 2407 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bdfac(); ok 2408 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bdfac(); ok 2409 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bdfac(); ok 2410 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bdfac(); ok 2411 - $x = Math::BigFloat::Subclass->new("-2"); $x->bdfac(); ok 2412 - $x = Math::BigFloat::Subclass->new("-2"); $x->bdfac(); ok 2413 - $x = Math::BigFloat::Subclass->new("-1"); $x->bdfac(); ok 2414 - $x = Math::BigFloat::Subclass->new("-1"); $x->bdfac(); ok 2415 - $x = Math::BigFloat::Subclass->new("0"); $x->bdfac(); ok 2416 - $x = Math::BigFloat::Subclass->new("0"); $x->bdfac(); ok 2417 - $x = Math::BigFloat::Subclass->new("1"); $x->bdfac(); ok 2418 - $x = Math::BigFloat::Subclass->new("1"); $x->bdfac(); ok 2419 - $x = Math::BigFloat::Subclass->new("2"); $x->bdfac(); ok 2420 - $x = Math::BigFloat::Subclass->new("2"); $x->bdfac(); ok 2421 - $x = Math::BigFloat::Subclass->new("3"); $x->bdfac(); ok 2422 - $x = Math::BigFloat::Subclass->new("3"); $x->bdfac(); ok 2423 - $x = Math::BigFloat::Subclass->new("4"); $x->bdfac(); ok 2424 - $x = Math::BigFloat::Subclass->new("4"); $x->bdfac(); ok 2425 - $x = Math::BigFloat::Subclass->new("5"); $x->bdfac(); ok 2426 - $x = Math::BigFloat::Subclass->new("5"); $x->bdfac(); ok 2427 - $x = Math::BigFloat::Subclass->new("6"); $x->bdfac(); ok 2428 - $x = Math::BigFloat::Subclass->new("6"); $x->bdfac(); ok 2429 - $x = Math::BigFloat::Subclass->new("7"); $x->bdfac(); ok 2430 - $x = Math::BigFloat::Subclass->new("7"); $x->bdfac(); ok 2431 - $x = Math::BigFloat::Subclass->new("8"); $x->bdfac(); ok 2432 - $x = Math::BigFloat::Subclass->new("8"); $x->bdfac(); ok 2433 - $x = Math::BigFloat::Subclass->new("9"); $x->bdfac(); ok 2434 - $x = Math::BigFloat::Subclass->new("9"); $x->bdfac(); ok 2435 - $x = Math::BigFloat::Subclass->new("10"); $x->bdfac(); ok 2436 - $x = Math::BigFloat::Subclass->new("10"); $x->bdfac(); ok 2437 - $x = Math::BigFloat::Subclass->new("11"); $x->bdfac(); ok 2438 - $x = Math::BigFloat::Subclass->new("11"); $x->bdfac(); ok 2439 - $x = Math::BigFloat::Subclass->new("12"); $x->bdfac(); ok 2440 - $x = Math::BigFloat::Subclass->new("12"); $x->bdfac(); ok 2441 - $x = Math::BigFloat::Subclass->new("NaN"); $x->btfac(); ok 2442 - $x = Math::BigFloat::Subclass->new("NaN"); $x->btfac(); ok 2443 - $x = Math::BigFloat::Subclass->new("+inf"); $x->btfac(); ok 2444 - $x = Math::BigFloat::Subclass->new("+inf"); $x->btfac(); ok 2445 - $x = Math::BigFloat::Subclass->new("-inf"); $x->btfac(); ok 2446 - $x = Math::BigFloat::Subclass->new("-inf"); $x->btfac(); ok 2447 - $x = Math::BigFloat::Subclass->new("-3"); $x->btfac(); ok 2448 - $x = Math::BigFloat::Subclass->new("-3"); $x->btfac(); ok 2449 - $x = Math::BigFloat::Subclass->new("-2"); $x->btfac(); ok 2450 - $x = Math::BigFloat::Subclass->new("-2"); $x->btfac(); ok 2451 - $x = Math::BigFloat::Subclass->new("-1"); $x->btfac(); ok 2452 - $x = Math::BigFloat::Subclass->new("-1"); $x->btfac(); ok 2453 - $x = Math::BigFloat::Subclass->new("0"); $x->btfac(); ok 2454 - $x = Math::BigFloat::Subclass->new("0"); $x->btfac(); ok 2455 - $x = Math::BigFloat::Subclass->new("1"); $x->btfac(); ok 2456 - $x = Math::BigFloat::Subclass->new("1"); $x->btfac(); ok 2457 - $x = Math::BigFloat::Subclass->new("2"); $x->btfac(); ok 2458 - $x = Math::BigFloat::Subclass->new("2"); $x->btfac(); ok 2459 - $x = Math::BigFloat::Subclass->new("3"); $x->btfac(); ok 2460 - $x = Math::BigFloat::Subclass->new("3"); $x->btfac(); ok 2461 - $x = Math::BigFloat::Subclass->new("4"); $x->btfac(); ok 2462 - $x = Math::BigFloat::Subclass->new("4"); $x->btfac(); ok 2463 - $x = Math::BigFloat::Subclass->new("5"); $x->btfac(); ok 2464 - $x = Math::BigFloat::Subclass->new("5"); $x->btfac(); ok 2465 - $x = Math::BigFloat::Subclass->new("6"); $x->btfac(); ok 2466 - $x = Math::BigFloat::Subclass->new("6"); $x->btfac(); ok 2467 - $x = Math::BigFloat::Subclass->new("7"); $x->btfac(); ok 2468 - $x = Math::BigFloat::Subclass->new("7"); $x->btfac(); ok 2469 - $x = Math::BigFloat::Subclass->new("8"); $x->btfac(); ok 2470 - $x = Math::BigFloat::Subclass->new("8"); $x->btfac(); ok 2471 - $x = Math::BigFloat::Subclass->new("9"); $x->btfac(); ok 2472 - $x = Math::BigFloat::Subclass->new("9"); $x->btfac(); ok 2473 - $x = Math::BigFloat::Subclass->new("10"); $x->btfac(); ok 2474 - $x = Math::BigFloat::Subclass->new("10"); $x->btfac(); ok 2475 - $x = Math::BigFloat::Subclass->new("11"); $x->btfac(); ok 2476 - $x = Math::BigFloat::Subclass->new("11"); $x->btfac(); ok 2477 - $x = Math::BigFloat::Subclass->new("12"); $x->btfac(); ok 2478 - $x = Math::BigFloat::Subclass->new("12"); $x->btfac(); ok 2479 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmfac($y); ok 2480 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("-inf"); $x->bmfac($y); ok 2481 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmfac($y); ok 2482 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("-1"); $x->bmfac($y); ok 2483 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bmfac($y); ok 2484 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("0"); $x->bmfac($y); ok 2485 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmfac($y); ok 2486 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("2.5"); $x->bmfac($y); ok 2487 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmfac($y); ok 2488 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("inf"); $x->bmfac($y); ok 2489 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bmfac($y); ok 2490 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("NaN"); $x->bmfac($y); ok 2491 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2492 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2493 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2494 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2495 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2496 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2497 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2498 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2499 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2500 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2501 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2502 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2503 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2504 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2505 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2506 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2507 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2508 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2509 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2510 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2511 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2512 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2513 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2514 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2515 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2516 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2517 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2518 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2519 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2520 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("1"); $x->bmfac($y); ok 2521 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2522 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2523 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2524 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2525 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2526 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2527 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2528 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2529 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2530 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2531 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2532 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2533 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2534 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2535 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2536 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2537 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2538 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2539 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2540 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2541 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2542 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2543 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2544 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2545 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2546 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2547 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2548 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2549 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2550 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2551 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2552 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("2"); $x->bmfac($y); ok 2553 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2554 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2555 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2556 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2557 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2558 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2559 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2560 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2561 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2562 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2563 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2564 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2565 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2566 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2567 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2568 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2569 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2570 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2571 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2572 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2573 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2574 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2575 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2576 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2577 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2578 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2579 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2580 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2581 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2582 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2583 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2584 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2585 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2586 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("3"); $x->bmfac($y); ok 2587 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2588 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2589 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2590 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2591 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2592 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2593 - $x = Math::BigFloat::Subclass->new("-4"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2594 - $x = Math::BigFloat::Subclass->new("-4"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2595 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2596 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2597 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2598 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2599 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2600 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2601 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2602 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2603 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2604 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2605 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2606 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2607 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2608 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2609 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2610 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2611 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2612 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2613 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2614 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2615 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2616 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2617 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2618 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2619 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2620 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2621 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2622 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("4"); $x->bmfac($y); ok 2623 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2624 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2625 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2626 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2627 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2628 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2629 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2630 - $x = Math::BigFloat::Subclass->new("-5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2631 - $x = Math::BigFloat::Subclass->new("-4"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2632 - $x = Math::BigFloat::Subclass->new("-4"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2633 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2634 - $x = Math::BigFloat::Subclass->new("-3"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2635 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2636 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2637 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2638 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2639 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2640 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2641 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2642 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2643 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2644 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2645 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2646 - $x = Math::BigFloat::Subclass->new("3"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2647 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2648 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2649 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2650 - $x = Math::BigFloat::Subclass->new("5"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2651 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2652 - $x = Math::BigFloat::Subclass->new("6"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2653 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2654 - $x = Math::BigFloat::Subclass->new("7"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2655 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2656 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2657 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2658 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2659 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2660 - $x = Math::BigFloat::Subclass->new("10"); $y = Math::BigFloat::Subclass->new("5"); $x->bmfac($y); ok 2661 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2662 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2663 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2664 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2665 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2666 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2667 - $x = Math::BigFloat::Subclass->new("-123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2668 - $x = Math::BigFloat::Subclass->new("-123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2669 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2670 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2671 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2672 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2673 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2674 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2675 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2676 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2677 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2678 - $x = Math::BigFloat::Subclass->new("4"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2679 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2680 - $x = Math::BigFloat::Subclass->new("9"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2681 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2682 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2683 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2684 - $x = Math::BigFloat::Subclass->new("100"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2685 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2686 - $x = Math::BigFloat::Subclass->new("123.456"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2687 - $x = Math::BigFloat::Subclass->new("15241.38393"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2688 - $x = Math::BigFloat::Subclass->new("15241.38393"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2689 - $x = Math::BigFloat::Subclass->new("1.44"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2690 - $x = Math::BigFloat::Subclass->new("1.44"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2691 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2692 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2693 - $x = Math::BigFloat::Subclass->new("0.49"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2694 - $x = Math::BigFloat::Subclass->new("0.49"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2695 - $x = Math::BigFloat::Subclass->new("0.0049"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2696 - $x = Math::BigFloat::Subclass->new("0.0049"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2697 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2698 - $x = Math::BigFloat::Subclass->new("1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2699 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2700 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2701 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2702 - $x = Math::BigFloat::Subclass->new("0"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2703 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2704 - $x = Math::BigFloat::Subclass->new("-inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2705 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2706 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("NaN"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2707 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2708 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2709 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2710 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("2"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2711 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2712 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2713 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2714 - $x = Math::BigFloat::Subclass->new("NaN"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2715 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2716 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("-inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2717 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2718 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("inf"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2719 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2720 - $x = Math::BigFloat::Subclass->new("+0"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2721 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2722 - $x = Math::BigFloat::Subclass->new("+1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2723 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2724 - $x = Math::BigFloat::Subclass->new("-1"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2725 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2726 - $x = Math::BigFloat::Subclass->new("-2"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2727 - $x = Math::BigFloat::Subclass->new("-123.45"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2728 - $x = Math::BigFloat::Subclass->new("-123.45"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2729 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2730 - $x = Math::BigFloat::Subclass->new("+inf"); $y = Math::BigFloat::Subclass->new("0"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2731 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2732 - $x = Math::BigFloat::Subclass->new("12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2733 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2734 - $x = Math::BigFloat::Subclass->new("-12"); $y = Math::BigFloat::Subclass->new("1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2735 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2736 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2737 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2738 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("-1"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2739 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2740 - $x = Math::BigFloat::Subclass->new("8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2741 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2742 - $x = Math::BigFloat::Subclass->new("-8"); $y = Math::BigFloat::Subclass->new("3"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2743 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2744 - $x = Math::BigFloat::Subclass->new("16"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2745 - $x = Math::BigFloat::Subclass->new("81"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2746 - $x = Math::BigFloat::Subclass->new("81"); $y = Math::BigFloat::Subclass->new("4"); $Math::BigFloat::Subclass::div_scale = 40; $x->broot($y); ok 2747 - $x = Math::BigFloat::Subclass->new("+0"); $x->bsqrt(); ok 2748 - $x = Math::BigFloat::Subclass->new("+0"); $x->bsqrt(); ok 2749 - $x = Math::BigFloat::Subclass->new("-1"); $x->bsqrt(); ok 2750 - $x = Math::BigFloat::Subclass->new("-1"); $x->bsqrt(); ok 2751 - $x = Math::BigFloat::Subclass->new("-2"); $x->bsqrt(); ok 2752 - $x = Math::BigFloat::Subclass->new("-2"); $x->bsqrt(); ok 2753 - $x = Math::BigFloat::Subclass->new("-16"); $x->bsqrt(); ok 2754 - $x = Math::BigFloat::Subclass->new("-16"); $x->bsqrt(); ok 2755 - $x = Math::BigFloat::Subclass->new("-123.45"); $x->bsqrt(); ok 2756 - $x = Math::BigFloat::Subclass->new("-123.45"); $x->bsqrt(); ok 2757 - $x = Math::BigFloat::Subclass->new("nanbsqrt"); $x->bsqrt(); ok 2758 - $x = Math::BigFloat::Subclass->new("nanbsqrt"); $x->bsqrt(); ok 2759 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bsqrt(); ok 2760 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bsqrt(); ok 2761 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bsqrt(); ok 2762 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bsqrt(); ok 2763 - $x = Math::BigFloat::Subclass->new("1"); $x->bsqrt(); ok 2764 - $x = Math::BigFloat::Subclass->new("1"); $x->bsqrt(); ok 2765 - $x = Math::BigFloat::Subclass->new("2"); $x->bsqrt(); ok 2766 - $x = Math::BigFloat::Subclass->new("2"); $x->bsqrt(); ok 2767 - $x = Math::BigFloat::Subclass->new("4"); $x->bsqrt(); ok 2768 - $x = Math::BigFloat::Subclass->new("4"); $x->bsqrt(); ok 2769 - $x = Math::BigFloat::Subclass->new("9"); $x->bsqrt(); ok 2770 - $x = Math::BigFloat::Subclass->new("9"); $x->bsqrt(); ok 2771 - $x = Math::BigFloat::Subclass->new("16"); $x->bsqrt(); ok 2772 - $x = Math::BigFloat::Subclass->new("16"); $x->bsqrt(); ok 2773 - $x = Math::BigFloat::Subclass->new("100"); $x->bsqrt(); ok 2774 - $x = Math::BigFloat::Subclass->new("100"); $x->bsqrt(); ok 2775 - $x = Math::BigFloat::Subclass->new("123.456"); $x->bsqrt(); ok 2776 - $x = Math::BigFloat::Subclass->new("123.456"); $x->bsqrt(); ok 2777 - $x = Math::BigFloat::Subclass->new("15241.38393"); $x->bsqrt(); ok 2778 - $x = Math::BigFloat::Subclass->new("15241.38393"); $x->bsqrt(); ok 2779 - $x = Math::BigFloat::Subclass->new("1.44"); $x->bsqrt(); ok 2780 - $x = Math::BigFloat::Subclass->new("1.44"); $x->bsqrt(); ok 2781 - $x = Math::BigFloat::Subclass->new("1.44E10"); $x->bsqrt(); ok 2782 - $x = Math::BigFloat::Subclass->new("1.44E10"); $x->bsqrt(); ok 2783 - $x = Math::BigFloat::Subclass->new("2e10"); $x->bsqrt(); ok 2784 - $x = Math::BigFloat::Subclass->new("2e10"); $x->bsqrt(); ok 2785 - $x = Math::BigFloat::Subclass->new("144e20"); $x->bsqrt(); ok 2786 - $x = Math::BigFloat::Subclass->new("144e20"); $x->bsqrt(); ok 2787 - $x = Math::BigFloat::Subclass->new("12"); $x->bsqrt(); ok 2788 - $x = Math::BigFloat::Subclass->new("12"); $x->bsqrt(); ok 2789 - $x = Math::BigFloat::Subclass->new("0.49"); $x->bsqrt(); ok 2790 - $x = Math::BigFloat::Subclass->new("0.49"); $x->bsqrt(); ok 2791 - $x = Math::BigFloat::Subclass->new("0.0049"); $x->bsqrt(); ok 2792 - $x = Math::BigFloat::Subclass->new("0.0049"); $x->bsqrt(); ok 2793 - $x = Math::BigFloat::Subclass->new("123"); $x->is_nan(); ok 2794 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_nan(); ok 2795 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_nan(); ok 2796 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_nan(); ok 2797 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf(""); ok 2798 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf(""); ok 2799 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_inf(""); ok 2800 - $x = Math::BigFloat::Subclass->new("1"); $x->is_inf(""); ok 2801 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_inf(""); ok 2802 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_inf(""); ok 2803 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("-"); ok 2804 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("+"); ok 2805 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("-"); ok 2806 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("+"); ok 2807 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("-inf"); ok 2808 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_inf("+inf"); ok 2809 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("-inf"); ok 2810 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_inf("+inf"); ok 2811 - $x = Math::BigFloat::Subclass->new("+iNfInItY"); $x->is_inf(""); ok 2812 - $x = Math::BigFloat::Subclass->new("-InFiNiTy"); $x->is_inf(""); ok 2813 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_odd(); ok 2814 - $x = Math::BigFloat::Subclass->new("0"); $x->is_odd(); ok 2815 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_odd(); ok 2816 - $x = Math::BigFloat::Subclass->new("-3"); $x->is_odd(); ok 2817 - $x = Math::BigFloat::Subclass->new("1"); $x->is_odd(); ok 2818 - $x = Math::BigFloat::Subclass->new("3"); $x->is_odd(); ok 2819 - $x = Math::BigFloat::Subclass->new("1000001"); $x->is_odd(); ok 2820 - $x = Math::BigFloat::Subclass->new("1000002"); $x->is_odd(); ok 2821 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_odd(); ok 2822 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_odd(); ok 2823 - $x = Math::BigFloat::Subclass->new("123.45"); $x->is_odd(); ok 2824 - $x = Math::BigFloat::Subclass->new("-123.45"); $x->is_odd(); ok 2825 - $x = Math::BigFloat::Subclass->new("2"); $x->is_odd(); ok 2826 - $x = Math::BigFloat::Subclass->new("invalid"); $x->is_int(); ok 2827 - $x = Math::BigFloat::Subclass->new("0"); $x->is_int(); ok 2828 - $x = Math::BigFloat::Subclass->new("1"); $x->is_int(); ok 2829 - $x = Math::BigFloat::Subclass->new("2"); $x->is_int(); ok 2830 - $x = Math::BigFloat::Subclass->new("-2"); $x->is_int(); ok 2831 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_int(); ok 2832 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_int(); ok 2833 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_int(); ok 2834 - $x = Math::BigFloat::Subclass->new("123.4567"); $x->is_int(); ok 2835 - $x = Math::BigFloat::Subclass->new("-0.1"); $x->is_int(); ok 2836 - $x = Math::BigFloat::Subclass->new("-0.002"); $x->is_int(); ok 2837 - $x = Math::BigFloat::Subclass->new("abc"); $x->is_even(); ok 2838 - $x = Math::BigFloat::Subclass->new("0"); $x->is_even(); ok 2839 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_even(); ok 2840 - $x = Math::BigFloat::Subclass->new("-3"); $x->is_even(); ok 2841 - $x = Math::BigFloat::Subclass->new("1"); $x->is_even(); ok 2842 - $x = Math::BigFloat::Subclass->new("3"); $x->is_even(); ok 2843 - $x = Math::BigFloat::Subclass->new("1000001"); $x->is_even(); ok 2844 - $x = Math::BigFloat::Subclass->new("1000002"); $x->is_even(); ok 2845 - $x = Math::BigFloat::Subclass->new("2"); $x->is_even(); ok 2846 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_even(); ok 2847 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_even(); ok 2848 - $x = Math::BigFloat::Subclass->new("123.456"); $x->is_even(); ok 2849 - $x = Math::BigFloat::Subclass->new("-123.456"); $x->is_even(); ok 2850 - $x = Math::BigFloat::Subclass->new("0.01"); $x->is_even(); ok 2851 - $x = Math::BigFloat::Subclass->new("-0.01"); $x->is_even(); ok 2852 - $x = Math::BigFloat::Subclass->new("120"); $x->is_even(); ok 2853 - $x = Math::BigFloat::Subclass->new("1200"); $x->is_even(); ok 2854 - $x = Math::BigFloat::Subclass->new("-1200"); $x->is_even(); ok 2855 - $x = Math::BigFloat::Subclass->new("0"); $x->is_positive(); ok 2856 - $x = Math::BigFloat::Subclass->new("1"); $x->is_positive(); ok 2857 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_positive(); ok 2858 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_positive(); ok 2859 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_positive(); ok 2860 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_positive(); ok 2861 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_positive(); ok 2862 - $x = Math::BigFloat::Subclass->new("0"); $x->is_negative(); ok 2863 - $x = Math::BigFloat::Subclass->new("1"); $x->is_negative(); ok 2864 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_negative(); ok 2865 - $x = Math::BigFloat::Subclass->new("-123"); $x->is_negative(); ok 2866 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_negative(); ok 2867 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_negative(); ok 2868 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_negative(); ok 2869 - $x = Math::BigFloat::Subclass->new("0"); $x->is_non_positive(); ok 2870 - $x = Math::BigFloat::Subclass->new("1"); $x->is_non_positive(); ok 2871 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_non_positive(); ok 2872 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_non_positive(); ok 2873 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_non_positive(); ok 2874 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_non_positive(); ok 2875 - $x = Math::BigFloat::Subclass->new("0"); $x->is_non_negative(); ok 2876 - $x = Math::BigFloat::Subclass->new("1"); $x->is_non_negative(); ok 2877 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_non_negative(); ok 2878 - $x = Math::BigFloat::Subclass->new("NaN"); $x->is_non_negative(); ok 2879 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_non_negative(); ok 2880 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_non_negative(); ok 2881 - $x = Math::BigFloat::Subclass->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2882 - $x = Math::BigFloat::Subclass->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2883 - $x = Math::BigFloat::Subclass->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2884 - $x = Math::BigFloat::Subclass->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2885 - $x = Math::BigFloat::Subclass->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2886 - $x = Math::BigFloat::Subclass->new("invalid"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2887 - $x = Math::BigFloat::Subclass->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2888 - $x = Math::BigFloat::Subclass->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2889 - $x = Math::BigFloat::Subclass->new("0"); $x->exponent()->bstr(); ok 2890 - $x = Math::BigFloat::Subclass->new("1"); $x->exponent()->bstr(); ok 2891 - $x = Math::BigFloat::Subclass->new("123"); $x->exponent()->bstr(); ok 2892 - $x = Math::BigFloat::Subclass->new("-123"); $x->exponent()->bstr(); ok 2893 - $x = Math::BigFloat::Subclass->new("-1200"); $x->exponent()->bstr(); ok 2894 - $x = Math::BigFloat::Subclass->new("+inf"); $x->exponent()->bstr(); ok 2895 - $x = Math::BigFloat::Subclass->new("-inf"); $x->exponent()->bstr(); ok 2896 - $x = Math::BigFloat::Subclass->new("invalid"); $x->exponent()->bstr(); ok 2897 - $x = Math::BigFloat::Subclass->new("0"); $x->mantissa()->bstr(); ok 2898 - $x = Math::BigFloat::Subclass->new("1"); $x->mantissa()->bstr(); ok 2899 - $x = Math::BigFloat::Subclass->new("123"); $x->mantissa()->bstr(); ok 2900 - $x = Math::BigFloat::Subclass->new("-123"); $x->mantissa()->bstr(); ok 2901 - $x = Math::BigFloat::Subclass->new("-1200"); $x->mantissa()->bstr(); ok 2902 - $x = Math::BigFloat::Subclass->new("+inf"); $x->mantissa()->bstr(); ok 2903 - $x = Math::BigFloat::Subclass->new("-inf"); $x->mantissa()->bstr(); ok 2904 - $x = Math::BigFloat::Subclass->new("invalid"); $x->mantissa()->bstr(); ok 2905 - $x = Math::BigFloat::Subclass->new("123"); $x->length(); ok 2906 - $x = Math::BigFloat::Subclass->new("-123"); $x->length(); ok 2907 - $x = Math::BigFloat::Subclass->new("0"); $x->length(); ok 2908 - $x = Math::BigFloat::Subclass->new("1"); $x->length(); ok 2909 - $x = Math::BigFloat::Subclass->new("12345678901234567890"); $x->length(); ok 2910 - $x = Math::BigFloat::Subclass->new("invalid"); $x->is_zero(); ok 2911 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_zero(); ok 2912 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_zero(); ok 2913 - $x = Math::BigFloat::Subclass->new("0"); $x->is_zero(); ok 2914 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_zero(); ok 2915 - $x = Math::BigFloat::Subclass->new("1"); $x->is_zero(); ok 2916 - $x = Math::BigFloat::Subclass->new("invalid"); $x->is_one(); ok 2917 - $x = Math::BigFloat::Subclass->new("+inf"); $x->is_one(); ok 2918 - $x = Math::BigFloat::Subclass->new("-inf"); $x->is_one(); ok 2919 - $x = Math::BigFloat::Subclass->new("0"); $x->is_one(); ok 2920 - $x = Math::BigFloat::Subclass->new("2"); $x->is_one(); ok 2921 - $x = Math::BigFloat::Subclass->new("1"); $x->is_one(); ok 2922 - $x = Math::BigFloat::Subclass->new("-1"); $x->is_one(); ok 2923 - $x = Math::BigFloat::Subclass->new("-2"); $x->is_one(); ok 2924 - $x = Math::BigFloat::Subclass->new("0"); $x->bfloor(); ok 2925 - $x = Math::BigFloat::Subclass->new("0"); $x->bfloor(); ok 2926 - $x = Math::BigFloat::Subclass->new("abc"); $x->bfloor(); ok 2927 - $x = Math::BigFloat::Subclass->new("abc"); $x->bfloor(); ok 2928 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfloor(); ok 2929 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bfloor(); ok 2930 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfloor(); ok 2931 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bfloor(); ok 2932 - $x = Math::BigFloat::Subclass->new("1"); $x->bfloor(); ok 2933 - $x = Math::BigFloat::Subclass->new("1"); $x->bfloor(); ok 2934 - $x = Math::BigFloat::Subclass->new("-51"); $x->bfloor(); ok 2935 - $x = Math::BigFloat::Subclass->new("-51"); $x->bfloor(); ok 2936 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bfloor(); ok 2937 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bfloor(); ok 2938 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bfloor(); ok 2939 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bfloor(); ok 2940 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->bfloor(); ok 2941 - $x = Math::BigFloat::Subclass->new("0.12345"); $x->bfloor(); ok 2942 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->bfloor(); ok 2943 - $x = Math::BigFloat::Subclass->new("0.123456"); $x->bfloor(); ok 2944 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->bfloor(); ok 2945 - $x = Math::BigFloat::Subclass->new("0.1234567"); $x->bfloor(); ok 2946 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->bfloor(); ok 2947 - $x = Math::BigFloat::Subclass->new("0.12345678"); $x->bfloor(); ok 2948 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->bfloor(); ok 2949 - $x = Math::BigFloat::Subclass->new("0.123456789"); $x->bfloor(); ok 2950 - $x = Math::BigFloat::Subclass->new("0"); $x->bceil(); ok 2951 - $x = Math::BigFloat::Subclass->new("0"); $x->bceil(); ok 2952 - $x = Math::BigFloat::Subclass->new("abc"); $x->bceil(); ok 2953 - $x = Math::BigFloat::Subclass->new("abc"); $x->bceil(); ok 2954 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bceil(); ok 2955 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bceil(); ok 2956 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bceil(); ok 2957 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bceil(); ok 2958 - $x = Math::BigFloat::Subclass->new("1"); $x->bceil(); ok 2959 - $x = Math::BigFloat::Subclass->new("1"); $x->bceil(); ok 2960 - $x = Math::BigFloat::Subclass->new("-51"); $x->bceil(); ok 2961 - $x = Math::BigFloat::Subclass->new("-51"); $x->bceil(); ok 2962 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bceil(); ok 2963 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bceil(); ok 2964 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bceil(); ok 2965 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bceil(); ok 2966 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bceil(); ok 2967 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bceil(); ok 2968 - $x = Math::BigFloat::Subclass->new("0"); $x->bint(); ok 2969 - $x = Math::BigFloat::Subclass->new("0"); $x->bint(); ok 2970 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bint(); ok 2971 - $x = Math::BigFloat::Subclass->new("NaN"); $x->bint(); ok 2972 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bint(); ok 2973 - $x = Math::BigFloat::Subclass->new("+inf"); $x->bint(); ok 2974 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bint(); ok 2975 - $x = Math::BigFloat::Subclass->new("-inf"); $x->bint(); ok 2976 - $x = Math::BigFloat::Subclass->new("1"); $x->bint(); ok 2977 - $x = Math::BigFloat::Subclass->new("1"); $x->bint(); ok 2978 - $x = Math::BigFloat::Subclass->new("-51"); $x->bint(); ok 2979 - $x = Math::BigFloat::Subclass->new("-51"); $x->bint(); ok 2980 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bint(); ok 2981 - $x = Math::BigFloat::Subclass->new("-51.2"); $x->bint(); ok 2982 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bint(); ok 2983 - $x = Math::BigFloat::Subclass->new("12.2"); $x->bint(); ok 2984 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bint(); ok 2985 - $x = Math::BigFloat::Subclass->new("-0.4"); $x->bint(); ok 2986 - $x = Math::BigFloat::Subclass->new("-1"); $x = log($x); ok 2987 - $x = Math::BigFloat::Subclass->new("-1"); $x = log($x); ok 2988 - $x = Math::BigFloat::Subclass->new("0"); $x = log($x); ok 2989 - $x = Math::BigFloat::Subclass->new("0"); $x = log($x); ok 2990 - $x = Math::BigFloat::Subclass->new("1"); $x = log($x); ok 2991 - $x = Math::BigFloat::Subclass->new("1"); $x = log($x); ok 2992 - $x = Math::BigFloat::Subclass->new("2"); $x = log($x); ok 2993 - $x = Math::BigFloat::Subclass->new("2"); $x = log($x); ok 2994 - $x = Math::BigFloat::Subclass->new("3"); $x = log($x); ok 2995 - $x = Math::BigFloat::Subclass->new("3"); $x = log($x); ok 2996 - $x = Math::BigFloat::Subclass->new("123456789"); $x = log($x); ok 2997 - $x = Math::BigFloat::Subclass->new("123456789"); $x = log($x); ok 2998 - $x = Math::BigFloat::Subclass->new("1234567890987654321"); $x = log($x); ok 2999 - $x = Math::BigFloat::Subclass->new("1234567890987654321"); $x = log($x); ok 3000 - $x = Math::BigFloat::Subclass->new("-inf"); $x = log($x); ok 3001 - $x = Math::BigFloat::Subclass->new("-inf"); $x = log($x); ok 3002 - $x = Math::BigFloat::Subclass->new("inf"); $x = log($x); ok 3003 - $x = Math::BigFloat::Subclass->new("inf"); $x = log($x); ok 3004 - $x = Math::BigFloat::Subclass->new("NaN"); $x = log($x); ok 3005 - $x = Math::BigFloat::Subclass->new("NaN"); $x = log($x); ok 3006 - $x = Math::BigInt->new(1200); $y = Math::BigFloat::Subclass->new($x); \# check $y ok 3007 - $x = Math::BigInt->new(1200); $y = Math::BigFloat::Subclass->new($x); \# check $x ok 3008 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bsstr() ok 3009 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->exponent() ok 3010 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890") > 0 ok 3011 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 3012 - Math::BigFloat::Subclass->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 3013 - Math::BigFloat::Subclass->new("1234567890123456789012345678901234567890e2")->mantissa() ok 3014 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(); $x->{accuracy} ok 3015 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(); $x->{precision} ok 3016 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{accuracy} ok 3017 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{precision} ok 3018 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{accuracy} ok 3019 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{precision} ok 3020 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{accuracy} ok 3021 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{precision} ok 3022 - Math::BigFloat::Subclass->bzero() ok 3023 - Math::BigFloat::Subclass->bone() ok 3024 - Math::BigFloat::Subclass->bone("+") ok 3025 - Math::BigFloat::Subclass->bone("-") ok 3026 - Math::BigFloat::Subclass->bnan() ok 3027 - Math::BigFloat::Subclass->binf() ok 3028 - Math::BigFloat::Subclass->binf("+") ok 3029 - Math::BigFloat::Subclass->binf("-") ok 3030 - Math::BigFloat::Subclass->binf("-inf") ok 3031 - $x = Math::BigFloat::Subclass->new(12); Math::BigFloat::Subclass->precision(-2); $x->bsqrt(); ok 3032 - Math::BigFloat::Subclass->precision(undef); $x = Math::BigFloat::Subclass->new(12); Math::BigFloat::Subclass->precision(0); $x->bsqrt(); ok 3033 - Math::BigFloat::Subclass->precision(-3); $x = Math::BigFloat::Subclass->new(12); $x->bsqrt(); ok 3034 - A and P set => NaN ok 3035 - supplied arg overrides set global ok 3036 - @args = Math::BigFloat::Subclass::objectify(2, Math::BigFloat::Subclass, 4, 5); join(" ", @args); ok 3037 - Math::BigFloat::Subclass->new(-1)->is_one() ok 3038 - Math::BigFloat::Subclass->new(-1)->is_one("-") ok 3039 - Math::BigFloat::Subclass->new(1)->bdiv("0.5")->bsstr() ok 3040 - $x = Math::BigFloat::Subclass->new(3); $x -= $x; ok 3041 - $x = Math::BigFloat::Subclass->new(-3); $x -= $x; ok 3042 - $x = Math::BigFloat::Subclass->new(3); $x += $x; ok 3043 - $x = Math::BigFloat::Subclass->new(-3); $x += $x; ok 3044 - $x = Math::BigFloat::Subclass->new("NaN"); $x -= $x; ok 3045 - $x = Math::BigFloat::Subclass->new("inf"); $x -= $x; ok 3046 - $x = Math::BigFloat::Subclass->new("-inf"); $x -= $x; ok 3047 - $x = Math::BigFloat::Subclass->new("NaN"); $x += $x; ok 3048 - $x = Math::BigFloat::Subclass->new("inf"); $x += $x; ok 3049 - $x = Math::BigFloat::Subclass->new("-inf"); $x += $x; ok 3050 - $x = Math::BigFloat::Subclass->new("3.14"); $x -= $x; ok 3051 - $x = Math::BigFloat::Subclass->new("-3.14"); $x -= $x; ok 3052 - 6.28 = Math::BigFloat::Subclass->new("3.14"); 6.28 += 6.28; ok 3053 - -6.28 = Math::BigFloat::Subclass->new("-3.14"); -6.28 += -6.28; ok 3054 - 9.8596 = Math::BigFloat::Subclass->new("3.14"); 9.8596 *= 9.8596; ok 3055 - 9.8596 = Math::BigFloat::Subclass->new("-3.14"); 9.8596 *= 9.8596; ok 3056 - 1 = Math::BigFloat::Subclass->new("3.14"); 1 /= 1; ok 3057 - 1 = Math::BigFloat::Subclass->new("-3.14"); 1 /= 1; ok 3058 - 0 = Math::BigFloat::Subclass->new("3.14"); 0 %= 0; ok 3059 - 0 = Math::BigFloat::Subclass->new("-3.14"); 0 %= 0; ok 3060 - $x = Math::BigFloat::Subclass->new(0); $y = Math::BigFloat::Subclass->new("0.1"); $x ** $y ok 3061 - 1 = Math::BigFloat::Subclass->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 3062 - value of ((2**148)+1)/17 ok 3063 - number of digits in ((2**148)+1)/17 ok 3064 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y ok 3065 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x ok 3066 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x >>= $y ok 3067 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18"); $x <<= $y; $x >>= $y; $x ok 3068 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y ok 3069 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x >>= $y ok 3070 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x >>= $y; $x ok 3071 - $ms has custom attribute \$ms->{_custom} ok 3072 - An object of class 'Math::BigFloat::Subclass' isa 'Math::BigFloat' ok 3073 - An object of class 'Math::BigFloat::Subclass' isn't a 'Math::BigInt' ok 3074 - $ms is 46 ok 3075 - $ms has custom attribute $ms->{_custom} ok 3076 - $ms is not an object of class 'Math::BigFloat::Subclass' ok 3077 - Math::BigFloat::Subclass gets 'accuracy' from parent ok 3078 - Math::BigFloat::Subclass gets 'precision' from parent ok 3079 - Math::BigFloat::Subclass gets 'div_scale' from parent ok 3080 - Math::BigFloat::Subclass gets 'round_mode' from parent ok t/sub_mbi.t ................... 1..4287 ok 1 - Math::BigInt::Subclass->config('lib') ok 2 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("-345"); $x .= $y; ok 3 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x += $y; ok 4 - is a valid object ok 5 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x += $y; ok 6 - is a valid object ok 7 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x -= $y; ok 8 - is a valid object ok 9 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x -= $y; ok 10 - is a valid object ok 11 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x *= $y; ok 12 - is a valid object ok 13 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x *= $y; ok 14 - is a valid object ok 15 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("3"); $x %= $y; ok 16 - is a valid object ok 17 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("9"); $x %= $y; ok 18 - is a valid object ok 19 - $x = Math::BigInt::Subclass->new("-629"); $y = Math::BigInt::Subclass->new("5033"); $x %= $y; ok 20 - is a valid object ok 21 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("3"); $x /= $y; ok 22 - is a valid object ok 23 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("2"); $x /= $y; ok 24 - is a valid object ok 25 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x |= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("7"); $x &= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("7"); $x ^= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 32 - is a valid object ok 33 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("invalid"); $x->blog($y); ok 34 - is a valid object ok 35 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("invalid"); $x->blog($y); ok 36 - is a valid object ok 37 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 38 - is a valid object ok 39 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("122"); $x->blog($y); ok 40 - is a valid object ok 41 - $x = Math::BigInt::Subclass->new("122"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 42 - is a valid object ok 43 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("122"); $x->blog($y); ok 44 - is a valid object ok 45 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 46 - is a valid object ok 47 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 48 - is a valid object ok 49 - $x = Math::BigInt::Subclass->new("-21"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 50 - is a valid object ok 51 - $x = Math::BigInt::Subclass->new("21"); $y = Math::BigInt::Subclass->new("-21"); $x->blog($y); ok 52 - is a valid object ok 53 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 54 - is a valid object ok 55 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 56 - is a valid object ok 57 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 58 - is a valid object ok 59 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 60 - is a valid object ok 61 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 62 - is a valid object ok 63 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 64 - is a valid object ok 65 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 66 - is a valid object ok 67 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 68 - is a valid object ok 69 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 70 - is a valid object ok 71 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 72 - is a valid object ok 73 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 74 - is a valid object ok 75 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->blog($y); ok 76 - is a valid object ok 77 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $x->blog($y); ok 78 - is a valid object ok 79 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x->blog($y); ok 80 - is a valid object ok 81 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $x->blog($y); ok 82 - is a valid object ok 83 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 84 - is a valid object ok 85 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x->blog($y); ok 86 - is a valid object ok 87 - $x = Math::BigInt::Subclass->new("1024"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 88 - is a valid object ok 89 - $x = Math::BigInt::Subclass->new("81"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 90 - is a valid object ok 91 - $x = Math::BigInt::Subclass->new("82"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 92 - is a valid object ok 93 - $x = Math::BigInt::Subclass->new("80"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 94 - is a valid object ok 95 - $x = Math::BigInt::Subclass->new("4096"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 96 - is a valid object ok 97 - $x = Math::BigInt::Subclass->new("15625"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 98 - is a valid object ok 99 - $x = Math::BigInt::Subclass->new("15626"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 100 - is a valid object ok 101 - $x = Math::BigInt::Subclass->new("15624"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 102 - is a valid object ok 103 - $x = Math::BigInt::Subclass->new("1000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 104 - is a valid object ok 105 - $x = Math::BigInt::Subclass->new("10000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 106 - is a valid object ok 107 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 108 - is a valid object ok 109 - $x = Math::BigInt::Subclass->new("1000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 110 - is a valid object ok 111 - $x = Math::BigInt::Subclass->new("10000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 112 - is a valid object ok 113 - $x = Math::BigInt::Subclass->new("100000000"); $y = Math::BigInt::Subclass->new("10"); $x->blog($y); ok 114 - is a valid object ok 115 - $x = Math::BigInt::Subclass->new("8916100448256"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 116 - is a valid object ok 117 - $x = Math::BigInt::Subclass->new("8916100448257"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 118 - is a valid object ok 119 - $x = Math::BigInt::Subclass->new("8916100448255"); $y = Math::BigInt::Subclass->new("12"); $x->blog($y); ok 120 - is a valid object ok 121 - $x = Math::BigInt::Subclass->new("2251799813685248"); $y = Math::BigInt::Subclass->new("8"); $x->blog($y); ok 122 - is a valid object ok 123 - $x = Math::BigInt::Subclass->new("72057594037927936"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 124 - is a valid object ok 125 - $x = Math::BigInt::Subclass->new("144115188075855872"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 126 - is a valid object ok 127 - $x = Math::BigInt::Subclass->new("288230376151711744"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 128 - is a valid object ok 129 - $x = Math::BigInt::Subclass->new("576460752303423488"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 130 - is a valid object ok 131 - $x = Math::BigInt::Subclass->new("1329227995784915872903807060280344576"); $y = Math::BigInt::Subclass->new("2"); $x->blog($y); ok 132 - is a valid object ok 133 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x->blog($y); ok 134 - is a valid object ok 135 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $x->blog($y); ok 136 - is a valid object ok 137 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->blog($y); ok 138 - is a valid object ok 139 - $x = Math::BigInt::Subclass->new("0"); $x->is_negative() || 0; ok 140 - $x = Math::BigInt::Subclass->new("-1"); $x->is_negative() || 0; ok 141 - $x = Math::BigInt::Subclass->new("1"); $x->is_negative() || 0; ok 142 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_negative() || 0; ok 143 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_negative() || 0; ok 144 - $x = Math::BigInt::Subclass->new("invalid"); $x->is_negative() || 0; ok 145 - $x = Math::BigInt::Subclass->new("0"); $x->is_positive() || 0; ok 146 - $x = Math::BigInt::Subclass->new("-1"); $x->is_positive() || 0; ok 147 - $x = Math::BigInt::Subclass->new("1"); $x->is_positive() || 0; ok 148 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_positive() || 0; ok 149 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_positive() || 0; ok 150 - $x = Math::BigInt::Subclass->new("invalid"); $x->is_positive() || 0; ok 151 - $x = Math::BigInt::Subclass->new("0"); $x->is_non_negative() || 0; ok 152 - $x = Math::BigInt::Subclass->new("-1"); $x->is_non_negative() || 0; ok 153 - $x = Math::BigInt::Subclass->new("1"); $x->is_non_negative() || 0; ok 154 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_non_negative() || 0; ok 155 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_non_negative() || 0; ok 156 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_non_negative() || 0; ok 157 - $x = Math::BigInt::Subclass->new("0"); $x->is_non_positive() || 0; ok 158 - $x = Math::BigInt::Subclass->new("-1"); $x->is_non_positive() || 0; ok 159 - $x = Math::BigInt::Subclass->new("1"); $x->is_non_positive() || 0; ok 160 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_non_positive() || 0; ok 161 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_non_positive() || 0; ok 162 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_non_positive() || 0; ok 163 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_int() || 0; ok 164 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_int() || 0; ok 165 - $x = Math::BigInt::Subclass->new("invalid"); $x->is_int() || 0; ok 166 - $x = Math::BigInt::Subclass->new("1"); $x->is_int() || 0; ok 167 - $x = Math::BigInt::Subclass->new("0"); $x->is_int() || 0; ok 168 - $x = Math::BigInt::Subclass->new("123e12"); $x->is_int() || 0; ok 169 - $x = Math::BigInt::Subclass->new("abc"); $x->is_odd() || 0; ok 170 - $x = Math::BigInt::Subclass->new("0"); $x->is_odd() || 0; ok 171 - $x = Math::BigInt::Subclass->new("1"); $x->is_odd() || 0; ok 172 - $x = Math::BigInt::Subclass->new("3"); $x->is_odd() || 0; ok 173 - $x = Math::BigInt::Subclass->new("-1"); $x->is_odd() || 0; ok 174 - $x = Math::BigInt::Subclass->new("-3"); $x->is_odd() || 0; ok 175 - $x = Math::BigInt::Subclass->new("10000001"); $x->is_odd() || 0; ok 176 - $x = Math::BigInt::Subclass->new("10000002"); $x->is_odd() || 0; ok 177 - $x = Math::BigInt::Subclass->new("2"); $x->is_odd() || 0; ok 178 - $x = Math::BigInt::Subclass->new("120"); $x->is_odd() || 0; ok 179 - $x = Math::BigInt::Subclass->new("121"); $x->is_odd() || 0; ok 180 - $x = Math::BigInt::Subclass->new("abc"); $x->is_even() || 0; ok 181 - $x = Math::BigInt::Subclass->new("0"); $x->is_even() || 0; ok 182 - $x = Math::BigInt::Subclass->new("1"); $x->is_even() || 0; ok 183 - $x = Math::BigInt::Subclass->new("3"); $x->is_even() || 0; ok 184 - $x = Math::BigInt::Subclass->new("-1"); $x->is_even() || 0; ok 185 - $x = Math::BigInt::Subclass->new("-3"); $x->is_even() || 0; ok 186 - $x = Math::BigInt::Subclass->new("10000001"); $x->is_even() || 0; ok 187 - $x = Math::BigInt::Subclass->new("10000002"); $x->is_even() || 0; ok 188 - $x = Math::BigInt::Subclass->new("2"); $x->is_even() || 0; ok 189 - $x = Math::BigInt::Subclass->new("120"); $x->is_even() || 0; ok 190 - $x = Math::BigInt::Subclass->new("121"); $x->is_even() || 0; ok 191 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-0"); $x->bacmp($y); ok 192 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x->bacmp($y); ok 193 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x->bacmp($y); ok 194 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x->bacmp($y); ok 195 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+2"); $x->bacmp($y); ok 196 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-1"); $x->bacmp($y); ok 197 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x->bacmp($y); ok 198 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bacmp($y); ok 199 - $x = Math::BigInt::Subclass->new("+987654321"); $y = Math::BigInt::Subclass->new("+123456789"); $x->bacmp($y); ok 200 - $x = Math::BigInt::Subclass->new("-987654321"); $y = Math::BigInt::Subclass->new("+123456789"); $x->bacmp($y); ok 201 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("+4567889"); $x->bacmp($y); ok 202 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 203 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("invalid"); $x->bacmp($y); ok 204 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("invalid"); $x->bacmp($y); ok 205 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bacmp($y); ok 206 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 207 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 208 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bacmp($y); ok 209 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 210 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("123"); $x->bacmp($y); ok 211 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-123"); $x->bacmp($y); ok 212 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-123"); $x->bacmp($y); ok 213 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 214 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 215 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 216 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 217 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bacmp($y); ok 218 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->bacmp($y); ok 219 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bacmp($y); ok 220 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x->bacmp($y); ok 221 - $x = Math::BigInt::Subclass->bnorm("0e999"); ok 222 - is a valid object ok 223 - $x = Math::BigInt::Subclass->bnorm("0e-999"); ok 224 - is a valid object ok 225 - $x = Math::BigInt::Subclass->bnorm("-0e999"); ok 226 - is a valid object ok 227 - $x = Math::BigInt::Subclass->bnorm("-0e-999"); ok 228 - is a valid object ok 229 - $x = Math::BigInt::Subclass->bnorm("123"); ok 230 - is a valid object ok 231 - $x = Math::BigInt::Subclass->bnorm("123.000"); ok 232 - is a valid object ok 233 - $x = Math::BigInt::Subclass->bnorm("123e0"); ok 234 - is a valid object ok 235 - $x = Math::BigInt::Subclass->bnorm("123e+0"); ok 236 - is a valid object ok 237 - $x = Math::BigInt::Subclass->bnorm("123e-0"); ok 238 - is a valid object ok 239 - $x = Math::BigInt::Subclass->bnorm("123.000e0"); ok 240 - is a valid object ok 241 - $x = Math::BigInt::Subclass->bnorm("123.000e+0"); ok 242 - is a valid object ok 243 - $x = Math::BigInt::Subclass->bnorm("123.000e-0"); ok 244 - is a valid object ok 245 - $x = Math::BigInt::Subclass->bnorm("0babc"); ok 246 - is a valid object ok 247 - $x = Math::BigInt::Subclass->bnorm("0b123"); ok 248 - is a valid object ok 249 - $x = Math::BigInt::Subclass->bnorm("0b0"); ok 250 - is a valid object ok 251 - $x = Math::BigInt::Subclass->bnorm("-0b0"); ok 252 - is a valid object ok 253 - $x = Math::BigInt::Subclass->bnorm("-0b1"); ok 254 - is a valid object ok 255 - $x = Math::BigInt::Subclass->bnorm("0b0001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt::Subclass->bnorm("0b001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt::Subclass->bnorm("0b011"); ok 260 - is a valid object ok 261 - $x = Math::BigInt::Subclass->bnorm("0b101"); ok 262 - is a valid object ok 263 - $x = Math::BigInt::Subclass->bnorm("0b1001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt::Subclass->bnorm("0b10001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt::Subclass->bnorm("0b100001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt::Subclass->bnorm("0b1000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt::Subclass->bnorm("0b10000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt::Subclass->bnorm("0b100000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt::Subclass->bnorm("0b1000000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt::Subclass->bnorm("0b10000000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt::Subclass->bnorm("0b100000000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt::Subclass->bnorm("0b1000000000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt::Subclass->bnorm("0b10000000000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt::Subclass->bnorm("0b100000000000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000001"); ok 290 - is a valid object ok 291 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000001"); ok 292 - is a valid object ok 293 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000001"); ok 294 - is a valid object ok 295 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000001"); ok 296 - is a valid object ok 297 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000001"); ok 298 - is a valid object ok 299 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000001"); ok 300 - is a valid object ok 301 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000001"); ok 302 - is a valid object ok 303 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000001"); ok 304 - is a valid object ok 305 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000001"); ok 306 - is a valid object ok 307 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000001"); ok 308 - is a valid object ok 309 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000001"); ok 310 - is a valid object ok 311 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000001"); ok 312 - is a valid object ok 313 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000001"); ok 314 - is a valid object ok 315 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000000001"); ok 316 - is a valid object ok 317 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000000001"); ok 318 - is a valid object ok 319 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000000001"); ok 320 - is a valid object ok 321 - $x = Math::BigInt::Subclass->bnorm("0b100000000000000000000000000000001"); ok 322 - is a valid object ok 323 - $x = Math::BigInt::Subclass->bnorm("0b1000000000000000000000000000000001"); ok 324 - is a valid object ok 325 - $x = Math::BigInt::Subclass->bnorm("0b10000000000000000000000000000000001"); ok 326 - is a valid object ok 327 - $x = Math::BigInt::Subclass->bnorm("0b1_0_1"); ok 328 - is a valid object ok 329 - $x = Math::BigInt::Subclass->bnorm("0b0_0_0_1"); ok 330 - is a valid object ok 331 - $x = Math::BigInt::Subclass->bnorm("-0x0"); ok 332 - is a valid object ok 333 - $x = Math::BigInt::Subclass->bnorm("0xabcdefgh"); ok 334 - is a valid object ok 335 - $x = Math::BigInt::Subclass->bnorm("0x1234"); ok 336 - is a valid object ok 337 - $x = Math::BigInt::Subclass->bnorm("0xabcdef"); ok 338 - is a valid object ok 339 - $x = Math::BigInt::Subclass->bnorm("-0xABCDEF"); ok 340 - is a valid object ok 341 - $x = Math::BigInt::Subclass->bnorm("-0x1234"); ok 342 - is a valid object ok 343 - $x = Math::BigInt::Subclass->bnorm("0x12345678"); ok 344 - is a valid object ok 345 - $x = Math::BigInt::Subclass->bnorm("0x1_2_3_4_56_78"); ok 346 - is a valid object ok 347 - $x = Math::BigInt::Subclass->bnorm("0xa_b_c_d_e_f"); ok 348 - is a valid object ok 349 - $x = Math::BigInt::Subclass->bnorm("0x9"); ok 350 - is a valid object ok 351 - $x = Math::BigInt::Subclass->bnorm("0x11"); ok 352 - is a valid object ok 353 - $x = Math::BigInt::Subclass->bnorm("0x21"); ok 354 - is a valid object ok 355 - $x = Math::BigInt::Subclass->bnorm("0x41"); ok 356 - is a valid object ok 357 - $x = Math::BigInt::Subclass->bnorm("0x81"); ok 358 - is a valid object ok 359 - $x = Math::BigInt::Subclass->bnorm("0x101"); ok 360 - is a valid object ok 361 - $x = Math::BigInt::Subclass->bnorm("0x201"); ok 362 - is a valid object ok 363 - $x = Math::BigInt::Subclass->bnorm("0x401"); ok 364 - is a valid object ok 365 - $x = Math::BigInt::Subclass->bnorm("0x801"); ok 366 - is a valid object ok 367 - $x = Math::BigInt::Subclass->bnorm("0x1001"); ok 368 - is a valid object ok 369 - $x = Math::BigInt::Subclass->bnorm("0x2001"); ok 370 - is a valid object ok 371 - $x = Math::BigInt::Subclass->bnorm("0x4001"); ok 372 - is a valid object ok 373 - $x = Math::BigInt::Subclass->bnorm("0x8001"); ok 374 - is a valid object ok 375 - $x = Math::BigInt::Subclass->bnorm("0x10001"); ok 376 - is a valid object ok 377 - $x = Math::BigInt::Subclass->bnorm("0x20001"); ok 378 - is a valid object ok 379 - $x = Math::BigInt::Subclass->bnorm("0x40001"); ok 380 - is a valid object ok 381 - $x = Math::BigInt::Subclass->bnorm("0x80001"); ok 382 - is a valid object ok 383 - $x = Math::BigInt::Subclass->bnorm("0x100001"); ok 384 - is a valid object ok 385 - $x = Math::BigInt::Subclass->bnorm("0x200001"); ok 386 - is a valid object ok 387 - $x = Math::BigInt::Subclass->bnorm("0x400001"); ok 388 - is a valid object ok 389 - $x = Math::BigInt::Subclass->bnorm("0x800001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt::Subclass->bnorm("0x1000001"); ok 392 - is a valid object ok 393 - $x = Math::BigInt::Subclass->bnorm("0x2000001"); ok 394 - is a valid object ok 395 - $x = Math::BigInt::Subclass->bnorm("0x4000001"); ok 396 - is a valid object ok 397 - $x = Math::BigInt::Subclass->bnorm("0x8000001"); ok 398 - is a valid object ok 399 - $x = Math::BigInt::Subclass->bnorm("0x10000001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt::Subclass->bnorm("0x20000001"); ok 402 - is a valid object ok 403 - $x = Math::BigInt::Subclass->bnorm("0x40000001"); ok 404 - is a valid object ok 405 - $x = Math::BigInt::Subclass->bnorm("0x80000001"); ok 406 - is a valid object ok 407 - $x = Math::BigInt::Subclass->bnorm("0x100000001"); ok 408 - is a valid object ok 409 - $x = Math::BigInt::Subclass->bnorm("0x200000001"); ok 410 - is a valid object ok 411 - $x = Math::BigInt::Subclass->bnorm("0x400000001"); ok 412 - is a valid object ok 413 - $x = Math::BigInt::Subclass->bnorm("0x800000001"); ok 414 - is a valid object ok 415 - $x = Math::BigInt::Subclass->bnorm("0x2dd59e18a125dbed30a6ab1d93e9c855569f44f75806f0645dc9a2e98b808c3"); ok 416 - is a valid object ok 417 - $x = Math::BigInt::Subclass->bnorm("inf"); ok 418 - is a valid object ok 419 - $x = Math::BigInt::Subclass->bnorm("+inf"); ok 420 - is a valid object ok 421 - $x = Math::BigInt::Subclass->bnorm("-inf"); ok 422 - is a valid object ok 423 - $x = Math::BigInt::Subclass->bnorm("0inf"); ok 424 - is a valid object ok 425 - $x = Math::BigInt::Subclass->bnorm(""); ok 426 - is a valid object ok 427 - $x = Math::BigInt::Subclass->bnorm("abc"); ok 428 - is a valid object ok 429 - $x = Math::BigInt::Subclass->bnorm(" 1 a"); ok 430 - is a valid object ok 431 - $x = Math::BigInt::Subclass->bnorm("1bcd2"); ok 432 - is a valid object ok 433 - $x = Math::BigInt::Subclass->bnorm("11111b"); ok 434 - is a valid object ok 435 - $x = Math::BigInt::Subclass->bnorm("+1z"); ok 436 - is a valid object ok 437 - $x = Math::BigInt::Subclass->bnorm("-1z"); ok 438 - is a valid object ok 439 - $x = Math::BigInt::Subclass->bnorm("_123"); ok 440 - is a valid object ok 441 - $x = Math::BigInt::Subclass->bnorm("_123_"); ok 442 - is a valid object ok 443 - $x = Math::BigInt::Subclass->bnorm("1E_12"); ok 444 - is a valid object ok 445 - $x = Math::BigInt::Subclass->bnorm("1_E_12"); ok 446 - is a valid object ok 447 - $x = Math::BigInt::Subclass->bnorm("+_1E12"); ok 448 - is a valid object ok 449 - $x = Math::BigInt::Subclass->bnorm("+0_1E2"); ok 450 - is a valid object ok 451 - $x = Math::BigInt::Subclass->bnorm("+0_0_1E2"); ok 452 - is a valid object ok 453 - $x = Math::BigInt::Subclass->bnorm("-0_0_1E2"); ok 454 - is a valid object ok 455 - $x = Math::BigInt::Subclass->bnorm("-0_0_1E+0_0_2"); ok 456 - is a valid object ok 457 - $x = Math::BigInt::Subclass->bnorm("E1"); ok 458 - is a valid object ok 459 - $x = Math::BigInt::Subclass->bnorm("E23"); ok 460 - is a valid object ok 461 - $x = Math::BigInt::Subclass->bnorm("1.23E1"); ok 462 - is a valid object ok 463 - $x = Math::BigInt::Subclass->bnorm("1.23E-1"); ok 464 - is a valid object ok 465 - $x = Math::BigInt::Subclass->bnorm("1e2e3"); ok 466 - is a valid object ok 467 - $x = Math::BigInt::Subclass->bnorm("1e2r"); ok 468 - is a valid object ok 469 - $x = Math::BigInt::Subclass->bnorm("1e2.0"); ok 470 - is a valid object ok 471 - $x = Math::BigInt::Subclass->bnorm("1.2.2"); ok 472 - is a valid object ok 473 - $x = Math::BigInt::Subclass->bnorm("1.2.3e1"); ok 474 - is a valid object ok 475 - $x = Math::BigInt::Subclass->bnorm("-1.2.3"); ok 476 - is a valid object ok 477 - $x = Math::BigInt::Subclass->bnorm("-1.2.3e-4"); ok 478 - is a valid object ok 479 - $x = Math::BigInt::Subclass->bnorm("1.2e3.4"); ok 480 - is a valid object ok 481 - $x = Math::BigInt::Subclass->bnorm("1.2e-3.4"); ok 482 - is a valid object ok 483 - $x = Math::BigInt::Subclass->bnorm("1.2.3.4"); ok 484 - is a valid object ok 485 - $x = Math::BigInt::Subclass->bnorm("1.2.t"); ok 486 - is a valid object ok 487 - $x = Math::BigInt::Subclass->bnorm("1..2"); ok 488 - is a valid object ok 489 - $x = Math::BigInt::Subclass->bnorm("1..2e1"); ok 490 - is a valid object ok 491 - $x = Math::BigInt::Subclass->bnorm("1..2e1..1"); ok 492 - is a valid object ok 493 - $x = Math::BigInt::Subclass->bnorm("12e1..1"); ok 494 - is a valid object ok 495 - $x = Math::BigInt::Subclass->bnorm("..2"); ok 496 - is a valid object ok 497 - $x = Math::BigInt::Subclass->bnorm(".-2"); ok 498 - is a valid object ok 499 - $x = Math::BigInt::Subclass->bnorm("012"); ok 500 - is a valid object ok 501 - $x = Math::BigInt::Subclass->bnorm("0123"); ok 502 - is a valid object ok 503 - $x = Math::BigInt::Subclass->bnorm("01234"); ok 504 - is a valid object ok 505 - $x = Math::BigInt::Subclass->bnorm("012345"); ok 506 - is a valid object ok 507 - $x = Math::BigInt::Subclass->bnorm("0123456"); ok 508 - is a valid object ok 509 - $x = Math::BigInt::Subclass->bnorm("01234567"); ok 510 - is a valid object ok 511 - $x = Math::BigInt::Subclass->bnorm("012345678"); ok 512 - is a valid object ok 513 - $x = Math::BigInt::Subclass->bnorm("0123456789"); ok 514 - is a valid object ok 515 - $x = Math::BigInt::Subclass->bnorm("01234567891"); ok 516 - is a valid object ok 517 - $x = Math::BigInt::Subclass->bnorm("012345678912"); ok 518 - is a valid object ok 519 - $x = Math::BigInt::Subclass->bnorm("0123456789123"); ok 520 - is a valid object ok 521 - $x = Math::BigInt::Subclass->bnorm("01234567891234"); ok 522 - is a valid object ok 523 - $x = Math::BigInt::Subclass->bnorm("0e0"); ok 524 - is a valid object ok 525 - $x = Math::BigInt::Subclass->bnorm("+0e0"); ok 526 - is a valid object ok 527 - $x = Math::BigInt::Subclass->bnorm("+0e+0"); ok 528 - is a valid object ok 529 - $x = Math::BigInt::Subclass->bnorm("-0e+0"); ok 530 - is a valid object ok 531 - $x = Math::BigInt::Subclass->bnorm("0e-0"); ok 532 - is a valid object ok 533 - $x = Math::BigInt::Subclass->bnorm("-0e-0"); ok 534 - is a valid object ok 535 - $x = Math::BigInt::Subclass->bnorm("+0e-0"); ok 536 - is a valid object ok 537 - $x = Math::BigInt::Subclass->bnorm("000"); ok 538 - is a valid object ok 539 - $x = Math::BigInt::Subclass->bnorm("00e2"); ok 540 - is a valid object ok 541 - $x = Math::BigInt::Subclass->bnorm("00e02"); ok 542 - is a valid object ok 543 - $x = Math::BigInt::Subclass->bnorm("000e002"); ok 544 - is a valid object ok 545 - $x = Math::BigInt::Subclass->bnorm("000e1230"); ok 546 - is a valid object ok 547 - $x = Math::BigInt::Subclass->bnorm("00e-3"); ok 548 - is a valid object ok 549 - $x = Math::BigInt::Subclass->bnorm("00e+3"); ok 550 - is a valid object ok 551 - $x = Math::BigInt::Subclass->bnorm("00e-03"); ok 552 - is a valid object ok 553 - $x = Math::BigInt::Subclass->bnorm("00e+03"); ok 554 - is a valid object ok 555 - $x = Math::BigInt::Subclass->bnorm("-000"); ok 556 - is a valid object ok 557 - $x = Math::BigInt::Subclass->bnorm("-00e2"); ok 558 - is a valid object ok 559 - $x = Math::BigInt::Subclass->bnorm("-00e02"); ok 560 - is a valid object ok 561 - $x = Math::BigInt::Subclass->bnorm("-000e002"); ok 562 - is a valid object ok 563 - $x = Math::BigInt::Subclass->bnorm("-000e1230"); ok 564 - is a valid object ok 565 - $x = Math::BigInt::Subclass->bnorm("-00e-3"); ok 566 - is a valid object ok 567 - $x = Math::BigInt::Subclass->bnorm("-00e+3"); ok 568 - is a valid object ok 569 - $x = Math::BigInt::Subclass->bnorm("-00e-03"); ok 570 - is a valid object ok 571 - $x = Math::BigInt::Subclass->bnorm("-00e+03"); ok 572 - is a valid object ok 573 - $x = Math::BigInt::Subclass->bnorm("0"); ok 574 - is a valid object ok 575 - $x = Math::BigInt::Subclass->bnorm("+0"); ok 576 - is a valid object ok 577 - $x = Math::BigInt::Subclass->bnorm("+00"); ok 578 - is a valid object ok 579 - $x = Math::BigInt::Subclass->bnorm("+000"); ok 580 - is a valid object ok 581 - $x = Math::BigInt::Subclass->bnorm("000000000000000000"); ok 582 - is a valid object ok 583 - $x = Math::BigInt::Subclass->bnorm("-0"); ok 584 - is a valid object ok 585 - $x = Math::BigInt::Subclass->bnorm("-0000"); ok 586 - is a valid object ok 587 - $x = Math::BigInt::Subclass->bnorm("+1"); ok 588 - is a valid object ok 589 - $x = Math::BigInt::Subclass->bnorm("+01"); ok 590 - is a valid object ok 591 - $x = Math::BigInt::Subclass->bnorm("+001"); ok 592 - is a valid object ok 593 - $x = Math::BigInt::Subclass->bnorm("+00000100000"); ok 594 - is a valid object ok 595 - $x = Math::BigInt::Subclass->bnorm("123456789"); ok 596 - is a valid object ok 597 - $x = Math::BigInt::Subclass->bnorm("-1"); ok 598 - is a valid object ok 599 - $x = Math::BigInt::Subclass->bnorm("-01"); ok 600 - is a valid object ok 601 - $x = Math::BigInt::Subclass->bnorm("-001"); ok 602 - is a valid object ok 603 - $x = Math::BigInt::Subclass->bnorm("-123456789"); ok 604 - is a valid object ok 605 - $x = Math::BigInt::Subclass->bnorm("-00000100000"); ok 606 - is a valid object ok 607 - $x = Math::BigInt::Subclass->bnorm("1_2_3"); ok 608 - is a valid object ok 609 - $x = Math::BigInt::Subclass->bnorm("10000000000E-1_0"); ok 610 - is a valid object ok 611 - $x = Math::BigInt::Subclass->bnorm("1E2"); ok 612 - is a valid object ok 613 - $x = Math::BigInt::Subclass->bnorm("1E1"); ok 614 - is a valid object ok 615 - $x = Math::BigInt::Subclass->bnorm("1E0"); ok 616 - is a valid object ok 617 - $x = Math::BigInt::Subclass->bnorm("1.23E2"); ok 618 - is a valid object ok 619 - $x = Math::BigInt::Subclass->bnorm("100E-1"); ok 620 - is a valid object ok 621 - $x = Math::BigInt::Subclass->bnorm("1.E3"); ok 622 - is a valid object ok 623 - $x = Math::BigInt::Subclass->bnorm("1.01E2"); ok 624 - is a valid object ok 625 - $x = Math::BigInt::Subclass->bnorm("1010E-1"); ok 626 - is a valid object ok 627 - $x = Math::BigInt::Subclass->bnorm("-1010E0"); ok 628 - is a valid object ok 629 - $x = Math::BigInt::Subclass->bnorm("-1010E1"); ok 630 - is a valid object ok 631 - $x = Math::BigInt::Subclass->bnorm("1234.00"); ok 632 - is a valid object ok 633 - $x = Math::BigInt::Subclass->bnorm("-1010E-2"); ok 634 - is a valid object ok 635 - $x = Math::BigInt::Subclass->bnorm("-1.01E+1"); ok 636 - is a valid object ok 637 - $x = Math::BigInt::Subclass->bnorm("-1.01E-1"); ok 638 - is a valid object ok 639 - $x = Math::BigInt::Subclass->bnorm("1E-999999"); ok 640 - is a valid object ok 641 - $x = Math::BigInt::Subclass->bnorm("0.5"); ok 642 - is a valid object ok 643 - $x = Math::BigInt::Subclass->new("1"); $x->bnan(); ok 644 - is a valid object ok 645 - $x = Math::BigInt::Subclass->new("2"); $x->bnan(); ok 646 - is a valid object ok 647 - $x = Math::BigInt::Subclass->new("abc"); $x->bnan(); ok 648 - is a valid object ok 649 - $x = Math::BigInt::Subclass->new("2"); $x->bone("+"); ok 650 - is a valid object ok 651 - $x = Math::BigInt::Subclass->new("2"); $x->bone("-"); ok 652 - is a valid object ok 653 - $x = Math::BigInt::Subclass->new("invalid"); $x->bone("-"); ok 654 - is a valid object ok 655 - $x = Math::BigInt::Subclass->new("invalid"); $x->bone("+"); ok 656 - is a valid object ok 657 - $x = Math::BigInt::Subclass->new("3"); $x->bone(""); ok 658 - is a valid object ok 659 - $x = Math::BigInt::Subclass->new("1"); $x->binf("+"); ok 660 - is a valid object ok 661 - $x = Math::BigInt::Subclass->new("2"); $x->binf("-"); ok 662 - is a valid object ok 663 - $x = Math::BigInt::Subclass->new("3"); $x->binf("+inf"); ok 664 - is a valid object ok 665 - $x = Math::BigInt::Subclass->new("123"); $x->is_nan() || 0; ok 666 - $x = Math::BigInt::Subclass->new("abc"); $x->is_nan() || 0; ok 667 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_nan() || 0; ok 668 - $x = Math::BigInt::Subclass->new("-123"); $x->is_nan() || 0; ok 669 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf(""); ok 670 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf(""); ok 671 - $x = Math::BigInt::Subclass->new("abc"); $x->is_inf(""); ok 672 - $x = Math::BigInt::Subclass->new("1"); $x->is_inf(""); ok 673 - $x = Math::BigInt::Subclass->new("NaN"); $x->is_inf(""); ok 674 - $x = Math::BigInt::Subclass->new("-1"); $x->is_inf(""); ok 675 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("-"); ok 676 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("+"); ok 677 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("-"); ok 678 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("+"); ok 679 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("-inf"); ok 680 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_inf("+inf"); ok 681 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("-inf"); ok 682 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_inf("+inf"); ok 683 - $x = Math::BigInt::Subclass->new("+iNfInItY"); $x->is_inf(""); ok 684 - $x = Math::BigInt::Subclass->new("-InFiNiTy"); $x->is_inf(""); ok 685 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x << $y; ok 686 - is a valid object ok 687 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+2"); $x << $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+32"); $x << $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+48"); $x << $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("-2"); $x << $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt::Subclass->new("+12345"); $y = Math::BigInt::Subclass->new("4"); $x->blsft($y, 10); ok 696 - is a valid object ok 697 - $x = Math::BigInt::Subclass->new("-1234"); $y = Math::BigInt::Subclass->new("0"); $x->blsft($y, 10); ok 698 - is a valid object ok 699 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("0"); $x->blsft($y, 10); ok 700 - is a valid object ok 701 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("2"); $x->blsft($y, 10); ok 702 - is a valid object ok 703 - $x = Math::BigInt::Subclass->new("+12"); $y = Math::BigInt::Subclass->new("2"); $x->blsft($y, 10); ok 704 - is a valid object ok 705 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("-3"); $x->blsft($y, 10); ok 706 - is a valid object ok 707 - $x = Math::BigInt::Subclass->new("1234567890123"); $y = Math::BigInt::Subclass->new("12"); $x->blsft($y, 10); ok 708 - is a valid object ok 709 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 710 - is a valid object ok 711 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 712 - is a valid object ok 713 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 714 - is a valid object ok 715 - $x = Math::BigInt::Subclass->new("-102533203"); $y = Math::BigInt::Subclass->new("1"); $x->blsft($y, 2); ok 716 - is a valid object ok 717 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x >> $y; ok 718 - is a valid object ok 719 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x >> $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt::Subclass->new("+4294967296"); $y = Math::BigInt::Subclass->new("+32"); $x >> $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("+48"); $x >> $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-2"); $x >> $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt::Subclass->new("-1234"); $y = Math::BigInt::Subclass->new("0"); $x->brsft($y, 10); ok 728 - is a valid object ok 729 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("0"); $x->brsft($y, 10); ok 730 - is a valid object ok 731 - $x = Math::BigInt::Subclass->new("+200"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 10); ok 732 - is a valid object ok 733 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("3"); $x->brsft($y, 10); ok 734 - is a valid object ok 735 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 10); ok 736 - is a valid object ok 737 - $x = Math::BigInt::Subclass->new("+1234"); $y = Math::BigInt::Subclass->new("-3"); $x->brsft($y, 10); ok 738 - is a valid object ok 739 - $x = Math::BigInt::Subclass->new("310000"); $y = Math::BigInt::Subclass->new("4"); $x->brsft($y, 10); ok 740 - is a valid object ok 741 - $x = Math::BigInt::Subclass->new("12300000"); $y = Math::BigInt::Subclass->new("5"); $x->brsft($y, 10); ok 742 - is a valid object ok 743 - $x = Math::BigInt::Subclass->new("1230000000000"); $y = Math::BigInt::Subclass->new("10"); $x->brsft($y, 10); ok 744 - is a valid object ok 745 - $x = Math::BigInt::Subclass->new("09876123456789067890"); $y = Math::BigInt::Subclass->new("12"); $x->brsft($y, 10); ok 746 - is a valid object ok 747 - $x = Math::BigInt::Subclass->new("1234561234567890123"); $y = Math::BigInt::Subclass->new("13"); $x->brsft($y, 10); ok 748 - is a valid object ok 749 - $x = Math::BigInt::Subclass->new("820265627"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 750 - is a valid object ok 751 - $x = Math::BigInt::Subclass->new("-15"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 752 - is a valid object ok 753 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 754 - is a valid object ok 755 - $x = Math::BigInt::Subclass->new("-13"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 756 - is a valid object ok 757 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 758 - is a valid object ok 759 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 760 - is a valid object ok 761 - $x = Math::BigInt::Subclass->new("-10"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 762 - is a valid object ok 763 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 764 - is a valid object ok 765 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 766 - is a valid object ok 767 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 768 - is a valid object ok 769 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 770 - is a valid object ok 771 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 772 - is a valid object ok 773 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 774 - is a valid object ok 775 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 776 - is a valid object ok 777 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 778 - is a valid object ok 779 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 780 - is a valid object ok 781 - $x = Math::BigInt::Subclass->new("-1640531254"); $y = Math::BigInt::Subclass->new("2"); $x->brsft($y, 2); ok 782 - is a valid object ok 783 - $x = Math::BigInt::Subclass->new("-1640531254"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 784 - is a valid object ok 785 - $x = Math::BigInt::Subclass->new("-820265627"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 786 - is a valid object ok 787 - $x = Math::BigInt::Subclass->new("-205066405"); $y = Math::BigInt::Subclass->new("1"); $x->brsft($y, 2); ok 788 - is a valid object ok 789 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsstr(); ok 790 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsstr(); ok 791 - $x = Math::BigInt::Subclass->new("1e+34"); $x->bsstr(); ok 792 - $x = Math::BigInt::Subclass->new("123.456E3"); $x->bsstr(); ok 793 - $x = Math::BigInt::Subclass->new("100"); $x->bsstr(); ok 794 - $x = Math::BigInt::Subclass->new("bsstrabc"); $x->bsstr(); ok 795 - $x = Math::BigInt::Subclass->new("-5"); $x->bsstr(); ok 796 - $x = Math::BigInt::Subclass->new("-100"); $x->bsstr(); ok 797 - $x = Math::BigInt::Subclass->new("5"); $x->numify(); ok 798 - $x = Math::BigInt::Subclass->new("-5"); $x->numify(); ok 799 - $x = Math::BigInt::Subclass->new("100"); $x->numify(); ok 800 - $x = Math::BigInt::Subclass->new("-100"); $x->numify(); ok 801 - $x = Math::BigInt::Subclass->new("invalid"); $x->bneg(); ok 802 - is a valid object ok 803 - $x = Math::BigInt::Subclass->new("+inf"); $x->bneg(); ok 804 - is a valid object ok 805 - $x = Math::BigInt::Subclass->new("-inf"); $x->bneg(); ok 806 - is a valid object ok 807 - $x = Math::BigInt::Subclass->new("abd"); $x->bneg(); ok 808 - is a valid object ok 809 - $x = Math::BigInt::Subclass->new("0"); $x->bneg(); ok 810 - is a valid object ok 811 - $x = Math::BigInt::Subclass->new("1"); $x->bneg(); ok 812 - is a valid object ok 813 - $x = Math::BigInt::Subclass->new("-1"); $x->bneg(); ok 814 - is a valid object ok 815 - $x = Math::BigInt::Subclass->new("+123456789"); $x->bneg(); ok 816 - is a valid object ok 817 - $x = Math::BigInt::Subclass->new("-123456789"); $x->bneg(); ok 818 - is a valid object ok 819 - $x = Math::BigInt::Subclass->new("invalid"); $x->babs(); ok 820 - is a valid object ok 821 - $x = Math::BigInt::Subclass->new("+inf"); $x->babs(); ok 822 - is a valid object ok 823 - $x = Math::BigInt::Subclass->new("-inf"); $x->babs(); ok 824 - is a valid object ok 825 - $x = Math::BigInt::Subclass->new("0"); $x->babs(); ok 826 - is a valid object ok 827 - $x = Math::BigInt::Subclass->new("1"); $x->babs(); ok 828 - is a valid object ok 829 - $x = Math::BigInt::Subclass->new("-1"); $x->babs(); ok 830 - is a valid object ok 831 - $x = Math::BigInt::Subclass->new("+123456789"); $x->babs(); ok 832 - is a valid object ok 833 - $x = Math::BigInt::Subclass->new("-123456789"); $x->babs(); ok 834 - is a valid object ok 835 - $x = Math::BigInt::Subclass->new("NaN"); $x->bsgn(); ok 836 - is a valid object ok 837 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsgn(); ok 838 - is a valid object ok 839 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsgn(); ok 840 - is a valid object ok 841 - $x = Math::BigInt::Subclass->new("0"); $x->bsgn(); ok 842 - is a valid object ok 843 - $x = Math::BigInt::Subclass->new("+123456789"); $x->bsgn(); ok 844 - is a valid object ok 845 - $x = Math::BigInt::Subclass->new("-123456789"); $x->bsgn(); ok 846 - is a valid object ok 847 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("invalid"); $x->bcmp($y); ok 848 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 849 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("invalid"); $x->bcmp($y); ok 850 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 851 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 852 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 853 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->bcmp($y); ok 854 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 855 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 856 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 857 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->bcmp($y); ok 858 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bcmp($y); ok 859 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 860 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("12"); $x->bcmp($y); ok 861 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 862 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 863 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-12"); $x->bcmp($y); ok 864 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 865 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("124"); $x->bcmp($y); ok 866 - $x = Math::BigInt::Subclass->new("124"); $y = Math::BigInt::Subclass->new("123"); $x->bcmp($y); ok 867 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("-124"); $x->bcmp($y); ok 868 - $x = Math::BigInt::Subclass->new("-124"); $y = Math::BigInt::Subclass->new("-123"); $x->bcmp($y); ok 869 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("5"); $x->bcmp($y); ok 870 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x->bcmp($y); ok 871 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bcmp($y); ok 872 - $x = Math::BigInt::Subclass->new("-987654321"); $y = Math::BigInt::Subclass->new("123456789"); $x->bcmp($y); ok 873 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5432112345"); $x->bcmp($y); ok 874 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("5432112345"); $x->bcmp($y); ok 875 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5432112345"); $x->bcmp($y); ok 876 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-5432112345"); $x->bcmp($y); ok 877 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bcmp($y); ok 878 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 879 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 880 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bcmp($y); ok 881 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 882 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 883 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 884 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 885 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bcmp($y); ok 886 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->bcmp($y); ok 887 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->bcmp($y); ok 888 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x->bcmp($y); ok 889 - $x = Math::BigInt::Subclass->new("abc"); $x->binc(); ok 890 - is a valid object ok 891 - $x = Math::BigInt::Subclass->new("+inf"); $x->binc(); ok 892 - is a valid object ok 893 - $x = Math::BigInt::Subclass->new("-inf"); $x->binc(); ok 894 - is a valid object ok 895 - $x = Math::BigInt::Subclass->new("+0"); $x->binc(); ok 896 - is a valid object ok 897 - $x = Math::BigInt::Subclass->new("+1"); $x->binc(); ok 898 - is a valid object ok 899 - $x = Math::BigInt::Subclass->new("-1"); $x->binc(); ok 900 - is a valid object ok 901 - $x = Math::BigInt::Subclass->new("abc"); $x->bdec(); ok 902 - is a valid object ok 903 - $x = Math::BigInt::Subclass->new("+inf"); $x->bdec(); ok 904 - is a valid object ok 905 - $x = Math::BigInt::Subclass->new("-inf"); $x->bdec(); ok 906 - is a valid object ok 907 - $x = Math::BigInt::Subclass->new("+0"); $x->bdec(); ok 908 - is a valid object ok 909 - $x = Math::BigInt::Subclass->new("+1"); $x->bdec(); ok 910 - is a valid object ok 911 - $x = Math::BigInt::Subclass->new("-1"); $x->bdec(); ok 912 - is a valid object ok 913 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x->badd($y); ok 914 - is a valid object ok 915 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 916 - is a valid object ok 917 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x->badd($y); ok 918 - is a valid object ok 919 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->badd($y); ok 920 - is a valid object ok 921 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->badd($y); ok 922 - is a valid object ok 923 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->badd($y); ok 924 - is a valid object ok 925 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->badd($y); ok 926 - is a valid object ok 927 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("+inf"); $x->badd($y); ok 928 - is a valid object ok 929 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("+inf"); $x->badd($y); ok 930 - is a valid object ok 931 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("invalid"); $x->badd($y); ok 932 - is a valid object ok 933 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("invalid"); $x->badd($y); ok 934 - is a valid object ok 935 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 936 - is a valid object ok 937 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 938 - is a valid object ok 939 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->badd($y); ok 940 - is a valid object ok 941 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->badd($y); ok 942 - is a valid object ok 943 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 944 - is a valid object ok 945 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 946 - is a valid object ok 947 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 948 - is a valid object ok 949 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 950 - is a valid object ok 951 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 952 - is a valid object ok 953 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 954 - is a valid object ok 955 - $x = Math::BigInt::Subclass->new("+99"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 956 - is a valid object ok 957 - $x = Math::BigInt::Subclass->new("+999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 958 - is a valid object ok 959 - $x = Math::BigInt::Subclass->new("+9999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 960 - is a valid object ok 961 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 962 - is a valid object ok 963 - $x = Math::BigInt::Subclass->new("+999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 964 - is a valid object ok 965 - $x = Math::BigInt::Subclass->new("+9999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 966 - is a valid object ok 967 - $x = Math::BigInt::Subclass->new("+99999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 968 - is a valid object ok 969 - $x = Math::BigInt::Subclass->new("+999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 970 - is a valid object ok 971 - $x = Math::BigInt::Subclass->new("+9999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 972 - is a valid object ok 973 - $x = Math::BigInt::Subclass->new("+99999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->badd($y); ok 974 - is a valid object ok 975 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 976 - is a valid object ok 977 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 978 - is a valid object ok 979 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 980 - is a valid object ok 981 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 982 - is a valid object ok 983 - $x = Math::BigInt::Subclass->new("+100000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 984 - is a valid object ok 985 - $x = Math::BigInt::Subclass->new("+1000000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 986 - is a valid object ok 987 - $x = Math::BigInt::Subclass->new("+10000000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 988 - is a valid object ok 989 - $x = Math::BigInt::Subclass->new("+100000000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 990 - is a valid object ok 991 - $x = Math::BigInt::Subclass->new("+1000000000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 992 - is a valid object ok 993 - $x = Math::BigInt::Subclass->new("+10000000000"); $y = Math::BigInt::Subclass->new("-1"); $x->badd($y); ok 994 - is a valid object ok 995 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x->badd($y); ok 996 - is a valid object ok 997 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("987654321"); $x->badd($y); ok 998 - is a valid object ok 999 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->badd($y); ok 1000 - is a valid object ok 1001 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->badd($y); ok 1002 - is a valid object ok 1003 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10001"); $x->badd($y); ok 1004 - is a valid object ok 1005 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100001"); $x->badd($y); ok 1006 - is a valid object ok 1007 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000001"); $x->badd($y); ok 1008 - is a valid object ok 1009 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000001"); $x->badd($y); ok 1010 - is a valid object ok 1011 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100000001"); $x->badd($y); ok 1012 - is a valid object ok 1013 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000000001"); $x->badd($y); ok 1014 - is a valid object ok 1015 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000000001"); $x->badd($y); ok 1016 - is a valid object ok 1017 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("100000000001"); $x->badd($y); ok 1018 - is a valid object ok 1019 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1000000000001"); $x->badd($y); ok 1020 - is a valid object ok 1021 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("10000000000001"); $x->badd($y); ok 1022 - is a valid object ok 1023 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10001"); $x->badd($y); ok 1024 - is a valid object ok 1025 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100001"); $x->badd($y); ok 1026 - is a valid object ok 1027 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000001"); $x->badd($y); ok 1028 - is a valid object ok 1029 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000001"); $x->badd($y); ok 1030 - is a valid object ok 1031 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100000001"); $x->badd($y); ok 1032 - is a valid object ok 1033 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000000001"); $x->badd($y); ok 1034 - is a valid object ok 1035 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000000001"); $x->badd($y); ok 1036 - is a valid object ok 1037 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-100000000001"); $x->badd($y); ok 1038 - is a valid object ok 1039 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1000000000001"); $x->badd($y); ok 1040 - is a valid object ok 1041 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-10000000000001"); $x->badd($y); ok 1042 - is a valid object ok 1043 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x->bsub($y); ok 1044 - is a valid object ok 1045 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $x->bsub($y); ok 1046 - is a valid object ok 1047 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x->bsub($y); ok 1048 - is a valid object ok 1049 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bsub($y); ok 1050 - is a valid object ok 1051 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bsub($y); ok 1052 - is a valid object ok 1053 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bsub($y); ok 1054 - is a valid object ok 1055 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bsub($y); ok 1056 - is a valid object ok 1057 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $x->bsub($y); ok 1058 - is a valid object ok 1059 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $x->bsub($y); ok 1060 - is a valid object ok 1061 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1062 - is a valid object ok 1063 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1064 - is a valid object ok 1065 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $x->bsub($y); ok 1066 - is a valid object ok 1067 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1068 - is a valid object ok 1069 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1070 - is a valid object ok 1071 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1072 - is a valid object ok 1073 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1074 - is a valid object ok 1075 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1076 - is a valid object ok 1077 - $x = Math::BigInt::Subclass->new("+99"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1078 - is a valid object ok 1079 - $x = Math::BigInt::Subclass->new("+999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1080 - is a valid object ok 1081 - $x = Math::BigInt::Subclass->new("+9999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1082 - is a valid object ok 1083 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1084 - is a valid object ok 1085 - $x = Math::BigInt::Subclass->new("+999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1086 - is a valid object ok 1087 - $x = Math::BigInt::Subclass->new("+9999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1088 - is a valid object ok 1089 - $x = Math::BigInt::Subclass->new("+99999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1090 - is a valid object ok 1091 - $x = Math::BigInt::Subclass->new("+999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1092 - is a valid object ok 1093 - $x = Math::BigInt::Subclass->new("+9999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1094 - is a valid object ok 1095 - $x = Math::BigInt::Subclass->new("+99999999999"); $y = Math::BigInt::Subclass->new("+1"); $x->bsub($y); ok 1096 - is a valid object ok 1097 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1098 - is a valid object ok 1099 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1100 - is a valid object ok 1101 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1102 - is a valid object ok 1103 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1104 - is a valid object ok 1105 - $x = Math::BigInt::Subclass->new("+100000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1106 - is a valid object ok 1107 - $x = Math::BigInt::Subclass->new("+1000000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1108 - is a valid object ok 1109 - $x = Math::BigInt::Subclass->new("+10000000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1110 - is a valid object ok 1111 - $x = Math::BigInt::Subclass->new("+100000000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1112 - is a valid object ok 1113 - $x = Math::BigInt::Subclass->new("+1000000000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1114 - is a valid object ok 1115 - $x = Math::BigInt::Subclass->new("+10000000000"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1116 - is a valid object ok 1117 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x->bsub($y); ok 1118 - is a valid object ok 1119 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("+987654321"); $x->bsub($y); ok 1120 - is a valid object ok 1121 - $x = Math::BigInt::Subclass->new("-123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bsub($y); ok 1122 - is a valid object ok 1123 - $x = Math::BigInt::Subclass->new("+123456789"); $y = Math::BigInt::Subclass->new("-987654321"); $x->bsub($y); ok 1124 - is a valid object ok 1125 - $x = Math::BigInt::Subclass->new("10001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1126 - is a valid object ok 1127 - $x = Math::BigInt::Subclass->new("100001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1128 - is a valid object ok 1129 - $x = Math::BigInt::Subclass->new("1000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1130 - is a valid object ok 1131 - $x = Math::BigInt::Subclass->new("10000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1132 - is a valid object ok 1133 - $x = Math::BigInt::Subclass->new("100000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1134 - is a valid object ok 1135 - $x = Math::BigInt::Subclass->new("1000000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1136 - is a valid object ok 1137 - $x = Math::BigInt::Subclass->new("10000000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1138 - is a valid object ok 1139 - $x = Math::BigInt::Subclass->new("100000000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1140 - is a valid object ok 1141 - $x = Math::BigInt::Subclass->new("1000000000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1142 - is a valid object ok 1143 - $x = Math::BigInt::Subclass->new("10000000000001"); $y = Math::BigInt::Subclass->new("1"); $x->bsub($y); ok 1144 - is a valid object ok 1145 - $x = Math::BigInt::Subclass->new("10001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1146 - is a valid object ok 1147 - $x = Math::BigInt::Subclass->new("100001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1148 - is a valid object ok 1149 - $x = Math::BigInt::Subclass->new("1000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1150 - is a valid object ok 1151 - $x = Math::BigInt::Subclass->new("10000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1152 - is a valid object ok 1153 - $x = Math::BigInt::Subclass->new("100000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1154 - is a valid object ok 1155 - $x = Math::BigInt::Subclass->new("1000000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1156 - is a valid object ok 1157 - $x = Math::BigInt::Subclass->new("10000000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1158 - is a valid object ok 1159 - $x = Math::BigInt::Subclass->new("100000000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1160 - is a valid object ok 1161 - $x = Math::BigInt::Subclass->new("1000000000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1162 - is a valid object ok 1163 - $x = Math::BigInt::Subclass->new("10000000000001"); $y = Math::BigInt::Subclass->new("-1"); $x->bsub($y); ok 1164 - is a valid object ok 1165 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1166 - is a valid object ok 1167 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1168 - is a valid object ok 1169 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1170 - is a valid object ok 1171 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("abc"); $x->bmuladd($y, $z); ok 1172 - is a valid object ok 1173 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1174 - is a valid object ok 1175 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1176 - is a valid object ok 1177 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("invalid"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1178 - is a valid object ok 1179 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("invalid"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1180 - is a valid object ok 1181 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1182 - is a valid object ok 1183 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1184 - is a valid object ok 1185 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1186 - is a valid object ok 1187 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1188 - is a valid object ok 1189 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1190 - is a valid object ok 1191 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1192 - is a valid object ok 1193 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1194 - is a valid object ok 1195 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1196 - is a valid object ok 1197 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1198 - is a valid object ok 1199 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1200 - is a valid object ok 1201 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("123456789123456789"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1202 - is a valid object ok 1203 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1204 - is a valid object ok 1205 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1206 - is a valid object ok 1207 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1208 - is a valid object ok 1209 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1210 - is a valid object ok 1211 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1212 - is a valid object ok 1213 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1214 - is a valid object ok 1215 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("+3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1216 - is a valid object ok 1217 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1218 - is a valid object ok 1219 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1220 - is a valid object ok 1221 - $x = Math::BigInt::Subclass->new("111"); $y = Math::BigInt::Subclass->new("111"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1222 - is a valid object ok 1223 - $x = Math::BigInt::Subclass->new("10101"); $y = Math::BigInt::Subclass->new("10101"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1224 - is a valid object ok 1225 - $x = Math::BigInt::Subclass->new("1001001"); $y = Math::BigInt::Subclass->new("1001001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1226 - is a valid object ok 1227 - $x = Math::BigInt::Subclass->new("100010001"); $y = Math::BigInt::Subclass->new("100010001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1228 - is a valid object ok 1229 - $x = Math::BigInt::Subclass->new("10000100001"); $y = Math::BigInt::Subclass->new("10000100001"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1230 - is a valid object ok 1231 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1232 - is a valid object ok 1233 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1234 - is a valid object ok 1235 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1236 - is a valid object ok 1237 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1238 - is a valid object ok 1239 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1240 - is a valid object ok 1241 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1242 - is a valid object ok 1243 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1244 - is a valid object ok 1245 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1246 - is a valid object ok 1247 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("0"); $x->bmuladd($y, $z); ok 1248 - is a valid object ok 1249 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1250 - is a valid object ok 1251 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1252 - is a valid object ok 1253 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1254 - is a valid object ok 1255 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1256 - is a valid object ok 1257 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1258 - is a valid object ok 1259 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1260 - is a valid object ok 1261 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1262 - is a valid object ok 1263 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1264 - is a valid object ok 1265 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $z = Math::BigInt::Subclass->new("1"); $x->bmuladd($y, $z); ok 1266 - is a valid object ok 1267 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1268 - is a valid object ok 1269 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1270 - is a valid object ok 1271 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1272 - is a valid object ok 1273 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("-5"); $x->bmuladd($y, $z); ok 1274 - is a valid object ok 1275 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("5"); $x->bmuladd($y, $z); ok 1276 - is a valid object ok 1277 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-4"); $z = Math::BigInt::Subclass->new("5"); $x->bmuladd($y, $z); ok 1278 - is a valid object ok 1279 - $x = Math::BigInt::Subclass->new("9999999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000000"); $z = Math::BigInt::Subclass->new("1234567890"); $x->bmuladd($y, $z); ok 1280 - is a valid object ok 1281 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("12345678901234567890"); $x->bmuladd($y, $z); ok 1282 - is a valid object ok 1283 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x->bmul($y); ok 1284 - is a valid object ok 1285 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); $x->bmul($y); ok 1286 - is a valid object ok 1287 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); $x->bmul($y); ok 1288 - is a valid object ok 1289 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("+inf"); $x->bmul($y); ok 1290 - is a valid object ok 1291 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmul($y); ok 1292 - is a valid object ok 1293 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("invalid"); $x->bmul($y); ok 1294 - is a valid object ok 1295 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("invalid"); $x->bmul($y); ok 1296 - is a valid object ok 1297 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bmul($y); ok 1298 - is a valid object ok 1299 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmul($y); ok 1300 - is a valid object ok 1301 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->bmul($y); ok 1302 - is a valid object ok 1303 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmul($y); ok 1304 - is a valid object ok 1305 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); $x->bmul($y); ok 1306 - is a valid object ok 1307 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); $x->bmul($y); ok 1308 - is a valid object ok 1309 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); $x->bmul($y); ok 1310 - is a valid object ok 1311 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("-1"); $x->bmul($y); ok 1312 - is a valid object ok 1313 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+0"); $x->bmul($y); ok 1314 - is a valid object ok 1315 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("0"); $x->bmul($y); ok 1316 - is a valid object ok 1317 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("123456789123456789"); $x->bmul($y); ok 1318 - is a valid object ok 1319 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->bmul($y); ok 1320 - is a valid object ok 1321 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("+1"); $x->bmul($y); ok 1322 - is a valid object ok 1323 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("-1"); $x->bmul($y); ok 1324 - is a valid object ok 1325 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); $x->bmul($y); ok 1326 - is a valid object ok 1327 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); $x->bmul($y); ok 1328 - is a valid object ok 1329 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("+3"); $x->bmul($y); ok 1330 - is a valid object ok 1331 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("-3"); $x->bmul($y); ok 1332 - is a valid object ok 1333 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x->bmul($y); ok 1334 - is a valid object ok 1335 - $x = Math::BigInt::Subclass->new("111"); $y = Math::BigInt::Subclass->new("111"); $x->bmul($y); ok 1336 - is a valid object ok 1337 - $x = Math::BigInt::Subclass->new("10101"); $y = Math::BigInt::Subclass->new("10101"); $x->bmul($y); ok 1338 - is a valid object ok 1339 - $x = Math::BigInt::Subclass->new("1001001"); $y = Math::BigInt::Subclass->new("1001001"); $x->bmul($y); ok 1340 - is a valid object ok 1341 - $x = Math::BigInt::Subclass->new("100010001"); $y = Math::BigInt::Subclass->new("100010001"); $x->bmul($y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt::Subclass->new("10000100001"); $y = Math::BigInt::Subclass->new("10000100001"); $x->bmul($y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt::Subclass->new("11111111111"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt::Subclass->new("22222222222"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt::Subclass->new("33333333333"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt::Subclass->new("44444444444"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt::Subclass->new("55555555555"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt::Subclass->new("66666666666"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt::Subclass->new("77777777777"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt::Subclass->new("88888888888"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("9"); $x->bmul($y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt::Subclass->new("+25"); $y = Math::BigInt::Subclass->new("+25"); $x->bmul($y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt::Subclass->new("+12345"); $y = Math::BigInt::Subclass->new("+12345"); $x->bmul($y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt::Subclass->new("+99999"); $y = Math::BigInt::Subclass->new("+11111"); $x->bmul($y); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt::Subclass->new("9999"); $y = Math::BigInt::Subclass->new("10000"); $x->bmul($y); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt::Subclass->new("99999"); $y = Math::BigInt::Subclass->new("100000"); $x->bmul($y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt::Subclass->new("999999"); $y = Math::BigInt::Subclass->new("1000000"); $x->bmul($y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt::Subclass->new("9999999"); $y = Math::BigInt::Subclass->new("10000000"); $x->bmul($y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt::Subclass->new("99999999"); $y = Math::BigInt::Subclass->new("100000000"); $x->bmul($y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt::Subclass->new("999999999"); $y = Math::BigInt::Subclass->new("1000000000"); $x->bmul($y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt::Subclass->new("9999999999"); $y = Math::BigInt::Subclass->new("10000000000"); $x->bmul($y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt::Subclass->new("99999999999"); $y = Math::BigInt::Subclass->new("100000000000"); $x->bmul($y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("1000000000000"); $x->bmul($y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt::Subclass->new("9999999999999"); $y = Math::BigInt::Subclass->new("10000000000000"); $x->bmul($y); ok 1388 - is a valid object ok 1389 - $x = Math::BigInt::Subclass->new("99999999999999"); $y = Math::BigInt::Subclass->new("100000000000000"); $x->bmul($y); ok 1390 - is a valid object ok 1391 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("1000000000000000"); $x->bmul($y); ok 1392 - is a valid object ok 1393 - $x = Math::BigInt::Subclass->new("9999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000"); $x->bmul($y); ok 1394 - is a valid object ok 1395 - $x = Math::BigInt::Subclass->new("99999999999999999"); $y = Math::BigInt::Subclass->new("100000000000000000"); $x->bmul($y); ok 1396 - is a valid object ok 1397 - $x = Math::BigInt::Subclass->new("999999999999999999"); $y = Math::BigInt::Subclass->new("1000000000000000000"); $x->bmul($y); ok 1398 - is a valid object ok 1399 - $x = Math::BigInt::Subclass->new("9999999999999999999"); $y = Math::BigInt::Subclass->new("10000000000000000000"); $x->bmul($y); ok 1400 - is a valid object ok 1401 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); join(",", $x->bdiv($y)); ok 1402 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); join(",", $x->bdiv($y)); ok 1403 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); join(",", $x->bdiv($y)); ok 1404 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("0"); join(",", $x->bdiv($y)); ok 1405 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); join(",", $x->bdiv($y)); ok 1406 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); join(",", $x->bdiv($y)); ok 1407 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1408 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1409 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); join(",", $x->bdiv($y)); ok 1410 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); join(",", $x->bdiv($y)); ok 1411 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1412 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1413 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); join(",", $x->bdiv($y)); ok 1414 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); join(",", $x->bdiv($y)); ok 1415 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); join(",", $x->bdiv($y)); ok 1416 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); join(",", $x->bdiv($y)); ok 1417 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); join(",", $x->bdiv($y)); ok 1418 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); join(",", $x->bdiv($y)); ok 1419 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); join(",", $x->bdiv($y)); ok 1420 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1421 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1422 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1423 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1424 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1425 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1426 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1427 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1428 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1429 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1430 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1431 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1432 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1433 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1434 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1435 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1436 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1437 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1438 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1439 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1440 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1441 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1442 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1443 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1444 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1445 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1446 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1447 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1448 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1449 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1450 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1451 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1452 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1453 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1454 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1455 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1456 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-5"); join(",", $x->bdiv($y)); ok 1457 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-2"); join(",", $x->bdiv($y)); ok 1458 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-1"); join(",", $x->bdiv($y)); ok 1459 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("1"); join(",", $x->bdiv($y)); ok 1460 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("2"); join(",", $x->bdiv($y)); ok 1461 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); join(",", $x->bdiv($y)); ok 1462 - $x = Math::BigInt::Subclass->new("1234567812345678"); $y = Math::BigInt::Subclass->new("123456712345678"); join(",", $x->bdiv($y)); ok 1463 - $x = Math::BigInt::Subclass->new("12345671234567"); $y = Math::BigInt::Subclass->new("1234561234567"); join(",", $x->bdiv($y)); ok 1464 - $x = Math::BigInt::Subclass->new("123456123456"); $y = Math::BigInt::Subclass->new("12345123456"); join(",", $x->bdiv($y)); ok 1465 - $x = Math::BigInt::Subclass->new("1234512345"); $y = Math::BigInt::Subclass->new("123412345"); join(",", $x->bdiv($y)); ok 1466 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("1234567890"); join(",", $x->bdiv($y)); ok 1467 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("1234567890"); join(",", $x->bdiv($y)); ok 1468 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("9876543210"); join(",", $x->bdiv($y)); ok 1469 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("9876543210"); join(",", $x->bdiv($y)); ok 1470 - $x = Math::BigInt::Subclass->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt::Subclass->new("484848484848484848484848486666666666666689898989898989898989"); join(",", $x->bdiv($y)); ok 1471 - $x = Math::BigInt::Subclass->new("1267650600228229401496703205375"); $y = Math::BigInt::Subclass->new("1267650600228229401496703205376"); join(",", $x->bdiv($y)); ok 1472 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("999999999999999999999999999999999"); join(",", $x->bdiv($y)); ok 1473 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("888888888888888888888888888888888"); join(",", $x->bdiv($y)); ok 1474 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("777777777777777777777777777777777"); join(",", $x->bdiv($y)); ok 1475 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("666666666666666666666666666666666"); join(",", $x->bdiv($y)); ok 1476 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("555555555555555555555555555555555"); join(",", $x->bdiv($y)); ok 1477 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("444444444444444444444444444444444"); join(",", $x->bdiv($y)); ok 1478 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("333333333333333333333333333333333"); join(",", $x->bdiv($y)); ok 1479 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("222222222222222222222222222222222"); join(",", $x->bdiv($y)); ok 1480 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111111"); join(",", $x->bdiv($y)); ok 1481 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_3333333_3333333_3333333"); join(",", $x->bdiv($y)); ok 1482 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1483 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1484 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("2000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1485 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1486 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1487 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1488 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1489 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1490 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1491 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1_0000000_0000000_0000000"); join(",", $x->bdiv($y)); ok 1492 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x->bdiv($y); ok 1493 - is a valid object ok 1494 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); $x->bdiv($y); ok 1495 - is a valid object ok 1496 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->bdiv($y); ok 1497 - is a valid object ok 1498 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("0"); $x->bdiv($y); ok 1499 - is a valid object ok 1500 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x->bdiv($y); ok 1501 - is a valid object ok 1502 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bdiv($y); ok 1503 - is a valid object ok 1504 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); $x->bdiv($y); ok 1505 - is a valid object ok 1506 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x->bdiv($y); ok 1507 - is a valid object ok 1508 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x->bdiv($y); ok 1509 - is a valid object ok 1510 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->bdiv($y); ok 1511 - is a valid object ok 1512 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); $x->bdiv($y); ok 1513 - is a valid object ok 1514 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x->bdiv($y); ok 1515 - is a valid object ok 1516 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x->bdiv($y); ok 1517 - is a valid object ok 1518 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); $x->bdiv($y); ok 1519 - is a valid object ok 1520 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->bdiv($y); ok 1521 - is a valid object ok 1522 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bdiv($y); ok 1523 - is a valid object ok 1524 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bdiv($y); ok 1525 - is a valid object ok 1526 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->bdiv($y); ok 1527 - is a valid object ok 1528 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bdiv($y); ok 1529 - is a valid object ok 1530 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x->bdiv($y); ok 1531 - is a valid object ok 1532 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); $x->bdiv($y); ok 1533 - is a valid object ok 1534 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("2"); $x->bdiv($y); ok 1535 - is a valid object ok 1536 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("-2"); $x->bdiv($y); ok 1537 - is a valid object ok 1538 - $x = Math::BigInt::Subclass->new("-11"); $y = Math::BigInt::Subclass->new("2"); $x->bdiv($y); ok 1539 - is a valid object ok 1540 - $x = Math::BigInt::Subclass->new("11"); $y = Math::BigInt::Subclass->new("-2"); $x->bdiv($y); ok 1541 - is a valid object ok 1542 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 1543 - is a valid object ok 1544 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->bdiv($y); ok 1545 - is a valid object ok 1546 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 1547 - is a valid object ok 1548 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->bdiv($y); ok 1549 - is a valid object ok 1550 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->bdiv($y); ok 1551 - is a valid object ok 1552 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 1553 - is a valid object ok 1554 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x->bdiv($y); ok 1555 - is a valid object ok 1556 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 1557 - is a valid object ok 1558 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("26"); $x->bdiv($y); ok 1559 - is a valid object ok 1560 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1561 - is a valid object ok 1562 - $x = Math::BigInt::Subclass->new("2000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1563 - is a valid object ok 1564 - $x = Math::BigInt::Subclass->new("3000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1565 - is a valid object ok 1566 - $x = Math::BigInt::Subclass->new("4000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1567 - is a valid object ok 1568 - $x = Math::BigInt::Subclass->new("5000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1569 - is a valid object ok 1570 - $x = Math::BigInt::Subclass->new("6000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1571 - is a valid object ok 1572 - $x = Math::BigInt::Subclass->new("7000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1573 - is a valid object ok 1574 - $x = Math::BigInt::Subclass->new("8000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1575 - is a valid object ok 1576 - $x = Math::BigInt::Subclass->new("9000000000"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1577 - is a valid object ok 1578 - $x = Math::BigInt::Subclass->new("35500000"); $y = Math::BigInt::Subclass->new("113"); $x->bdiv($y); ok 1579 - is a valid object ok 1580 - $x = Math::BigInt::Subclass->new("71000000"); $y = Math::BigInt::Subclass->new("226"); $x->bdiv($y); ok 1581 - is a valid object ok 1582 - $x = Math::BigInt::Subclass->new("106500000"); $y = Math::BigInt::Subclass->new("339"); $x->bdiv($y); ok 1583 - is a valid object ok 1584 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1585 - is a valid object ok 1586 - $x = Math::BigInt::Subclass->new("+10"); $y = Math::BigInt::Subclass->new("+5"); $x->bdiv($y); ok 1587 - is a valid object ok 1588 - $x = Math::BigInt::Subclass->new("+100"); $y = Math::BigInt::Subclass->new("+4"); $x->bdiv($y); ok 1589 - is a valid object ok 1590 - $x = Math::BigInt::Subclass->new("+1000"); $y = Math::BigInt::Subclass->new("+8"); $x->bdiv($y); ok 1591 - is a valid object ok 1592 - $x = Math::BigInt::Subclass->new("+10000"); $y = Math::BigInt::Subclass->new("+16"); $x->bdiv($y); ok 1593 - is a valid object ok 1594 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9"); $x->bdiv($y); ok 1595 - is a valid object ok 1596 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("99"); $x->bdiv($y); ok 1597 - is a valid object ok 1598 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("999"); $x->bdiv($y); ok 1599 - is a valid object ok 1600 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9999"); $x->bdiv($y); ok 1601 - is a valid object ok 1602 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("99999"); $x->bdiv($y); ok 1603 - is a valid object ok 1604 - $x = Math::BigInt::Subclass->new("+1111088889"); $y = Math::BigInt::Subclass->new("99999"); $x->bdiv($y); ok 1605 - is a valid object ok 1606 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1607 - is a valid object ok 1608 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1609 - is a valid object ok 1610 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1611 - is a valid object ok 1612 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1613 - is a valid object ok 1614 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1615 - is a valid object ok 1616 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1617 - is a valid object ok 1618 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1619 - is a valid object ok 1620 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1621 - is a valid object ok 1622 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1623 - is a valid object ok 1624 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1625 - is a valid object ok 1626 - $x = Math::BigInt::Subclass->new("14"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1627 - is a valid object ok 1628 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1629 - is a valid object ok 1630 - $x = Math::BigInt::Subclass->new("-14"); $y = Math::BigInt::Subclass->new("-3"); $x->bdiv($y); ok 1631 - is a valid object ok 1632 - $x = Math::BigInt::Subclass->new("14"); $y = Math::BigInt::Subclass->new("3"); $x->bdiv($y); ok 1633 - is a valid object ok 1634 - $x = Math::BigInt::Subclass->new("10000000000000000000000000000000000000000000000000000000000000000000000000000000000"); $y = Math::BigInt::Subclass->new("10000000375084540248994272022843165711074"); $x->bdiv($y); ok 1635 - is a valid object ok 1636 - $x = Math::BigInt::Subclass->new("1234567812345678"); $y = Math::BigInt::Subclass->new("123456712345678"); $x->bdiv($y); ok 1637 - is a valid object ok 1638 - $x = Math::BigInt::Subclass->new("12345671234567"); $y = Math::BigInt::Subclass->new("1234561234567"); $x->bdiv($y); ok 1639 - is a valid object ok 1640 - $x = Math::BigInt::Subclass->new("123456123456"); $y = Math::BigInt::Subclass->new("12345123456"); $x->bdiv($y); ok 1641 - is a valid object ok 1642 - $x = Math::BigInt::Subclass->new("1234512345"); $y = Math::BigInt::Subclass->new("123412345"); $x->bdiv($y); ok 1643 - is a valid object ok 1644 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("1234567890"); $x->bdiv($y); ok 1645 - is a valid object ok 1646 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("1234567890"); $x->bdiv($y); ok 1647 - is a valid object ok 1648 - $x = Math::BigInt::Subclass->new("1234567890999999999"); $y = Math::BigInt::Subclass->new("9876543210"); $x->bdiv($y); ok 1649 - is a valid object ok 1650 - $x = Math::BigInt::Subclass->new("1234567890000000000"); $y = Math::BigInt::Subclass->new("9876543210"); $x->bdiv($y); ok 1651 - is a valid object ok 1652 - $x = Math::BigInt::Subclass->new("96969696969696969696969696969678787878626262626262626262626262"); $y = Math::BigInt::Subclass->new("484848484848484848484848486666666666666689898989898989898989"); $x->bdiv($y); ok 1653 - is a valid object ok 1654 - $x = Math::BigInt::Subclass->new("84696969696969696956565656566184292929292929292847474747436308080808080808086765396464646464646465"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1655 - is a valid object ok 1656 - $x = Math::BigInt::Subclass->new("84696969696969696943434343434871161616161616161452525252486813131313131313143230042929292929292930"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1657 - is a valid object ok 1658 - $x = Math::BigInt::Subclass->new("84696969696969696969696969697497424242424242424242424242385803030303030303030300750000000000000000"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1659 - is a valid object ok 1660 - $x = Math::BigInt::Subclass->new("84696969696969696930303030303558030303030303030057575757537318181818181818199694689393939393939395"); $y = Math::BigInt::Subclass->new("13131313131313131313131313131394949494949494949494949494943535353535353535353535"); $x->bdiv($y); ok 1661 - is a valid object ok 1662 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $x->bdiv($y); ok 1663 - is a valid object ok 1664 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("888888888888888888888888888888888"); $x->bdiv($y); ok 1665 - is a valid object ok 1666 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("777777777777777777777777777777777"); $x->bdiv($y); ok 1667 - is a valid object ok 1668 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("666666666666666666666666666666666"); $x->bdiv($y); ok 1669 - is a valid object ok 1670 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("555555555555555555555555555555555"); $x->bdiv($y); ok 1671 - is a valid object ok 1672 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("444444444444444444444444444444444"); $x->bdiv($y); ok 1673 - is a valid object ok 1674 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("333333333333333333333333333333333"); $x->bdiv($y); ok 1675 - is a valid object ok 1676 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("222222222222222222222222222222222"); $x->bdiv($y); ok 1677 - is a valid object ok 1678 - $x = Math::BigInt::Subclass->new("999999999999999999999999999999999"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111111"); $x->bdiv($y); ok 1679 - is a valid object ok 1680 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_3333333_3333333_3333333"); $x->bdiv($y); ok 1681 - is a valid object ok 1682 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3333333_0000000_0000000_0000000"); $x->bdiv($y); ok 1683 - is a valid object ok 1684 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("3000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1685 - is a valid object ok 1686 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("2000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1687 - is a valid object ok 1688 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000000_0000000_0000000_0000000"); $x->bdiv($y); ok 1689 - is a valid object ok 1690 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100000_0000000_0000000_0000000"); $x->bdiv($y); ok 1691 - is a valid object ok 1692 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10000_0000000_0000000_0000000"); $x->bdiv($y); ok 1693 - is a valid object ok 1694 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1000_0000000_0000000_0000000"); $x->bdiv($y); ok 1695 - is a valid object ok 1696 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("100_0000000_0000000_0000000"); $x->bdiv($y); ok 1697 - is a valid object ok 1698 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("10_0000000_0000000_0000000"); $x->bdiv($y); ok 1699 - is a valid object ok 1700 - $x = Math::BigInt::Subclass->new("9999999_9999999_9999999_9999999"); $y = Math::BigInt::Subclass->new("1_0000000_0000000_0000000"); $x->bdiv($y); ok 1701 - is a valid object ok 1702 - $x = Math::BigInt::Subclass->new("949418181818187070707070707070707070"); $y = Math::BigInt::Subclass->new("181818181853535353535353535353535353"); $x->bdiv($y); ok 1703 - is a valid object ok 1704 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->btdiv($y)); ok 1705 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->btdiv($y)); ok 1706 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->btdiv($y)); ok 1707 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->btdiv($y)); ok 1708 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); join (",", $x->btdiv($y)); ok 1709 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->btdiv($y)); ok 1710 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1711 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1712 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->btdiv($y)); ok 1713 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->btdiv($y)); ok 1714 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1715 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1716 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->btdiv($y)); ok 1717 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->btdiv($y)); ok 1718 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->btdiv($y)); ok 1719 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); join (",", $x->btdiv($y)); ok 1720 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->btdiv($y)); ok 1721 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->btdiv($y)); ok 1722 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); join (",", $x->btdiv($y)); ok 1723 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1724 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1725 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1726 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1727 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1728 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1729 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1730 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1731 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1732 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1733 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1734 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1735 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1736 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1737 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1738 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1739 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1740 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1741 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1742 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1743 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1744 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1745 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1746 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1747 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1748 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1749 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1750 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1751 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1752 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1753 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1754 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1755 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1756 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1757 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1758 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1759 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-5"); join (",", $x->btdiv($y)); ok 1760 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-2"); join (",", $x->btdiv($y)); ok 1761 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-1"); join (",", $x->btdiv($y)); ok 1762 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("1"); join (",", $x->btdiv($y)); ok 1763 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("2"); join (",", $x->btdiv($y)); ok 1764 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); join (",", $x->btdiv($y)); ok 1765 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x->btdiv($y); ok 1766 - is a valid object ok 1767 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); $x->btdiv($y); ok 1768 - is a valid object ok 1769 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->btdiv($y); ok 1770 - is a valid object ok 1771 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("0"); $x->btdiv($y); ok 1772 - is a valid object ok 1773 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x->btdiv($y); ok 1774 - is a valid object ok 1775 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->btdiv($y); ok 1776 - is a valid object ok 1777 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1778 - is a valid object ok 1779 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1780 - is a valid object ok 1781 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x->btdiv($y); ok 1782 - is a valid object ok 1783 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->btdiv($y); ok 1784 - is a valid object ok 1785 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1786 - is a valid object ok 1787 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1788 - is a valid object ok 1789 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x->btdiv($y); ok 1790 - is a valid object ok 1791 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); $x->btdiv($y); ok 1792 - is a valid object ok 1793 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->btdiv($y); ok 1794 - is a valid object ok 1795 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->btdiv($y); ok 1796 - is a valid object ok 1797 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x->btdiv($y); ok 1798 - is a valid object ok 1799 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->btdiv($y); ok 1800 - is a valid object ok 1801 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x->btdiv($y); ok 1802 - is a valid object ok 1803 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1804 - is a valid object ok 1805 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1806 - is a valid object ok 1807 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1808 - is a valid object ok 1809 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1810 - is a valid object ok 1811 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1812 - is a valid object ok 1813 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1814 - is a valid object ok 1815 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1816 - is a valid object ok 1817 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1818 - is a valid object ok 1819 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1820 - is a valid object ok 1821 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1822 - is a valid object ok 1823 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1824 - is a valid object ok 1825 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1826 - is a valid object ok 1827 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1828 - is a valid object ok 1829 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1830 - is a valid object ok 1831 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1832 - is a valid object ok 1833 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1834 - is a valid object ok 1835 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1836 - is a valid object ok 1837 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1838 - is a valid object ok 1839 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1840 - is a valid object ok 1841 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1842 - is a valid object ok 1843 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1844 - is a valid object ok 1845 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1846 - is a valid object ok 1847 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1848 - is a valid object ok 1849 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1850 - is a valid object ok 1851 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1852 - is a valid object ok 1853 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1854 - is a valid object ok 1855 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1856 - is a valid object ok 1857 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1858 - is a valid object ok 1859 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1860 - is a valid object ok 1861 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1862 - is a valid object ok 1863 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1864 - is a valid object ok 1865 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1866 - is a valid object ok 1867 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1868 - is a valid object ok 1869 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1870 - is a valid object ok 1871 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1872 - is a valid object ok 1873 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1874 - is a valid object ok 1875 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-5"); $x->btdiv($y); ok 1876 - is a valid object ok 1877 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-2"); $x->btdiv($y); ok 1878 - is a valid object ok 1879 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-1"); $x->btdiv($y); ok 1880 - is a valid object ok 1881 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("1"); $x->btdiv($y); ok 1882 - is a valid object ok 1883 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("2"); $x->btdiv($y); ok 1884 - is a valid object ok 1885 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x->btdiv($y); ok 1886 - is a valid object ok 1887 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x->bmodinv($y); ok 1888 - is a valid object ok 1889 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1890 - is a valid object ok 1891 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $x->bmodinv($y); ok 1892 - is a valid object ok 1893 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1894 - is a valid object ok 1895 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1896 - is a valid object ok 1897 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-5"); $x->bmodinv($y); ok 1898 - is a valid object ok 1899 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1900 - is a valid object ok 1901 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("5033"); $x->bmodinv($y); ok 1902 - is a valid object ok 1903 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("13"); $x->bmodinv($y); ok 1904 - is a valid object ok 1905 - $x = Math::BigInt::Subclass->new("-1234567891"); $y = Math::BigInt::Subclass->new("13"); $x->bmodinv($y); ok 1906 - is a valid object ok 1907 - $x = Math::BigInt::Subclass->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigInt::Subclass->new("2348249874968739"); $x->bmodinv($y); ok 1908 - is a valid object ok 1909 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1910 - is a valid object ok 1911 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1912 - is a valid object ok 1913 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1914 - is a valid object ok 1915 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1916 - is a valid object ok 1917 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1918 - is a valid object ok 1919 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1920 - is a valid object ok 1921 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $x->bmodinv($y); ok 1922 - is a valid object ok 1923 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1924 - is a valid object ok 1925 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1926 - is a valid object ok 1927 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1928 - is a valid object ok 1929 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1930 - is a valid object ok 1931 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1932 - is a valid object ok 1933 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1934 - is a valid object ok 1935 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x->bmodinv($y); ok 1936 - is a valid object ok 1937 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1938 - is a valid object ok 1939 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1940 - is a valid object ok 1941 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1942 - is a valid object ok 1943 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1944 - is a valid object ok 1945 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1946 - is a valid object ok 1947 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1948 - is a valid object ok 1949 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $x->bmodinv($y); ok 1950 - is a valid object ok 1951 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1952 - is a valid object ok 1953 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x->bmodinv($y); ok 1954 - is a valid object ok 1955 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmodinv($y); ok 1956 - is a valid object ok 1957 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmodinv($y); ok 1958 - is a valid object ok 1959 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1960 - is a valid object ok 1961 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1962 - is a valid object ok 1963 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1964 - is a valid object ok 1965 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1966 - is a valid object ok 1967 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("abc"); $x->bmodpow($y, $z); ok 1968 - is a valid object ok 1969 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("abc"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1970 - is a valid object ok 1971 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1972 - is a valid object ok 1973 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("0"); $x->bmodpow($y, $z); ok 1974 - is a valid object ok 1975 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("2"); $x->bmodpow($y, $z); ok 1976 - is a valid object ok 1977 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("2"); $x->bmodpow($y, $z); ok 1978 - is a valid object ok 1979 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("5"); $x->bmodpow($y, $z); ok 1980 - is a valid object ok 1981 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1982 - is a valid object ok 1983 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1984 - is a valid object ok 1985 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1986 - is a valid object ok 1987 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1988 - is a valid object ok 1989 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1990 - is a valid object ok 1991 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1992 - is a valid object ok 1993 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1994 - is a valid object ok 1995 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1996 - is a valid object ok 1997 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 1998 - is a valid object ok 1999 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2000 - is a valid object ok 2001 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2002 - is a valid object ok 2003 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2004 - is a valid object ok 2005 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2006 - is a valid object ok 2007 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2008 - is a valid object ok 2009 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2010 - is a valid object ok 2011 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2012 - is a valid object ok 2013 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2014 - is a valid object ok 2015 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2016 - is a valid object ok 2017 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2018 - is a valid object ok 2019 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2020 - is a valid object ok 2021 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2022 - is a valid object ok 2023 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2024 - is a valid object ok 2025 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2026 - is a valid object ok 2027 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2028 - is a valid object ok 2029 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2030 - is a valid object ok 2031 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2088 - is a valid object ok 2089 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2090 - is a valid object ok 2091 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2092 - is a valid object ok 2093 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2094 - is a valid object ok 2095 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2096 - is a valid object ok 2097 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2098 - is a valid object ok 2099 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2100 - is a valid object ok 2101 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2102 - is a valid object ok 2103 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2104 - is a valid object ok 2105 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2106 - is a valid object ok 2107 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2108 - is a valid object ok 2109 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2110 - is a valid object ok 2111 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2112 - is a valid object ok 2113 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2114 - is a valid object ok 2115 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2116 - is a valid object ok 2117 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2118 - is a valid object ok 2119 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2120 - is a valid object ok 2121 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2122 - is a valid object ok 2123 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2124 - is a valid object ok 2125 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2126 - is a valid object ok 2127 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2128 - is a valid object ok 2129 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2130 - is a valid object ok 2131 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2132 - is a valid object ok 2133 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2134 - is a valid object ok 2135 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2136 - is a valid object ok 2137 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2138 - is a valid object ok 2139 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2140 - is a valid object ok 2141 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2142 - is a valid object ok 2143 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2144 - is a valid object ok 2145 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2146 - is a valid object ok 2147 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2148 - is a valid object ok 2149 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2150 - is a valid object ok 2151 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2152 - is a valid object ok 2153 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2154 - is a valid object ok 2155 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2156 - is a valid object ok 2157 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2158 - is a valid object ok 2159 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2160 - is a valid object ok 2161 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2162 - is a valid object ok 2163 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2164 - is a valid object ok 2165 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2166 - is a valid object ok 2167 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2168 - is a valid object ok 2169 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2170 - is a valid object ok 2171 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2172 - is a valid object ok 2173 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2174 - is a valid object ok 2175 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("3"); $x->bmodpow($y, $z); ok 2176 - is a valid object ok 2177 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2178 - is a valid object ok 2179 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2180 - is a valid object ok 2181 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2182 - is a valid object ok 2183 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2184 - is a valid object ok 2185 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2186 - is a valid object ok 2187 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2188 - is a valid object ok 2189 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2190 - is a valid object ok 2191 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2192 - is a valid object ok 2193 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2194 - is a valid object ok 2195 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2196 - is a valid object ok 2197 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2198 - is a valid object ok 2199 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2200 - is a valid object ok 2201 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2202 - is a valid object ok 2203 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2204 - is a valid object ok 2205 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2206 - is a valid object ok 2207 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2208 - is a valid object ok 2209 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2210 - is a valid object ok 2211 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2212 - is a valid object ok 2213 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2214 - is a valid object ok 2215 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2216 - is a valid object ok 2217 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("0"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2218 - is a valid object ok 2219 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2220 - is a valid object ok 2221 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2222 - is a valid object ok 2223 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2224 - is a valid object ok 2225 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2226 - is a valid object ok 2227 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2228 - is a valid object ok 2229 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2230 - is a valid object ok 2231 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2232 - is a valid object ok 2233 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2234 - is a valid object ok 2235 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2236 - is a valid object ok 2237 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2238 - is a valid object ok 2239 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2240 - is a valid object ok 2241 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2242 - is a valid object ok 2243 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2244 - is a valid object ok 2245 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2246 - is a valid object ok 2247 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2248 - is a valid object ok 2249 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2250 - is a valid object ok 2251 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2252 - is a valid object ok 2253 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2254 - is a valid object ok 2255 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2256 - is a valid object ok 2257 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2258 - is a valid object ok 2259 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2260 - is a valid object ok 2261 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2262 - is a valid object ok 2263 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2264 - is a valid object ok 2265 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2266 - is a valid object ok 2267 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2268 - is a valid object ok 2269 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2270 - is a valid object ok 2271 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2272 - is a valid object ok 2273 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $z = Math::BigInt::Subclass->new("4"); $x->bmodpow($y, $z); ok 2274 - is a valid object ok 2275 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("16"); $x->bmodpow($y, $z); ok 2276 - is a valid object ok 2277 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $z = Math::BigInt::Subclass->new("5033"); $x->bmodpow($y, $z); ok 2278 - is a valid object ok 2279 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("7"); $z = Math::BigInt::Subclass->new("5032"); $x->bmodpow($y, $z); ok 2280 - is a valid object ok 2281 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("8"); $z = Math::BigInt::Subclass->new("-5"); $x->bmodpow($y, $z); ok 2282 - is a valid object ok 2283 - $x = Math::BigInt::Subclass->new("1e50"); $y = Math::BigInt::Subclass->new("1"); $z = Math::BigInt::Subclass->new("1"); $x->bmodpow($y, $z); ok 2284 - is a valid object ok 2285 - $x = Math::BigInt::Subclass->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigInt::Subclass->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigInt::Subclass->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 2286 - is a valid object ok 2287 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $z = Math::BigInt::Subclass->new("13"); $x->bmodpow($y, $z); ok 2288 - is a valid object ok 2289 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $z = Math::BigInt::Subclass->new("13"); $x->bmodpow($y, $z); ok 2290 - is a valid object ok 2291 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2292 - is a valid object ok 2293 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2294 - is a valid object ok 2295 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2296 - is a valid object ok 2297 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2298 - is a valid object ok 2299 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x % $y; ok 2300 - is a valid object ok 2301 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2302 - is a valid object ok 2303 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2304 - is a valid object ok 2305 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2306 - is a valid object ok 2307 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2308 - is a valid object ok 2309 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2310 - is a valid object ok 2311 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2312 - is a valid object ok 2313 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2314 - is a valid object ok 2315 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2316 - is a valid object ok 2317 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2318 - is a valid object ok 2319 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2320 - is a valid object ok 2321 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("inf"); $x % $y; ok 2322 - is a valid object ok 2323 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2324 - is a valid object ok 2325 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2326 - is a valid object ok 2327 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("-inf"); $x % $y; ok 2328 - is a valid object ok 2329 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2330 - is a valid object ok 2331 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2332 - is a valid object ok 2333 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2334 - is a valid object ok 2335 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2336 - is a valid object ok 2337 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2338 - is a valid object ok 2339 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2340 - is a valid object ok 2341 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x % $y; ok 2342 - is a valid object ok 2343 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2344 - is a valid object ok 2345 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x % $y; ok 2346 - is a valid object ok 2347 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x % $y; ok 2348 - is a valid object ok 2349 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2350 - is a valid object ok 2351 - $x = Math::BigInt::Subclass->new("2000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2352 - is a valid object ok 2353 - $x = Math::BigInt::Subclass->new("3000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2354 - is a valid object ok 2355 - $x = Math::BigInt::Subclass->new("4000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2356 - is a valid object ok 2357 - $x = Math::BigInt::Subclass->new("5000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2358 - is a valid object ok 2359 - $x = Math::BigInt::Subclass->new("6000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2360 - is a valid object ok 2361 - $x = Math::BigInt::Subclass->new("7000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2362 - is a valid object ok 2363 - $x = Math::BigInt::Subclass->new("8000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2364 - is a valid object ok 2365 - $x = Math::BigInt::Subclass->new("9000000000"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2366 - is a valid object ok 2367 - $x = Math::BigInt::Subclass->new("35500000"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2368 - is a valid object ok 2369 - $x = Math::BigInt::Subclass->new("71000000"); $y = Math::BigInt::Subclass->new("226"); $x % $y; ok 2370 - is a valid object ok 2371 - $x = Math::BigInt::Subclass->new("106500000"); $y = Math::BigInt::Subclass->new("339"); $x % $y; ok 2372 - is a valid object ok 2373 - $x = Math::BigInt::Subclass->new("1000000000"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2374 - is a valid object ok 2375 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2376 - is a valid object ok 2377 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("4"); $x % $y; ok 2378 - is a valid object ok 2379 - $x = Math::BigInt::Subclass->new("1000"); $y = Math::BigInt::Subclass->new("8"); $x % $y; ok 2380 - is a valid object ok 2381 - $x = Math::BigInt::Subclass->new("10000"); $y = Math::BigInt::Subclass->new("16"); $x % $y; ok 2382 - is a valid object ok 2383 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2384 - is a valid object ok 2385 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("99"); $x % $y; ok 2386 - is a valid object ok 2387 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("999"); $x % $y; ok 2388 - is a valid object ok 2389 - $x = Math::BigInt::Subclass->new("999999999999"); $y = Math::BigInt::Subclass->new("9999"); $x % $y; ok 2390 - is a valid object ok 2391 - $x = Math::BigInt::Subclass->new("999999999999999"); $y = Math::BigInt::Subclass->new("99999"); $x % $y; ok 2392 - is a valid object ok 2393 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("+5"); $x % $y; ok 2394 - is a valid object ok 2395 - $x = Math::BigInt::Subclass->new("+9"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2396 - is a valid object ok 2397 - $x = Math::BigInt::Subclass->new("-9"); $y = Math::BigInt::Subclass->new("-5"); $x % $y; ok 2398 - is a valid object ok 2399 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2400 - is a valid object ok 2401 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2402 - is a valid object ok 2403 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2404 - is a valid object ok 2405 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2406 - is a valid object ok 2407 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2408 - is a valid object ok 2409 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2410 - is a valid object ok 2411 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2412 - is a valid object ok 2413 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x % $y; ok 2414 - is a valid object ok 2415 - $x = Math::BigInt::Subclass->new("4095"); $y = Math::BigInt::Subclass->new("4095"); $x % $y; ok 2416 - is a valid object ok 2417 - $x = Math::BigInt::Subclass->new("100041000510123"); $y = Math::BigInt::Subclass->new("3"); $x % $y; ok 2418 - is a valid object ok 2419 - $x = Math::BigInt::Subclass->new("152403346"); $y = Math::BigInt::Subclass->new("12345"); $x % $y; ok 2420 - is a valid object ok 2421 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("5"); $x % $y; ok 2422 - is a valid object ok 2423 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2424 - is a valid object ok 2425 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2426 - is a valid object ok 2427 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2428 - is a valid object ok 2429 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2430 - is a valid object ok 2431 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2432 - is a valid object ok 2433 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2434 - is a valid object ok 2435 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2436 - is a valid object ok 2437 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("9"); $x % $y; ok 2438 - is a valid object ok 2439 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2440 - is a valid object ok 2441 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2442 - is a valid object ok 2443 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2444 - is a valid object ok 2445 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2446 - is a valid object ok 2447 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2448 - is a valid object ok 2449 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2450 - is a valid object ok 2451 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2452 - is a valid object ok 2453 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("10"); $x % $y; ok 2454 - is a valid object ok 2455 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2456 - is a valid object ok 2457 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2458 - is a valid object ok 2459 - $x = Math::BigInt::Subclass->new("12345678"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2460 - is a valid object ok 2461 - $x = Math::BigInt::Subclass->new("1234567891"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2462 - is a valid object ok 2463 - $x = Math::BigInt::Subclass->new("123456789123"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2464 - is a valid object ok 2465 - $x = Math::BigInt::Subclass->new("12345678912345"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2466 - is a valid object ok 2467 - $x = Math::BigInt::Subclass->new("1234567891234567"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2468 - is a valid object ok 2469 - $x = Math::BigInt::Subclass->new("123456789123456789"); $y = Math::BigInt::Subclass->new("113"); $x % $y; ok 2470 - is a valid object ok 2471 - $x = Math::BigInt::Subclass->new("-629"); $y = Math::BigInt::Subclass->new("5033"); $x % $y; ok 2472 - is a valid object ok 2473 - $x = Math::BigInt::Subclass->new("111111111111111111111111111111"); $y = Math::BigInt::Subclass->new("111111111111111111111111111111"); $x % $y; ok 2474 - is a valid object ok 2475 - $x = Math::BigInt::Subclass->new("12345678901234567890"); $y = Math::BigInt::Subclass->new("12345678901234567890"); $x % $y; ok 2476 - is a valid object ok 2477 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->bgcd($x, $y); ok 2478 - is a valid object ok 2479 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->bgcd($x, $y); ok 2480 - is a valid object ok 2481 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("inf"); Math::BigInt::Subclass->bgcd($x, $y); ok 2482 - is a valid object ok 2483 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass->bgcd($x, $y); ok 2484 - is a valid object ok 2485 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); Math::BigInt::Subclass->bgcd($x, $y); ok 2486 - is a valid object ok 2487 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass->bgcd($x, $y); ok 2488 - is a valid object ok 2489 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); Math::BigInt::Subclass->bgcd($x, $y); ok 2490 - is a valid object ok 2491 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass->bgcd($x, $y); ok 2492 - is a valid object ok 2493 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->bgcd($x, $y); ok 2494 - is a valid object ok 2495 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass->bgcd($x, $y); ok 2496 - is a valid object ok 2497 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->bgcd($x, $y); ok 2498 - is a valid object ok 2499 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass->bgcd($x, $y); ok 2500 - is a valid object ok 2501 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->bgcd($x, $y); ok 2502 - is a valid object ok 2503 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass->bgcd($x, $y); ok 2504 - is a valid object ok 2505 - $x = Math::BigInt::Subclass->new("+2"); $y = Math::BigInt::Subclass->new("+3"); Math::BigInt::Subclass->bgcd($x, $y); ok 2506 - is a valid object ok 2507 - $x = Math::BigInt::Subclass->new("+3"); $y = Math::BigInt::Subclass->new("+2"); Math::BigInt::Subclass->bgcd($x, $y); ok 2508 - is a valid object ok 2509 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("+2"); Math::BigInt::Subclass->bgcd($x, $y); ok 2510 - is a valid object ok 2511 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-2"); Math::BigInt::Subclass->bgcd($x, $y); ok 2512 - is a valid object ok 2513 - $x = Math::BigInt::Subclass->new("-144"); $y = Math::BigInt::Subclass->new("-60"); Math::BigInt::Subclass->bgcd($x, $y); ok 2514 - is a valid object ok 2515 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("-60"); Math::BigInt::Subclass->bgcd($x, $y); ok 2516 - is a valid object ok 2517 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("60"); Math::BigInt::Subclass->bgcd($x, $y); ok 2518 - is a valid object ok 2519 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("625"); Math::BigInt::Subclass->bgcd($x, $y); ok 2520 - is a valid object ok 2521 - $x = Math::BigInt::Subclass->new("4096"); $y = Math::BigInt::Subclass->new("81"); Math::BigInt::Subclass->bgcd($x, $y); ok 2522 - is a valid object ok 2523 - $x = Math::BigInt::Subclass->new("1034"); $y = Math::BigInt::Subclass->new("804"); Math::BigInt::Subclass->bgcd($x, $y); ok 2524 - is a valid object ok 2525 - $x = Math::BigInt::Subclass->new("27"); $y = Math::BigInt::Subclass->new("90"); $z = Math::BigInt::Subclass->new("56"); Math::BigInt::Subclass->bgcd($x, $y, $z); ok 2526 - is a valid object ok 2527 - $x = Math::BigInt::Subclass->new("27"); $y = Math::BigInt::Subclass->new("90"); $z = Math::BigInt::Subclass->new("54"); Math::BigInt::Subclass->bgcd($x, $y, $z); ok 2528 - is a valid object ok 2529 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass->blcm($x, $y); ok 2530 - is a valid object ok 2531 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->blcm($x, $y); ok 2532 - is a valid object ok 2533 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("abc"); Math::BigInt::Subclass->blcm($x, $y); ok 2534 - is a valid object ok 2535 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->blcm($x, $y); ok 2536 - is a valid object ok 2537 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->blcm($x, $y); ok 2538 - is a valid object ok 2539 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("+1"); Math::BigInt::Subclass->blcm($x, $y); ok 2540 - is a valid object ok 2541 - $x = Math::BigInt::Subclass->new("+27"); $y = Math::BigInt::Subclass->new("+90"); Math::BigInt::Subclass->blcm($x, $y); ok 2542 - is a valid object ok 2543 - $x = Math::BigInt::Subclass->new("+1034"); $y = Math::BigInt::Subclass->new("+804"); Math::BigInt::Subclass->blcm($x, $y); ok 2544 - is a valid object ok 2545 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x & $y; ok 2546 - is a valid object ok 2547 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x & $y; ok 2548 - is a valid object ok 2549 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x & $y; ok 2550 - is a valid object ok 2551 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x & $y; ok 2552 - is a valid object ok 2553 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $x & $y; ok 2554 - is a valid object ok 2555 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x & $y; ok 2556 - is a valid object ok 2557 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x & $y; ok 2558 - is a valid object ok 2559 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x & $y; ok 2560 - is a valid object ok 2561 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("+281474976710656"); $x & $y; ok 2562 - is a valid object ok 2563 - $x = Math::BigInt::Subclass->new("281474976710656"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2564 - is a valid object ok 2565 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x & $y; ok 2566 - is a valid object ok 2567 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2568 - is a valid object ok 2569 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x & $y; ok 2570 - is a valid object ok 2571 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("-4"); $x & $y; ok 2572 - is a valid object ok 2573 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x & $y; ok 2574 - is a valid object ok 2575 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x & $y; ok 2576 - is a valid object ok 2577 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x & $y; ok 2578 - is a valid object ok 2579 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-1"); $x & $y; ok 2580 - is a valid object ok 2581 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x & $y; ok 2582 - is a valid object ok 2583 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x & $y; ok 2584 - is a valid object ok 2585 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x & $y; ok 2586 - is a valid object ok 2587 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x & $y; ok 2588 - is a valid object ok 2589 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x & $y; ok 2590 - is a valid object ok 2591 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x & $y; ok 2592 - is a valid object ok 2593 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x & $y; ok 2594 - is a valid object ok 2595 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x & $y; ok 2596 - is a valid object ok 2597 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x & $y; ok 2598 - is a valid object ok 2599 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x & $y; ok 2600 - is a valid object ok 2601 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x & $y; ok 2602 - is a valid object ok 2603 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x & $y; ok 2604 - is a valid object ok 2605 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x & $y; ok 2606 - is a valid object ok 2607 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x & $y; ok 2608 - is a valid object ok 2609 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x & $y; ok 2610 - is a valid object ok 2611 - $x = Math::BigInt::Subclass->new("0x1F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x3F0F0F0F0F0F"); $x & $y; ok 2612 - is a valid object ok 2613 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x | $y; ok 2614 - is a valid object ok 2615 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2616 - is a valid object ok 2617 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x | $y; ok 2618 - is a valid object ok 2619 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x | $y; ok 2620 - is a valid object ok 2621 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x | $y; ok 2622 - is a valid object ok 2623 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2624 - is a valid object ok 2625 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x | $y; ok 2626 - is a valid object ok 2627 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("281474976710656"); $x | $y; ok 2628 - is a valid object ok 2629 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x | $y; ok 2630 - is a valid object ok 2631 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x | $y; ok 2632 - is a valid object ok 2633 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x | $y; ok 2634 - is a valid object ok 2635 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x | $y; ok 2636 - is a valid object ok 2637 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x | $y; ok 2638 - is a valid object ok 2639 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("-1"); $x | $y; ok 2640 - is a valid object ok 2641 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x | $y; ok 2642 - is a valid object ok 2643 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-4"); $x | $y; ok 2644 - is a valid object ok 2645 - $x = Math::BigInt::Subclass->new("300"); $y = Math::BigInt::Subclass->new("-76"); $x | $y; ok 2646 - is a valid object ok 2647 - $x = Math::BigInt::Subclass->new("-76"); $y = Math::BigInt::Subclass->new("300"); $x | $y; ok 2648 - is a valid object ok 2649 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x | $y; ok 2650 - is a valid object ok 2651 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x | $y; ok 2652 - is a valid object ok 2653 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x | $y; ok 2654 - is a valid object ok 2655 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x | $y; ok 2656 - is a valid object ok 2657 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x | $y; ok 2658 - is a valid object ok 2659 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x | $y; ok 2660 - is a valid object ok 2661 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x | $y; ok 2662 - is a valid object ok 2663 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x | $y; ok 2664 - is a valid object ok 2665 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x | $y; ok 2666 - is a valid object ok 2667 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x | $y; ok 2668 - is a valid object ok 2669 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2670 - is a valid object ok 2671 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2672 - is a valid object ok 2673 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2674 - is a valid object ok 2675 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2676 - is a valid object ok 2677 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x | $y; ok 2678 - is a valid object ok 2679 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x | $y; ok 2680 - is a valid object ok 2681 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x | $y; ok 2682 - is a valid object ok 2683 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x | $y; ok 2684 - is a valid object ok 2685 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x | $y; ok 2686 - is a valid object ok 2687 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x | $y; ok 2688 - is a valid object ok 2689 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x | $y; ok 2690 - is a valid object ok 2691 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x | $y; ok 2692 - is a valid object ok 2693 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x | $y; ok 2694 - is a valid object ok 2695 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x | $y; ok 2696 - is a valid object ok 2697 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x | $y; ok 2698 - is a valid object ok 2699 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x | $y; ok 2700 - is a valid object ok 2701 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x | $y; ok 2702 - is a valid object ok 2703 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2704 - is a valid object ok 2705 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x | $y; ok 2706 - is a valid object ok 2707 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2708 - is a valid object ok 2709 - $x = Math::BigInt::Subclass->new("0x1F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x | $y; ok 2710 - is a valid object ok 2711 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("abc"); $x ^ $y; ok 2712 - is a valid object ok 2713 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2714 - is a valid object ok 2715 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("abc"); $x ^ $y; ok 2716 - is a valid object ok 2717 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x ^ $y; ok 2718 - is a valid object ok 2719 - $x = Math::BigInt::Subclass->new("+8"); $y = Math::BigInt::Subclass->new("+2"); $x ^ $y; ok 2720 - is a valid object ok 2721 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2722 - is a valid object ok 2723 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("1"); $x ^ $y; ok 2724 - is a valid object ok 2725 - $x = Math::BigInt::Subclass->new("+281474976710656"); $y = Math::BigInt::Subclass->new("281474976710656"); $x ^ $y; ok 2726 - is a valid object ok 2727 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x ^ $y; ok 2728 - is a valid object ok 2729 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x ^ $y; ok 2730 - is a valid object ok 2731 - $x = Math::BigInt::Subclass->new("-6"); $y = Math::BigInt::Subclass->new("-6"); $x ^ $y; ok 2732 - is a valid object ok 2733 - $x = Math::BigInt::Subclass->new("-7"); $y = Math::BigInt::Subclass->new("4"); $x ^ $y; ok 2734 - is a valid object ok 2735 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("7"); $x ^ $y; ok 2736 - is a valid object ok 2737 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("-7"); $x ^ $y; ok 2738 - is a valid object ok 2739 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("-7"); $x ^ $y; ok 2740 - is a valid object ok 2741 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-3"); $x ^ $y; ok 2742 - is a valid object ok 2743 - $x = Math::BigInt::Subclass->new("30"); $y = Math::BigInt::Subclass->new("-4"); $x ^ $y; ok 2744 - is a valid object ok 2745 - $x = Math::BigInt::Subclass->new("300"); $y = Math::BigInt::Subclass->new("-76"); $x ^ $y; ok 2746 - is a valid object ok 2747 - $x = Math::BigInt::Subclass->new("-76"); $y = Math::BigInt::Subclass->new("300"); $x ^ $y; ok 2748 - is a valid object ok 2749 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x ^ $y; ok 2750 - is a valid object ok 2751 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x ^ $y; ok 2752 - is a valid object ok 2753 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x ^ $y; ok 2754 - is a valid object ok 2755 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x ^ $y; ok 2756 - is a valid object ok 2757 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2758 - is a valid object ok 2759 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFF"); $x ^ $y; ok 2760 - is a valid object ok 2761 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFF"); $x ^ $y; ok 2762 - is a valid object ok 2763 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFF"); $x ^ $y; ok 2764 - is a valid object ok 2765 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $x ^ $y; ok 2766 - is a valid object ok 2767 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 2768 - is a valid object ok 2769 - $x = Math::BigInt::Subclass->new("0xFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2770 - is a valid object ok 2771 - $x = Math::BigInt::Subclass->new("0xFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2772 - is a valid object ok 2773 - $x = Math::BigInt::Subclass->new("0xFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2774 - is a valid object ok 2775 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2776 - is a valid object ok 2777 - $x = Math::BigInt::Subclass->new("0xFFFFFFFFFFFF"); $y = Math::BigInt::Subclass->new("0"); $x ^ $y; ok 2778 - is a valid object ok 2779 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0xF0F0"); $x ^ $y; ok 2780 - is a valid object ok 2781 - $x = Math::BigInt::Subclass->new("0x0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x ^ $y; ok 2782 - is a valid object ok 2783 - $x = Math::BigInt::Subclass->new("0xF0F0"); $y = Math::BigInt::Subclass->new("0x0F0F"); $x ^ $y; ok 2784 - is a valid object ok 2785 - $x = Math::BigInt::Subclass->new("0xF0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x ^ $y; ok 2786 - is a valid object ok 2787 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F"); $x ^ $y; ok 2788 - is a valid object ok 2789 - $x = Math::BigInt::Subclass->new("0x0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0"); $x ^ $y; ok 2790 - is a valid object ok 2791 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x ^ $y; ok 2792 - is a valid object ok 2793 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F"); $x ^ $y; ok 2794 - is a valid object ok 2795 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0"); $x ^ $y; ok 2796 - is a valid object ok 2797 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x ^ $y; ok 2798 - is a valid object ok 2799 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $x ^ $y; ok 2800 - is a valid object ok 2801 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0"); $x ^ $y; ok 2802 - is a valid object ok 2803 - $x = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2804 - is a valid object ok 2805 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 2806 - is a valid object ok 2807 - $x = Math::BigInt::Subclass->new("0x0F0F0F0F0F0F"); $y = Math::BigInt::Subclass->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 2808 - is a valid object ok 2809 - $x = Math::BigInt::Subclass->new("abc"); $x->bnot(); ok 2810 - is a valid object ok 2811 - $x = Math::BigInt::Subclass->new("+0"); $x->bnot(); ok 2812 - is a valid object ok 2813 - $x = Math::BigInt::Subclass->new("+8"); $x->bnot(); ok 2814 - is a valid object ok 2815 - $x = Math::BigInt::Subclass->new("+281474976710656"); $x->bnot(); ok 2816 - is a valid object ok 2817 - $x = Math::BigInt::Subclass->new("-1"); $x->bnot(); ok 2818 - is a valid object ok 2819 - $x = Math::BigInt::Subclass->new("-2"); $x->bnot(); ok 2820 - is a valid object ok 2821 - $x = Math::BigInt::Subclass->new("-12"); $x->bnot(); ok 2822 - is a valid object ok 2823 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2824 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2825 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2826 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2827 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2828 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("2"); $x->digit($y); ok 2829 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-1"); $x->digit($y); ok 2830 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-2"); $x->digit($y); ok 2831 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2832 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2833 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2834 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("2"); $x->digit($y); ok 2835 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("3"); $x->digit($y); ok 2836 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("4"); $x->digit($y); ok 2837 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("5"); $x->digit($y); ok 2838 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-1"); $x->digit($y); ok 2839 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-2"); $x->digit($y); ok 2840 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2841 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("-3"); $x->digit($y); ok 2842 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("0"); $x->digit($y); ok 2843 - $x = Math::BigInt::Subclass->new("100000"); $y = Math::BigInt::Subclass->new("1"); $x->digit($y); ok 2844 - $x = Math::BigInt::Subclass->new("abc"); $x = $x->mantissa()->bstr(); ok 2845 - $x = Math::BigInt::Subclass->new("1e4"); $x = $x->mantissa()->bstr(); ok 2846 - $x = Math::BigInt::Subclass->new("2e0"); $x = $x->mantissa()->bstr(); ok 2847 - $x = Math::BigInt::Subclass->new("123"); $x = $x->mantissa()->bstr(); ok 2848 - $x = Math::BigInt::Subclass->new("-1"); $x = $x->mantissa()->bstr(); ok 2849 - $x = Math::BigInt::Subclass->new("-2"); $x = $x->mantissa()->bstr(); ok 2850 - $x = Math::BigInt::Subclass->new("+inf"); $x = $x->mantissa()->bstr(); ok 2851 - $x = Math::BigInt::Subclass->new("-inf"); $x = $x->mantissa()->bstr(); ok 2852 - $x = Math::BigInt::Subclass->new("abc"); $x = $x->exponent()->bstr(); ok 2853 - $x = Math::BigInt::Subclass->new("1e4"); $x = $x->exponent()->bstr(); ok 2854 - $x = Math::BigInt::Subclass->new("2e0"); $x = $x->exponent()->bstr(); ok 2855 - $x = Math::BigInt::Subclass->new("123"); $x = $x->exponent()->bstr(); ok 2856 - $x = Math::BigInt::Subclass->new("-1"); $x = $x->exponent()->bstr(); ok 2857 - $x = Math::BigInt::Subclass->new("-2"); $x = $x->exponent()->bstr(); ok 2858 - $x = Math::BigInt::Subclass->new("0"); $x = $x->exponent()->bstr(); ok 2859 - $x = Math::BigInt::Subclass->new("+inf"); $x = $x->exponent()->bstr(); ok 2860 - $x = Math::BigInt::Subclass->new("-inf"); $x = $x->exponent()->bstr(); ok 2861 - $x = Math::BigInt::Subclass->new("abc"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2862 - $x = Math::BigInt::Subclass->new("1e4"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2863 - $x = Math::BigInt::Subclass->new("2e0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2864 - $x = Math::BigInt::Subclass->new("123"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2865 - $x = Math::BigInt::Subclass->new("-1"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2866 - $x = Math::BigInt::Subclass->new("-2"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2867 - $x = Math::BigInt::Subclass->new("0"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2868 - $x = Math::BigInt::Subclass->new("+inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2869 - $x = Math::BigInt::Subclass->new("-inf"); ($m, $e) = $x->parts(); $m = $m->bstr(); $m = "NaN" if !defined $m; $e = $e->bstr(); $e = "NaN" if !defined $e; "$m,$e"; ok 2870 - $x = Math::BigInt::Subclass->new("NaN"); $x->bfac(); ok 2871 - is a valid object ok 2872 - $x = Math::BigInt::Subclass->new("+inf"); $x->bfac(); ok 2873 - is a valid object ok 2874 - $x = Math::BigInt::Subclass->new("-inf"); $x->bfac(); ok 2875 - is a valid object ok 2876 - $x = Math::BigInt::Subclass->new("-1"); $x->bfac(); ok 2877 - is a valid object ok 2878 - $x = Math::BigInt::Subclass->new("0"); $x->bfac(); ok 2879 - is a valid object ok 2880 - $x = Math::BigInt::Subclass->new("1"); $x->bfac(); ok 2881 - is a valid object ok 2882 - $x = Math::BigInt::Subclass->new("2"); $x->bfac(); ok 2883 - is a valid object ok 2884 - $x = Math::BigInt::Subclass->new("3"); $x->bfac(); ok 2885 - is a valid object ok 2886 - $x = Math::BigInt::Subclass->new("4"); $x->bfac(); ok 2887 - is a valid object ok 2888 - $x = Math::BigInt::Subclass->new("5"); $x->bfac(); ok 2889 - is a valid object ok 2890 - $x = Math::BigInt::Subclass->new("6"); $x->bfac(); ok 2891 - is a valid object ok 2892 - $x = Math::BigInt::Subclass->new("7"); $x->bfac(); ok 2893 - is a valid object ok 2894 - $x = Math::BigInt::Subclass->new("8"); $x->bfac(); ok 2895 - is a valid object ok 2896 - $x = Math::BigInt::Subclass->new("9"); $x->bfac(); ok 2897 - is a valid object ok 2898 - $x = Math::BigInt::Subclass->new("10"); $x->bfac(); ok 2899 - is a valid object ok 2900 - $x = Math::BigInt::Subclass->new("11"); $x->bfac(); ok 2901 - is a valid object ok 2902 - $x = Math::BigInt::Subclass->new("12"); $x->bfac(); ok 2903 - is a valid object ok 2904 - $x = Math::BigInt::Subclass->new("20"); $x->bfac(); ok 2905 - is a valid object ok 2906 - $x = Math::BigInt::Subclass->new("22"); $x->bfac(); ok 2907 - is a valid object ok 2908 - $x = Math::BigInt::Subclass->new("69"); $x->bfac(); ok 2909 - is a valid object ok 2910 - $x = Math::BigInt::Subclass->new("NaN"); $x->bdfac(); ok 2911 - is a valid object ok 2912 - $x = Math::BigInt::Subclass->new("+inf"); $x->bdfac(); ok 2913 - is a valid object ok 2914 - $x = Math::BigInt::Subclass->new("-inf"); $x->bdfac(); ok 2915 - is a valid object ok 2916 - $x = Math::BigInt::Subclass->new("-2"); $x->bdfac(); ok 2917 - is a valid object ok 2918 - $x = Math::BigInt::Subclass->new("-1"); $x->bdfac(); ok 2919 - is a valid object ok 2920 - $x = Math::BigInt::Subclass->new("0"); $x->bdfac(); ok 2921 - is a valid object ok 2922 - $x = Math::BigInt::Subclass->new("1"); $x->bdfac(); ok 2923 - is a valid object ok 2924 - $x = Math::BigInt::Subclass->new("2"); $x->bdfac(); ok 2925 - is a valid object ok 2926 - $x = Math::BigInt::Subclass->new("3"); $x->bdfac(); ok 2927 - is a valid object ok 2928 - $x = Math::BigInt::Subclass->new("4"); $x->bdfac(); ok 2929 - is a valid object ok 2930 - $x = Math::BigInt::Subclass->new("5"); $x->bdfac(); ok 2931 - is a valid object ok 2932 - $x = Math::BigInt::Subclass->new("6"); $x->bdfac(); ok 2933 - is a valid object ok 2934 - $x = Math::BigInt::Subclass->new("7"); $x->bdfac(); ok 2935 - is a valid object ok 2936 - $x = Math::BigInt::Subclass->new("8"); $x->bdfac(); ok 2937 - is a valid object ok 2938 - $x = Math::BigInt::Subclass->new("9"); $x->bdfac(); ok 2939 - is a valid object ok 2940 - $x = Math::BigInt::Subclass->new("10"); $x->bdfac(); ok 2941 - is a valid object ok 2942 - $x = Math::BigInt::Subclass->new("11"); $x->bdfac(); ok 2943 - is a valid object ok 2944 - $x = Math::BigInt::Subclass->new("12"); $x->bdfac(); ok 2945 - is a valid object ok 2946 - $x = Math::BigInt::Subclass->new("NaN"); $x->btfac(); ok 2947 - is a valid object ok 2948 - $x = Math::BigInt::Subclass->new("+inf"); $x->btfac(); ok 2949 - is a valid object ok 2950 - $x = Math::BigInt::Subclass->new("-inf"); $x->btfac(); ok 2951 - is a valid object ok 2952 - $x = Math::BigInt::Subclass->new("-3"); $x->btfac(); ok 2953 - is a valid object ok 2954 - $x = Math::BigInt::Subclass->new("-2"); $x->btfac(); ok 2955 - is a valid object ok 2956 - $x = Math::BigInt::Subclass->new("-1"); $x->btfac(); ok 2957 - is a valid object ok 2958 - $x = Math::BigInt::Subclass->new("0"); $x->btfac(); ok 2959 - is a valid object ok 2960 - $x = Math::BigInt::Subclass->new("1"); $x->btfac(); ok 2961 - is a valid object ok 2962 - $x = Math::BigInt::Subclass->new("2"); $x->btfac(); ok 2963 - is a valid object ok 2964 - $x = Math::BigInt::Subclass->new("3"); $x->btfac(); ok 2965 - is a valid object ok 2966 - $x = Math::BigInt::Subclass->new("4"); $x->btfac(); ok 2967 - is a valid object ok 2968 - $x = Math::BigInt::Subclass->new("5"); $x->btfac(); ok 2969 - is a valid object ok 2970 - $x = Math::BigInt::Subclass->new("6"); $x->btfac(); ok 2971 - is a valid object ok 2972 - $x = Math::BigInt::Subclass->new("7"); $x->btfac(); ok 2973 - is a valid object ok 2974 - $x = Math::BigInt::Subclass->new("8"); $x->btfac(); ok 2975 - is a valid object ok 2976 - $x = Math::BigInt::Subclass->new("9"); $x->btfac(); ok 2977 - is a valid object ok 2978 - $x = Math::BigInt::Subclass->new("10"); $x->btfac(); ok 2979 - is a valid object ok 2980 - $x = Math::BigInt::Subclass->new("11"); $x->btfac(); ok 2981 - is a valid object ok 2982 - $x = Math::BigInt::Subclass->new("12"); $x->btfac(); ok 2983 - is a valid object ok 2984 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("-inf"); $x->bmfac($y); ok 2985 - is a valid object ok 2986 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("-1"); $x->bmfac($y); ok 2987 - is a valid object ok 2988 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("0"); $x->bmfac($y); ok 2989 - is a valid object ok 2990 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("inf"); $x->bmfac($y); ok 2991 - is a valid object ok 2992 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("NaN"); $x->bmfac($y); ok 2993 - is a valid object ok 2994 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 2995 - is a valid object ok 2996 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 2997 - is a valid object ok 2998 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 2999 - is a valid object ok 3000 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3001 - is a valid object ok 3002 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3003 - is a valid object ok 3004 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3005 - is a valid object ok 3006 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3007 - is a valid object ok 3008 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3009 - is a valid object ok 3010 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3011 - is a valid object ok 3012 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3013 - is a valid object ok 3014 - $x = Math::BigInt::Subclass->new("6"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3015 - is a valid object ok 3016 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3017 - is a valid object ok 3018 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3019 - is a valid object ok 3020 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3021 - is a valid object ok 3022 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("1"); $x->bmfac($y); ok 3023 - is a valid object ok 3024 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3025 - is a valid object ok 3026 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3027 - is a valid object ok 3028 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3029 - is a valid object ok 3030 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3031 - is a valid object ok 3032 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3033 - is a valid object ok 3034 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3035 - is a valid object ok 3036 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3037 - is a valid object ok 3038 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3039 - is a valid object ok 3040 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3041 - is a valid object ok 3042 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3043 - is a valid object ok 3044 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3045 - is a valid object ok 3046 - $x = Math::BigInt::Subclass->new("6"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3047 - is a valid object ok 3048 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3049 - is a valid object ok 3050 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3051 - is a valid object ok 3052 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3053 - is a valid object ok 3054 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("2"); $x->bmfac($y); ok 3055 - is a valid object ok 3056 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3057 - is a valid object ok 3058 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3059 - is a valid object ok 3060 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3061 - is a valid object ok 3062 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3063 - is a valid object ok 3064 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3065 - is a valid object ok 3066 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3067 - is a valid object ok 3068 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3069 - is a valid object ok 3070 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3071 - is a valid object ok 3072 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3073 - is a valid object ok 3074 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3075 - is a valid object ok 3076 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3077 - is a valid object ok 3078 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3079 - is a valid object ok 3080 - $x = Math::BigInt::Subclass->new("6"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3081 - is a valid object ok 3082 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3083 - is a valid object ok 3084 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3085 - is a valid object ok 3086 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3087 - is a valid object ok 3088 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("3"); $x->bmfac($y); ok 3089 - is a valid object ok 3090 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3091 - is a valid object ok 3092 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3093 - is a valid object ok 3094 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3095 - is a valid object ok 3096 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3097 - is a valid object ok 3098 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3099 - is a valid object ok 3100 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3101 - is a valid object ok 3102 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3103 - is a valid object ok 3104 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3105 - is a valid object ok 3106 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3107 - is a valid object ok 3108 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3109 - is a valid object ok 3110 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3111 - is a valid object ok 3112 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3113 - is a valid object ok 3114 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3115 - is a valid object ok 3116 - $x = Math::BigInt::Subclass->new("6"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3117 - is a valid object ok 3118 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3119 - is a valid object ok 3120 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3121 - is a valid object ok 3122 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3123 - is a valid object ok 3124 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("4"); $x->bmfac($y); ok 3125 - is a valid object ok 3126 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3127 - is a valid object ok 3128 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3129 - is a valid object ok 3130 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3131 - is a valid object ok 3132 - $x = Math::BigInt::Subclass->new("-5"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3133 - is a valid object ok 3134 - $x = Math::BigInt::Subclass->new("-4"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3135 - is a valid object ok 3136 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3137 - is a valid object ok 3138 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3139 - is a valid object ok 3140 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3141 - is a valid object ok 3142 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3143 - is a valid object ok 3144 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3145 - is a valid object ok 3146 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3147 - is a valid object ok 3148 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3149 - is a valid object ok 3150 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3151 - is a valid object ok 3152 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3153 - is a valid object ok 3154 - $x = Math::BigInt::Subclass->new("6"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3155 - is a valid object ok 3156 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3157 - is a valid object ok 3158 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3159 - is a valid object ok 3160 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3161 - is a valid object ok 3162 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("5"); $x->bmfac($y); ok 3163 - is a valid object ok 3164 - $x = Math::BigInt::Subclass->new("abc"); $y = Math::BigInt::Subclass->new("12"); $x ** $y; ok 3165 - is a valid object ok 3166 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("abc"); $x ** $y; ok 3167 - is a valid object ok 3168 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3169 - is a valid object ok 3170 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3171 - is a valid object ok 3172 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3173 - is a valid object ok 3174 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3175 - is a valid object ok 3176 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3177 - is a valid object ok 3178 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3179 - is a valid object ok 3180 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3181 - is a valid object ok 3182 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3183 - is a valid object ok 3184 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3185 - is a valid object ok 3186 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3187 - is a valid object ok 3188 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3189 - is a valid object ok 3190 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3191 - is a valid object ok 3192 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3193 - is a valid object ok 3194 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3195 - is a valid object ok 3196 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3197 - is a valid object ok 3198 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3199 - is a valid object ok 3200 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3201 - is a valid object ok 3202 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3203 - is a valid object ok 3204 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3205 - is a valid object ok 3206 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3207 - is a valid object ok 3208 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3209 - is a valid object ok 3210 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3211 - is a valid object ok 3212 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3213 - is a valid object ok 3214 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3215 - is a valid object ok 3216 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3217 - is a valid object ok 3218 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3219 - is a valid object ok 3220 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3221 - is a valid object ok 3222 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3223 - is a valid object ok 3224 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3225 - is a valid object ok 3226 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3227 - is a valid object ok 3228 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3229 - is a valid object ok 3230 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3231 - is a valid object ok 3232 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3233 - is a valid object ok 3234 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3235 - is a valid object ok 3236 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3237 - is a valid object ok 3238 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3239 - is a valid object ok 3240 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3241 - is a valid object ok 3242 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3243 - is a valid object ok 3244 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3245 - is a valid object ok 3246 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3247 - is a valid object ok 3248 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3249 - is a valid object ok 3250 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3251 - is a valid object ok 3252 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3253 - is a valid object ok 3254 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3255 - is a valid object ok 3256 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3257 - is a valid object ok 3258 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3259 - is a valid object ok 3260 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3261 - is a valid object ok 3262 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3263 - is a valid object ok 3264 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3265 - is a valid object ok 3266 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3267 - is a valid object ok 3268 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3269 - is a valid object ok 3270 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3271 - is a valid object ok 3272 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3273 - is a valid object ok 3274 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3275 - is a valid object ok 3276 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3277 - is a valid object ok 3278 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3279 - is a valid object ok 3280 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3281 - is a valid object ok 3282 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3283 - is a valid object ok 3284 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3285 - is a valid object ok 3286 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3287 - is a valid object ok 3288 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3289 - is a valid object ok 3290 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3291 - is a valid object ok 3292 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3293 - is a valid object ok 3294 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3295 - is a valid object ok 3296 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3297 - is a valid object ok 3298 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3299 - is a valid object ok 3300 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3301 - is a valid object ok 3302 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3303 - is a valid object ok 3304 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3305 - is a valid object ok 3306 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3307 - is a valid object ok 3308 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3309 - is a valid object ok 3310 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3311 - is a valid object ok 3312 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3313 - is a valid object ok 3314 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3315 - is a valid object ok 3316 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3317 - is a valid object ok 3318 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3319 - is a valid object ok 3320 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3321 - is a valid object ok 3322 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3323 - is a valid object ok 3324 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3325 - is a valid object ok 3326 - $x = Math::BigInt::Subclass->new("3"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3327 - is a valid object ok 3328 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3329 - is a valid object ok 3330 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3331 - is a valid object ok 3332 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3333 - is a valid object ok 3334 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3335 - is a valid object ok 3336 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3337 - is a valid object ok 3338 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3339 - is a valid object ok 3340 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3341 - is a valid object ok 3342 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3343 - is a valid object ok 3344 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3345 - is a valid object ok 3346 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3347 - is a valid object ok 3348 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-inf"); $x ** $y; ok 3349 - is a valid object ok 3350 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-3"); $x ** $y; ok 3351 - is a valid object ok 3352 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-2"); $x ** $y; ok 3353 - is a valid object ok 3354 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("-1"); $x ** $y; ok 3355 - is a valid object ok 3356 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $x ** $y; ok 3357 - is a valid object ok 3358 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x ** $y; ok 3359 - is a valid object ok 3360 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3361 - is a valid object ok 3362 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3363 - is a valid object ok 3364 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x ** $y; ok 3365 - is a valid object ok 3366 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $x ** $y; ok 3367 - is a valid object ok 3368 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("1234500012"); $x ** $y; ok 3369 - is a valid object ok 3370 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1234500012"); $x ** $y; ok 3371 - is a valid object ok 3372 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1234500013"); $x ** $y; ok 3373 - is a valid object ok 3374 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("-12345000123"); $x ** $y; ok 3375 - is a valid object ok 3376 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-12345000123"); $x ** $y; ok 3377 - is a valid object ok 3378 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3379 - is a valid object ok 3380 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3381 - is a valid object ok 3382 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 3383 - is a valid object ok 3384 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 3385 - is a valid object ok 3386 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("6"); $x ** $y; ok 3387 - is a valid object ok 3388 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("7"); $x ** $y; ok 3389 - is a valid object ok 3390 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("8"); $x ** $y; ok 3391 - is a valid object ok 3392 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("9"); $x ** $y; ok 3393 - is a valid object ok 3394 - $x = Math::BigInt::Subclass->new("10"); $y = Math::BigInt::Subclass->new("20"); $x ** $y; ok 3395 - is a valid object ok 3396 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("2"); $x ** $y; ok 3397 - is a valid object ok 3398 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 3399 - is a valid object ok 3400 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 3401 - is a valid object ok 3402 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("3"); $x ** $y; ok 3403 - is a valid object ok 3404 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("4"); $x ** $y; ok 3405 - is a valid object ok 3406 - $x = Math::BigInt::Subclass->new("-3"); $y = Math::BigInt::Subclass->new("5"); $x ** $y; ok 3407 - is a valid object ok 3408 - $x = Math::BigInt::Subclass->new("100"); $x->length(); ok 3409 - $x = Math::BigInt::Subclass->new("10"); $x->length(); ok 3410 - $x = Math::BigInt::Subclass->new("1"); $x->length(); ok 3411 - $x = Math::BigInt::Subclass->new("0"); $x->length(); ok 3412 - $x = Math::BigInt::Subclass->new("12345"); $x->length(); ok 3413 - $x = Math::BigInt::Subclass->new("10000000000000000"); $x->length(); ok 3414 - $x = Math::BigInt::Subclass->new("-123"); $x->length(); ok 3415 - $x = Math::BigInt::Subclass->new("215960156869840440586892398248"); $x->length(); ok 3416 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3417 - is a valid object ok 3418 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3419 - is a valid object ok 3420 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3421 - is a valid object ok 3422 - $x = Math::BigInt::Subclass->new("-123"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3423 - is a valid object ok 3424 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3425 - is a valid object ok 3426 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3427 - is a valid object ok 3428 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3429 - is a valid object ok 3430 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3431 - is a valid object ok 3432 - $x = Math::BigInt::Subclass->new("4"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3433 - is a valid object ok 3434 - $x = Math::BigInt::Subclass->new("9"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3435 - is a valid object ok 3436 - $x = Math::BigInt::Subclass->new("16"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3437 - is a valid object ok 3438 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3439 - is a valid object ok 3440 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3441 - is a valid object ok 3442 - $x = Math::BigInt::Subclass->new("15241"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3443 - is a valid object ok 3444 - $x = Math::BigInt::Subclass->new("144"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3445 - is a valid object ok 3446 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3447 - is a valid object ok 3448 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 3449 - is a valid object ok 3450 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 3451 - is a valid object ok 3452 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 3453 - is a valid object ok 3454 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 3455 - is a valid object ok 3456 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("NaN"); $x->broot($y); ok 3457 - is a valid object ok 3458 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3459 - is a valid object ok 3460 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("2"); $x->broot($y); ok 3461 - is a valid object ok 3462 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 3463 - is a valid object ok 3464 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 3465 - is a valid object ok 3466 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("-inf"); $x->broot($y); ok 3467 - is a valid object ok 3468 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("inf"); $x->broot($y); ok 3469 - is a valid object ok 3470 - $x = Math::BigInt::Subclass->new("+0"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3471 - is a valid object ok 3472 - $x = Math::BigInt::Subclass->new("+1"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3473 - is a valid object ok 3474 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3475 - is a valid object ok 3476 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3477 - is a valid object ok 3478 - $x = Math::BigInt::Subclass->new("-123.45"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3479 - is a valid object ok 3480 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("0"); $x->broot($y); ok 3481 - is a valid object ok 3482 - $x = Math::BigInt::Subclass->new("12"); $y = Math::BigInt::Subclass->new("1"); $x->broot($y); ok 3483 - is a valid object ok 3484 - $x = Math::BigInt::Subclass->new("-12"); $y = Math::BigInt::Subclass->new("1"); $x->broot($y); ok 3485 - is a valid object ok 3486 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("-1"); $x->broot($y); ok 3487 - is a valid object ok 3488 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("-1"); $x->broot($y); ok 3489 - is a valid object ok 3490 - $x = Math::BigInt::Subclass->new("8"); $y = Math::BigInt::Subclass->new("3"); $x->broot($y); ok 3491 - is a valid object ok 3492 - $x = Math::BigInt::Subclass->new("-8"); $y = Math::BigInt::Subclass->new("3"); $x->broot($y); ok 3493 - is a valid object ok 3494 - $x = Math::BigInt::Subclass->new("16"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 3495 - is a valid object ok 3496 - $x = Math::BigInt::Subclass->new("81"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 3497 - is a valid object ok 3498 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("4"); $x->broot($y); ok 3499 - is a valid object ok 3500 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("8"); $x->broot($y); ok 3501 - is a valid object ok 3502 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("16"); $x->broot($y); ok 3503 - is a valid object ok 3504 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("32"); $x->broot($y); ok 3505 - is a valid object ok 3506 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("64"); $x->broot($y); ok 3507 - is a valid object ok 3508 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $y = Math::BigInt::Subclass->new("128"); $x->broot($y); ok 3509 - is a valid object ok 3510 - $x = Math::BigInt::Subclass->new("84274086103068221283760416414557757"); $y = Math::BigInt::Subclass->new("15"); $x->broot($y); ok 3511 - is a valid object ok 3512 - $x = Math::BigInt::Subclass->new("145"); $x->bsqrt(); ok 3513 - is a valid object ok 3514 - $x = Math::BigInt::Subclass->new("144"); $x->bsqrt(); ok 3515 - is a valid object ok 3516 - $x = Math::BigInt::Subclass->new("143"); $x->bsqrt(); ok 3517 - is a valid object ok 3518 - $x = Math::BigInt::Subclass->new("16"); $x->bsqrt(); ok 3519 - is a valid object ok 3520 - $x = Math::BigInt::Subclass->new("170"); $x->bsqrt(); ok 3521 - is a valid object ok 3522 - $x = Math::BigInt::Subclass->new("169"); $x->bsqrt(); ok 3523 - is a valid object ok 3524 - $x = Math::BigInt::Subclass->new("168"); $x->bsqrt(); ok 3525 - is a valid object ok 3526 - $x = Math::BigInt::Subclass->new("4"); $x->bsqrt(); ok 3527 - is a valid object ok 3528 - $x = Math::BigInt::Subclass->new("3"); $x->bsqrt(); ok 3529 - is a valid object ok 3530 - $x = Math::BigInt::Subclass->new("2"); $x->bsqrt(); ok 3531 - is a valid object ok 3532 - $x = Math::BigInt::Subclass->new("9"); $x->bsqrt(); ok 3533 - is a valid object ok 3534 - $x = Math::BigInt::Subclass->new("12"); $x->bsqrt(); ok 3535 - is a valid object ok 3536 - $x = Math::BigInt::Subclass->new("256"); $x->bsqrt(); ok 3537 - is a valid object ok 3538 - $x = Math::BigInt::Subclass->new("100000000"); $x->bsqrt(); ok 3539 - is a valid object ok 3540 - $x = Math::BigInt::Subclass->new("4000000000000"); $x->bsqrt(); ok 3541 - is a valid object ok 3542 - $x = Math::BigInt::Subclass->new("152399026"); $x->bsqrt(); ok 3543 - is a valid object ok 3544 - $x = Math::BigInt::Subclass->new("152399025"); $x->bsqrt(); ok 3545 - is a valid object ok 3546 - $x = Math::BigInt::Subclass->new("152399024"); $x->bsqrt(); ok 3547 - is a valid object ok 3548 - $x = Math::BigInt::Subclass->new("18446744073709551616"); $x->bsqrt(); ok 3549 - is a valid object ok 3550 - $x = Math::BigInt::Subclass->new("84274086103068221283760416414557757"); $x->bsqrt(); ok 3551 - is a valid object ok 3552 - $x = Math::BigInt::Subclass->new("1"); $x->bsqrt(); ok 3553 - is a valid object ok 3554 - $x = Math::BigInt::Subclass->new("0"); $x->bsqrt(); ok 3555 - is a valid object ok 3556 - $x = Math::BigInt::Subclass->new("-2"); $x->bsqrt(); ok 3557 - is a valid object ok 3558 - $x = Math::BigInt::Subclass->new("-123"); $x->bsqrt(); ok 3559 - is a valid object ok 3560 - $x = Math::BigInt::Subclass->new("Nan"); $x->bsqrt(); ok 3561 - is a valid object ok 3562 - $x = Math::BigInt::Subclass->new("+inf"); $x->bsqrt(); ok 3563 - is a valid object ok 3564 - $x = Math::BigInt::Subclass->new("-inf"); $x->bsqrt(); ok 3565 - is a valid object ok 3566 - $x = Math::BigInt::Subclass->new("NaN"); $x->bexp(); ok 3567 - is a valid object ok 3568 - $x = Math::BigInt::Subclass->new("inf"); $x->bexp(); ok 3569 - is a valid object ok 3570 - $x = Math::BigInt::Subclass->new("1"); $x->bexp(); ok 3571 - is a valid object ok 3572 - $x = Math::BigInt::Subclass->new("2"); $x->bexp(); ok 3573 - is a valid object ok 3574 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3575 - is a valid object ok 3576 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $x->batan2($y); ok 3577 - is a valid object ok 3578 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->batan2($y); ok 3579 - is a valid object ok 3580 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3581 - is a valid object ok 3582 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3583 - is a valid object ok 3584 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3585 - is a valid object ok 3586 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3587 - is a valid object ok 3588 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3589 - is a valid object ok 3590 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("inf"); $x->batan2($y); ok 3591 - is a valid object ok 3592 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3593 - is a valid object ok 3594 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("-inf"); $x->batan2($y); ok 3595 - is a valid object ok 3596 - $x = Math::BigInt::Subclass->new("inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->batan2($y); ok 3597 - is a valid object ok 3598 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("+inf"); $x->batan2($y); ok 3599 - is a valid object ok 3600 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3601 - is a valid object ok 3602 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3603 - is a valid object ok 3604 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3605 - is a valid object ok 3606 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3607 - is a valid object ok 3608 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("2"); $x->batan2($y); ok 3609 - is a valid object ok 3610 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3611 - is a valid object ok 3612 - $x = Math::BigInt::Subclass->new("5"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3613 - is a valid object ok 3614 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3615 - is a valid object ok 3616 - $x = Math::BigInt::Subclass->new("-2"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3617 - is a valid object ok 3618 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->batan2($y); ok 3619 - is a valid object ok 3620 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3621 - is a valid object ok 3622 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("5"); $x->batan2($y); ok 3623 - is a valid object ok 3624 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("8"); $x->batan2($y); ok 3625 - is a valid object ok 3626 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("8"); $x->batan2($y); ok 3627 - is a valid object ok 3628 - $x = Math::BigInt::Subclass->new("-1"); $y = Math::BigInt::Subclass->new("1"); $x->batan2($y); ok 3629 - is a valid object ok 3630 - $x = Math::BigInt::Subclass->new("77"); Math::BigInt::Subclass->bpi($x); ok 3631 - is a valid object ok 3632 - $x = Math::BigInt::Subclass->new("+0"); Math::BigInt::Subclass->bpi($x); ok 3633 - is a valid object ok 3634 - $x = Math::BigInt::Subclass->new("11"); Math::BigInt::Subclass->bpi($x); ok 3635 - is a valid object ok 3636 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("10"); $x->bnok($y); ok 3637 - is a valid object ok 3638 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("NaN"); $x->bnok($y); ok 3639 - is a valid object ok 3640 - $x = Math::BigInt::Subclass->new("NaN"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3641 - is a valid object ok 3642 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("NaN"); $x->bnok($y); ok 3643 - is a valid object ok 3644 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3645 - is a valid object ok 3646 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("2"); $x->bnok($y); ok 3647 - is a valid object ok 3648 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bnok($y); ok 3649 - is a valid object ok 3650 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("-2"); $x->bnok($y); ok 3651 - is a valid object ok 3652 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("3"); $x->bnok($y); ok 3653 - is a valid object ok 3654 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("6"); $x->bnok($y); ok 3655 - is a valid object ok 3656 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("90"); $x->bnok($y); ok 3657 - is a valid object ok 3658 - $x = Math::BigInt::Subclass->new("100"); $y = Math::BigInt::Subclass->new("95"); $x->bnok($y); ok 3659 - is a valid object ok 3660 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->bnok($y); ok 3661 - is a valid object ok 3662 - $x = Math::BigInt::Subclass->new("7"); $y = Math::BigInt::Subclass->new("0"); $x->bnok($y); ok 3663 - is a valid object ok 3664 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("1"); $x->bnok($y); ok 3665 - is a valid object ok 3666 - $x = Math::BigInt::Subclass->new("0"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3667 - is a valid object ok 3668 - $x = Math::BigInt::Subclass->new("invalid"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3669 - is a valid object ok 3670 - $x = Math::BigInt::Subclass->new("+inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3671 - is a valid object ok 3672 - $x = Math::BigInt::Subclass->new("-inf"); $y = Math::BigInt::Subclass->new("12"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3673 - is a valid object ok 3674 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3675 - is a valid object ok 3676 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("2"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3677 - is a valid object ok 3678 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3679 - is a valid object ok 3680 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3681 - is a valid object ok 3682 - $x = Math::BigInt::Subclass->new("123456"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3683 - is a valid object ok 3684 - $x = Math::BigInt::Subclass->new("+10123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3685 - is a valid object ok 3686 - $x = Math::BigInt::Subclass->new("-10123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3687 - is a valid object ok 3688 - $x = Math::BigInt::Subclass->new("+10123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3689 - is a valid object ok 3690 - $x = Math::BigInt::Subclass->new("-10123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3691 - is a valid object ok 3692 - $x = Math::BigInt::Subclass->new("+101234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3693 - is a valid object ok 3694 - $x = Math::BigInt::Subclass->new("-101234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("trunc"); $x->bround($y); ok 3695 - is a valid object ok 3696 - $x = Math::BigInt::Subclass->new("+20123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3697 - is a valid object ok 3698 - $x = Math::BigInt::Subclass->new("-20123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3699 - is a valid object ok 3700 - $x = Math::BigInt::Subclass->new("+20123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3701 - is a valid object ok 3702 - $x = Math::BigInt::Subclass->new("-20123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3703 - is a valid object ok 3704 - $x = Math::BigInt::Subclass->new("+201234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3705 - is a valid object ok 3706 - $x = Math::BigInt::Subclass->new("-201234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3707 - is a valid object ok 3708 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3709 - is a valid object ok 3710 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("zero"); $x->bround($y); ok 3711 - is a valid object ok 3712 - $x = Math::BigInt::Subclass->new("+30123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3713 - is a valid object ok 3714 - $x = Math::BigInt::Subclass->new("-30123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3715 - is a valid object ok 3716 - $x = Math::BigInt::Subclass->new("+30123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3717 - is a valid object ok 3718 - $x = Math::BigInt::Subclass->new("-30123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3719 - is a valid object ok 3720 - $x = Math::BigInt::Subclass->new("+301234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3721 - is a valid object ok 3722 - $x = Math::BigInt::Subclass->new("-301234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3723 - is a valid object ok 3724 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3725 - is a valid object ok 3726 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("+inf"); $x->bround($y); ok 3727 - is a valid object ok 3728 - $x = Math::BigInt::Subclass->new("+40123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3729 - is a valid object ok 3730 - $x = Math::BigInt::Subclass->new("-40123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3731 - is a valid object ok 3732 - $x = Math::BigInt::Subclass->new("+40123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3733 - is a valid object ok 3734 - $x = Math::BigInt::Subclass->new("-40123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3735 - is a valid object ok 3736 - $x = Math::BigInt::Subclass->new("+401234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3737 - is a valid object ok 3738 - $x = Math::BigInt::Subclass->new("+401234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3739 - is a valid object ok 3740 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3741 - is a valid object ok 3742 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("-inf"); $x->bround($y); ok 3743 - is a valid object ok 3744 - $x = Math::BigInt::Subclass->new("+50123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3745 - is a valid object ok 3746 - $x = Math::BigInt::Subclass->new("-50123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3747 - is a valid object ok 3748 - $x = Math::BigInt::Subclass->new("+50123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3749 - is a valid object ok 3750 - $x = Math::BigInt::Subclass->new("-50123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3751 - is a valid object ok 3752 - $x = Math::BigInt::Subclass->new("+501234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3753 - is a valid object ok 3754 - $x = Math::BigInt::Subclass->new("-501234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3755 - is a valid object ok 3756 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3757 - is a valid object ok 3758 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("odd"); $x->bround($y); ok 3759 - is a valid object ok 3760 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3761 - is a valid object ok 3762 - $x = Math::BigInt::Subclass->new("+60123199999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3763 - is a valid object ok 3764 - $x = Math::BigInt::Subclass->new("+60123299999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3765 - is a valid object ok 3766 - $x = Math::BigInt::Subclass->new("+60123399999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3767 - is a valid object ok 3768 - $x = Math::BigInt::Subclass->new("+60123499999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3769 - is a valid object ok 3770 - $x = Math::BigInt::Subclass->new("+60123500000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3771 - is a valid object ok 3772 - $x = Math::BigInt::Subclass->new("+60123600000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3773 - is a valid object ok 3774 - $x = Math::BigInt::Subclass->new("+60123700000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3775 - is a valid object ok 3776 - $x = Math::BigInt::Subclass->new("+60123800000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3777 - is a valid object ok 3778 - $x = Math::BigInt::Subclass->new("+60123900000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3779 - is a valid object ok 3780 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3781 - is a valid object ok 3782 - $x = Math::BigInt::Subclass->new("-60123199999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3783 - is a valid object ok 3784 - $x = Math::BigInt::Subclass->new("-60123299999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3785 - is a valid object ok 3786 - $x = Math::BigInt::Subclass->new("-60123399999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3787 - is a valid object ok 3788 - $x = Math::BigInt::Subclass->new("-60123499999"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3789 - is a valid object ok 3790 - $x = Math::BigInt::Subclass->new("-60123500000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3791 - is a valid object ok 3792 - $x = Math::BigInt::Subclass->new("-60123600000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3793 - is a valid object ok 3794 - $x = Math::BigInt::Subclass->new("-60123700000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3795 - is a valid object ok 3796 - $x = Math::BigInt::Subclass->new("-60123800000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3797 - is a valid object ok 3798 - $x = Math::BigInt::Subclass->new("-60123900000"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("common"); $x->bround($y); ok 3799 - is a valid object ok 3800 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3801 - is a valid object ok 3802 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("5"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3803 - is a valid object ok 3804 - $x = Math::BigInt::Subclass->new("+60123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3805 - is a valid object ok 3806 - $x = Math::BigInt::Subclass->new("-60123456789"); $y = Math::BigInt::Subclass->new("9"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3807 - is a valid object ok 3808 - $x = Math::BigInt::Subclass->new("+601234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3809 - is a valid object ok 3810 - $x = Math::BigInt::Subclass->new("-601234500"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3811 - is a valid object ok 3812 - $x = Math::BigInt::Subclass->new("+1234567"); $y = Math::BigInt::Subclass->new("7"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3813 - is a valid object ok 3814 - $x = Math::BigInt::Subclass->new("+1234567"); $y = Math::BigInt::Subclass->new("6"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3815 - is a valid object ok 3816 - $x = Math::BigInt::Subclass->new("+12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3817 - is a valid object ok 3818 - $x = Math::BigInt::Subclass->new("-12345000"); $y = Math::BigInt::Subclass->new("4"); Math::BigInt::Subclass->round_mode("even"); $x->bround($y); ok 3819 - is a valid object ok 3820 - $x = Math::BigInt::Subclass->new("0"); $x->is_zero() || 0; ok 3821 - $x = Math::BigInt::Subclass->new("invalid"); $x->is_zero() || 0; ok 3822 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_zero() || 0; ok 3823 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_zero() || 0; ok 3824 - $x = Math::BigInt::Subclass->new("123"); $x->is_zero() || 0; ok 3825 - $x = Math::BigInt::Subclass->new("-1"); $x->is_zero() || 0; ok 3826 - $x = Math::BigInt::Subclass->new("1"); $x->is_zero() || 0; ok 3827 - $x = Math::BigInt::Subclass->new("0"); $x->is_one() || 0; ok 3828 - $x = Math::BigInt::Subclass->new("invalid"); $x->is_one() || 0; ok 3829 - $x = Math::BigInt::Subclass->new("+inf"); $x->is_one() || 0; ok 3830 - $x = Math::BigInt::Subclass->new("-inf"); $x->is_one() || 0; ok 3831 - $x = Math::BigInt::Subclass->new("1"); $x->is_one() || 0; ok 3832 - $x = Math::BigInt::Subclass->new("2"); $x->is_one() || 0; ok 3833 - $x = Math::BigInt::Subclass->new("-1"); $x->is_one() || 0; ok 3834 - $x = Math::BigInt::Subclass->new("-2"); $x->is_one() || 0; ok 3835 - $x = Math::BigInt::Subclass->new("0"); $x->bfloor(); ok 3836 - is a valid object ok 3837 - $x = Math::BigInt::Subclass->new("invalid"); $x->bfloor(); ok 3838 - is a valid object ok 3839 - $x = Math::BigInt::Subclass->new("+inf"); $x->bfloor(); ok 3840 - is a valid object ok 3841 - $x = Math::BigInt::Subclass->new("-inf"); $x->bfloor(); ok 3842 - is a valid object ok 3843 - $x = Math::BigInt::Subclass->new("-1"); $x->bfloor(); ok 3844 - is a valid object ok 3845 - $x = Math::BigInt::Subclass->new("-2"); $x->bfloor(); ok 3846 - is a valid object ok 3847 - $x = Math::BigInt::Subclass->new("2"); $x->bfloor(); ok 3848 - is a valid object ok 3849 - $x = Math::BigInt::Subclass->new("3"); $x->bfloor(); ok 3850 - is a valid object ok 3851 - $x = Math::BigInt::Subclass->new("abc"); $x->bfloor(); ok 3852 - is a valid object ok 3853 - $x = Math::BigInt::Subclass->new("invalid"); $x->bceil(); ok 3854 - is a valid object ok 3855 - $x = Math::BigInt::Subclass->new("+inf"); $x->bceil(); ok 3856 - is a valid object ok 3857 - $x = Math::BigInt::Subclass->new("-inf"); $x->bceil(); ok 3858 - is a valid object ok 3859 - $x = Math::BigInt::Subclass->new("0"); $x->bceil(); ok 3860 - is a valid object ok 3861 - $x = Math::BigInt::Subclass->new("-1"); $x->bceil(); ok 3862 - is a valid object ok 3863 - $x = Math::BigInt::Subclass->new("-2"); $x->bceil(); ok 3864 - is a valid object ok 3865 - $x = Math::BigInt::Subclass->new("2"); $x->bceil(); ok 3866 - is a valid object ok 3867 - $x = Math::BigInt::Subclass->new("3"); $x->bceil(); ok 3868 - is a valid object ok 3869 - $x = Math::BigInt::Subclass->new("abc"); $x->bceil(); ok 3870 - is a valid object ok 3871 - $x = Math::BigInt::Subclass->new("NaN"); $x->bint(); ok 3872 - is a valid object ok 3873 - $x = Math::BigInt::Subclass->new("+inf"); $x->bint(); ok 3874 - is a valid object ok 3875 - $x = Math::BigInt::Subclass->new("-inf"); $x->bint(); ok 3876 - is a valid object ok 3877 - $x = Math::BigInt::Subclass->new("0"); $x->bint(); ok 3878 - is a valid object ok 3879 - $x = Math::BigInt::Subclass->new("-1"); $x->bint(); ok 3880 - is a valid object ok 3881 - $x = Math::BigInt::Subclass->new("-2"); $x->bint(); ok 3882 - is a valid object ok 3883 - $x = Math::BigInt::Subclass->new("2"); $x->bint(); ok 3884 - is a valid object ok 3885 - $x = Math::BigInt::Subclass->new("3"); $x->bint(); ok 3886 - is a valid object ok 3887 - $x = Math::BigInt::Subclass->new("128"); $x->as_hex(); ok 3888 - $x = Math::BigInt::Subclass->new("-128"); $x->as_hex(); ok 3889 - $x = Math::BigInt::Subclass->new("0"); $x->as_hex(); ok 3890 - $x = Math::BigInt::Subclass->new("-0"); $x->as_hex(); ok 3891 - $x = Math::BigInt::Subclass->new("1"); $x->as_hex(); ok 3892 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_hex(); ok 3893 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_hex(); ok 3894 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_hex(); ok 3895 - $x = Math::BigInt::Subclass->new("invalid"); $x->as_hex(); ok 3896 - $x = Math::BigInt::Subclass->new("128"); $x->as_bin(); ok 3897 - $x = Math::BigInt::Subclass->new("-128"); $x->as_bin(); ok 3898 - $x = Math::BigInt::Subclass->new("0"); $x->as_bin(); ok 3899 - $x = Math::BigInt::Subclass->new("-0"); $x->as_bin(); ok 3900 - $x = Math::BigInt::Subclass->new("1"); $x->as_bin(); ok 3901 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 3902 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_bin(); ok 3903 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_bin(); ok 3904 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_bin(); ok 3905 - $x = Math::BigInt::Subclass->new("invalid"); $x->as_bin(); ok 3906 - $x = Math::BigInt::Subclass->new("128"); $x->as_oct(); ok 3907 - $x = Math::BigInt::Subclass->new("-128"); $x->as_oct(); ok 3908 - $x = Math::BigInt::Subclass->new("0"); $x->as_oct(); ok 3909 - $x = Math::BigInt::Subclass->new("-0"); $x->as_oct(); ok 3910 - $x = Math::BigInt::Subclass->new("1"); $x->as_oct(); ok 3911 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 3912 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->as_oct(); ok 3913 - $x = Math::BigInt::Subclass->new("+inf"); $x->as_oct(); ok 3914 - $x = Math::BigInt::Subclass->new("-inf"); $x->as_oct(); ok 3915 - $x = Math::BigInt::Subclass->new("invalid"); $x->as_oct(); ok 3916 - $x = Math::BigInt::Subclass->new("128"); $x->to_hex(); ok 3917 - $x = Math::BigInt::Subclass->new("-128"); $x->to_hex(); ok 3918 - $x = Math::BigInt::Subclass->new("0"); $x->to_hex(); ok 3919 - $x = Math::BigInt::Subclass->new("-0"); $x->to_hex(); ok 3920 - $x = Math::BigInt::Subclass->new("1"); $x->to_hex(); ok 3921 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->to_hex(); ok 3922 - $x = Math::BigInt::Subclass->new("+inf"); $x->to_hex(); ok 3923 - $x = Math::BigInt::Subclass->new("-inf"); $x->to_hex(); ok 3924 - $x = Math::BigInt::Subclass->new("invalid"); $x->to_hex(); ok 3925 - $x = Math::BigInt::Subclass->new("128"); $x->to_bin(); ok 3926 - $x = Math::BigInt::Subclass->new("-128"); $x->to_bin(); ok 3927 - $x = Math::BigInt::Subclass->new("0"); $x->to_bin(); ok 3928 - $x = Math::BigInt::Subclass->new("-0"); $x->to_bin(); ok 3929 - $x = Math::BigInt::Subclass->new("1"); $x->to_bin(); ok 3930 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 3931 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->to_bin(); ok 3932 - $x = Math::BigInt::Subclass->new("+inf"); $x->to_bin(); ok 3933 - $x = Math::BigInt::Subclass->new("-inf"); $x->to_bin(); ok 3934 - $x = Math::BigInt::Subclass->new("invalid"); $x->to_bin(); ok 3935 - $x = Math::BigInt::Subclass->new("128"); $x->to_oct(); ok 3936 - $x = Math::BigInt::Subclass->new("-128"); $x->to_oct(); ok 3937 - $x = Math::BigInt::Subclass->new("0"); $x->to_oct(); ok 3938 - $x = Math::BigInt::Subclass->new("-0"); $x->to_oct(); ok 3939 - $x = Math::BigInt::Subclass->new("1"); $x->to_oct(); ok 3940 - $x = Math::BigInt::Subclass->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 3941 - $x = Math::BigInt::Subclass->new("0x123456789123456789"); $x->to_oct(); ok 3942 - $x = Math::BigInt::Subclass->new("+inf"); $x->to_oct(); ok 3943 - $x = Math::BigInt::Subclass->new("-inf"); $x->to_oct(); ok 3944 - $x = Math::BigInt::Subclass->new("invalid"); $x->to_oct(); ok 3945 - $x = Math::BigInt::Subclass->new("-1"); $x = log($x); ok 3946 - is a valid object ok 3947 - $x = Math::BigInt::Subclass->new("0"); $x = log($x); ok 3948 - is a valid object ok 3949 - $x = Math::BigInt::Subclass->new("1"); $x = log($x); ok 3950 - is a valid object ok 3951 - $x = Math::BigInt::Subclass->new("2"); $x = log($x); ok 3952 - is a valid object ok 3953 - $x = Math::BigInt::Subclass->new("3"); $x = log($x); ok 3954 - is a valid object ok 3955 - $x = Math::BigInt::Subclass->new("123456789"); $x = log($x); ok 3956 - is a valid object ok 3957 - $x = Math::BigInt::Subclass->new("1234567890987654321"); $x = log($x); ok 3958 - is a valid object ok 3959 - $x = Math::BigInt::Subclass->new("-inf"); $x = log($x); ok 3960 - is a valid object ok 3961 - $x = Math::BigInt::Subclass->new("inf"); $x = log($x); ok 3962 - is a valid object ok 3963 - $x = Math::BigInt::Subclass->new("NaN"); $x = log($x); ok 3964 - is a valid object ok 3965 - $x = Math::BigInt::Subclass->new("4294967296"); $a = $x->bmul($x); ok 3966 - $x = Math::BigInt::Subclass->new(10); $a = $x->bpow($x); ok 3967 - $z = $x & $y; $x ok 3968 - $z = $x & $y; $y ok 3969 - $z = $x & $y; $z ok 3970 - $z = $x | $y; $x ok 3971 - $z = $x | $y; $y ok 3972 - $z = $x | $y; $z ok 3973 - $z = $x | $y; $x ok 3974 - $z = $x | $y; $y ok 3975 - $z = $x | $y; $z ok 3976 - $z = $x ^ $y; $x ok 3977 - $z = $x ^ $y; $y ok 3978 - $z = $x ^ $y; $z ok 3979 - $y = -$x; $x ok 3980 - $y = abs($x); $x ok 3981 - $x->copy()->bmodpow($y, $z); $u ok 3982 - $x->copy()->bmodpow($y, $z); $y ok 3983 - $x->copy()->bmodpow($y, $z); $z ok 3984 - $y = -$x; $x ok 3985 - $y = -$x; $y ok 3986 - $y = $x->copy()->bneg(); $x ok 3987 - $y = $x->copy()->bneg(); $y ok 3988 - $x->bmul($y); $x ok 3989 - $x->bmul($y); $y ok 3990 - $x->badd($y); $x ok 3991 - $x->badd($y); $y ok 3992 - $x->bsub($y); $x ok 3993 - $x->bsub($y); $y ok 3994 - $x->bdiv($y); $x ok 3995 - $x->bdiv($y); $y ok 3996 - $x->bmod($y); $x ok 3997 - $x->bmod($y); $y ok 3998 - $x->bmul($y); $x ok 3999 - $x->bmul($y); $y ok 4000 - $x->badd($y); $x ok 4001 - $x->badd($y); $y ok 4002 - $x->bsub($y); $x ok 4003 - $x->bsub($y); $y ok 4004 - $x->bdiv($y); $x ok 4005 - $x->bdiv($y); $y ok 4006 - $x->bmod($y); $x ok 4007 - $x->bmod($y); $y ok 4008 - $x->bmul($y); $x ok 4009 - $x->bmul($y); $y ok 4010 - $x->badd($y); $x ok 4011 - $x->badd($y); $y ok 4012 - $x->bsub($y); $x ok 4013 - $x->bsub($y); $y ok 4014 - $x->bdiv($y); $x ok 4015 - $x->bdiv($y); $y ok 4016 - $x->bmod($y); $x ok 4017 - $x->bmod($y); $y ok 4018 - overloading cmp works ok 4019 - $x = Math::BigInt::Subclass->new(10); $x = 2 ** $x; $x == 1024; ok 4020 - $x = Math::BigInt::Subclass->new(10); $x = 2 * $x; $x == 20; ok 4021 - $x = Math::BigInt::Subclass->new(10); $x = 2 + $x; $x == 12; ok 4022 - $x = Math::BigInt::Subclass->new(10); $x = 2 - $x; $x == -8; ok 4023 - $x = Math::BigInt::Subclass->new(10); $x = 20 / $x; $x == 2; ok 4024 - $x = Math::BigInt::Subclass->new(3); $x = 20 % $x; $x == 2; ok 4025 - $x = Math::BigInt::Subclass->new(7); $x = 20 & $x; $x == 4; ok 4026 - $x = Math::BigInt::Subclass->new(7); $x = 0x20 | $x; $x == 0x27; ok 4027 - $x = Math::BigInt::Subclass->new(7); $x = 0x20 ^ $x; $x == 0x27; ok 4028 - $x = Math::BigInt::Subclass->badd(4, 5); $x == 9; ok 4029 - $x = Math::BigInt::Subclass->new(1); $x is true ok 4030 - $x = Math::BigInt::Subclass->new(0); !$x is false ok 4031 - objectify(2, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 4032 - first arg matches /^Math::BigInt/ ok 4033 - second arg is 4 ok 4034 - third arg is 5 ok 4035 - objectify(0, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 4036 - first arg matches /^Math::BigInt/ ok 4037 - second arg is 4 ok 4038 - third arg is 5 ok 4039 - objectify(2, 4, 5) gives Math::BigInt::Subclass, 4, 5 ok 4040 - first arg matches /^Math::BigInt/ ok 4041 - second arg is 4 ok 4042 - third arg is 5 ok 4043 - objectify(2, 4, 5, 6, 7) gives Math::BigInt::Subclass, 4, 5, 6, 7 ok 4044 - first arg matches /^Math::BigInt/ ok 4045 - second arg is 4 ok 4046 - second arg is a Math::BigInt object ok 4047 - third arg is 5 ok 4048 - third arg is a Math::BigInt object ok 4049 - fourth arg is 6 ok 4050 - fourth arg is a scalar ok 4051 - fifth arg is 7 ok 4052 - fifth arg is a scalar ok 4053 - objectify(2, Math::BigInt::Subclass, 4, 5, 6, 7) gives Math::BigInt::Subclass, 4, 5, 6, 7 ok 4054 - first arg is Math::BigInt::Subclass ok 4055 - second arg is 4 ok 4056 - second arg is a Math::BigInt::Subclass object ok 4057 - third arg is 5 ok 4058 - third arg is a Math::BigInt::Subclass object ok 4059 - fourth arg is 6 ok 4060 - fourth arg is a scalar ok 4061 - fifth arg is 7 ok 4062 - fifth arg is a scalar ok 4063 - Math::BigInt::Subclass->new(123)->badd(123) = 246 ok 4064 - Math::BigInt::Subclass->badd(123, 321) = 444 ok 4065 - Math::BigInt::Subclass->badd(123, Math::BigInt::Subclass->new(321)) = 444 ok 4066 - Math::BigInt::Subclass->new(123)->bsub(122) = 1 ok 4067 - Math::BigInt::Subclass->bsub(321, 123) = 198 ok 4068 - Math::BigInt::Subclass->bsub(321, Math::BigInt::Subclass->new(123)) = 198 ok 4069 - Math::BigInt::Subclass->new(123)->bmul(123) = 15129 ok 4070 - Math::BigInt::Subclass->bmul(123, 123) = 15129 ok 4071 - Math::BigInt::Subclass->bmul(123, Math::BigInt::Subclass->new(123)) = 15129 ok 4072 - Math::BigInt::Subclass->new(15129)->bdiv(123) = 123 ok 4073 - Math::BigInt::Subclass->bdiv(15129, 123) = 123 ok 4074 - Math::BigInt::Subclass->bdiv(15129, Math::BigInt::Subclass->new(123)) = 123 ok 4075 - Math::BigInt::Subclass->new(15131)->bmod(123) = 2 ok 4076 - Math::BigInt::Subclass->bmod(15131, 123) = 2 ok 4077 - Math::BigInt::Subclass->bmod(15131, Math::BigInt::Subclass->new(123)) = 2 ok 4078 - Math::BigInt::Subclass->new(2)->bpow(16) = 65536 ok 4079 - Math::BigInt::Subclass->bpow(2, 16) = 65536 ok 4080 - Math::BigInt::Subclass->bpow(2, Math::BigInt::Subclass->new(16)) = 65536 ok 4081 - Math::BigInt::Subclass->new(2**15)->brsft(1) = 2**14 ok 4082 - Math::BigInt::Subclass->brsft(2**15, 1) = 2**14 ok 4083 - Math::BigInt::Subclass->brsft(2**15, Math::BigInt::Subclass->new(1)) = 2**14 ok 4084 - Math::BigInt::Subclass->new(2**13)->blsft(1) = 2**14 ok 4085 - Math::BigInt::Subclass->blsft(2**13, 1) = 2**14 ok 4086 - Math::BigInt::Subclass->blsft(2**13, Math::BigInt::Subclass->new(1)) = 2**14 ok 4087 - $x = Math::BigInt::Subclass->new(1050000000000000); $x->bsstr() = "105e+13" ok 4088 - $x = Math::BigInt::Subclass->new(1e+129); $x->bsstr() = "1e+129" ok 4089 - Math::BigInt::Subclass->new("1") = 1 ok 4090 - Math::BigInt::Subclass->new(" 1") = 1 ok 4091 - Math::BigInt::Subclass->new("1 ") = 1 ok 4092 - Math::BigInt::Subclass->new(" 1 ") = 1 ok 4093 - Math::BigInt::Subclass->new("\n1") = 1 ok 4094 - Math::BigInt::Subclass->new("1\n") = 1 ok 4095 - Math::BigInt::Subclass->new("\n1\n") = 1 ok 4096 - Math::BigInt::Subclass->new(" \n1\n") = 1 ok 4097 - Math::BigInt::Subclass->new(" \n1 \n") = 1 ok 4098 - Math::BigInt::Subclass->new(" \n1\n ") = 1 ok 4099 - Math::BigInt::Subclass->new(" \n1\n1") = 'NaN' ok 4100 - Math::BigInt::Subclass->new("1 \n1\n1") = 'NaN' ok 4101 - Math::BigInt::Subclass->new("12") = 12 ok 4102 - Math::BigInt::Subclass->new(" 12") = 12 ok 4103 - Math::BigInt::Subclass->new("12 ") = 12 ok 4104 - Math::BigInt::Subclass->new(" 12 ") = 12 ok 4105 - Math::BigInt::Subclass->new("\n12") = 12 ok 4106 - Math::BigInt::Subclass->new("12\n") = 12 ok 4107 - Math::BigInt::Subclass->new("\n12\n") = 12 ok 4108 - Math::BigInt::Subclass->new(" \n12\n") = 12 ok 4109 - Math::BigInt::Subclass->new(" \n12 \n") = 12 ok 4110 - Math::BigInt::Subclass->new(" \n12\n ") = 12 ok 4111 - Math::BigInt::Subclass->new(" \n12\n1") = 'NaN' ok 4112 - Math::BigInt::Subclass->new("1 \n12\n1") = 'NaN' ok 4113 - Math::BigInt::Subclass->new("123") = 123 ok 4114 - Math::BigInt::Subclass->new(" 123") = 123 ok 4115 - Math::BigInt::Subclass->new("123 ") = 123 ok 4116 - Math::BigInt::Subclass->new(" 123 ") = 123 ok 4117 - Math::BigInt::Subclass->new("\n123") = 123 ok 4118 - Math::BigInt::Subclass->new("123\n") = 123 ok 4119 - Math::BigInt::Subclass->new("\n123\n") = 123 ok 4120 - Math::BigInt::Subclass->new(" \n123\n") = 123 ok 4121 - Math::BigInt::Subclass->new(" \n123 \n") = 123 ok 4122 - Math::BigInt::Subclass->new(" \n123\n ") = 123 ok 4123 - Math::BigInt::Subclass->new(" \n123\n1") = 'NaN' ok 4124 - Math::BigInt::Subclass->new("1 \n123\n1") = 'NaN' ok 4125 - Math::BigInt::Subclass->new("1234") = 1234 ok 4126 - Math::BigInt::Subclass->new(" 1234") = 1234 ok 4127 - Math::BigInt::Subclass->new("1234 ") = 1234 ok 4128 - Math::BigInt::Subclass->new(" 1234 ") = 1234 ok 4129 - Math::BigInt::Subclass->new("\n1234") = 1234 ok 4130 - Math::BigInt::Subclass->new("1234\n") = 1234 ok 4131 - Math::BigInt::Subclass->new("\n1234\n") = 1234 ok 4132 - Math::BigInt::Subclass->new(" \n1234\n") = 1234 ok 4133 - Math::BigInt::Subclass->new(" \n1234 \n") = 1234 ok 4134 - Math::BigInt::Subclass->new(" \n1234\n ") = 1234 ok 4135 - Math::BigInt::Subclass->new(" \n1234\n1") = 'NaN' ok 4136 - Math::BigInt::Subclass->new("1 \n1234\n1") = 'NaN' ok 4137 - Math::BigInt::Subclass->new("12345") = 12345 ok 4138 - Math::BigInt::Subclass->new(" 12345") = 12345 ok 4139 - Math::BigInt::Subclass->new("12345 ") = 12345 ok 4140 - Math::BigInt::Subclass->new(" 12345 ") = 12345 ok 4141 - Math::BigInt::Subclass->new("\n12345") = 12345 ok 4142 - Math::BigInt::Subclass->new("12345\n") = 12345 ok 4143 - Math::BigInt::Subclass->new("\n12345\n") = 12345 ok 4144 - Math::BigInt::Subclass->new(" \n12345\n") = 12345 ok 4145 - Math::BigInt::Subclass->new(" \n12345 \n") = 12345 ok 4146 - Math::BigInt::Subclass->new(" \n12345\n ") = 12345 ok 4147 - Math::BigInt::Subclass->new(" \n12345\n1") = 'NaN' ok 4148 - Math::BigInt::Subclass->new("1 \n12345\n1") = 'NaN' ok 4149 - Math::BigInt::Subclass->new("123456") = 123456 ok 4150 - Math::BigInt::Subclass->new(" 123456") = 123456 ok 4151 - Math::BigInt::Subclass->new("123456 ") = 123456 ok 4152 - Math::BigInt::Subclass->new(" 123456 ") = 123456 ok 4153 - Math::BigInt::Subclass->new("\n123456") = 123456 ok 4154 - Math::BigInt::Subclass->new("123456\n") = 123456 ok 4155 - Math::BigInt::Subclass->new("\n123456\n") = 123456 ok 4156 - Math::BigInt::Subclass->new(" \n123456\n") = 123456 ok 4157 - Math::BigInt::Subclass->new(" \n123456 \n") = 123456 ok 4158 - Math::BigInt::Subclass->new(" \n123456\n ") = 123456 ok 4159 - Math::BigInt::Subclass->new(" \n123456\n1") = 'NaN' ok 4160 - Math::BigInt::Subclass->new("1 \n123456\n1") = 'NaN' ok 4161 - Math::BigInt::Subclass->new("1234567") = 1234567 ok 4162 - Math::BigInt::Subclass->new(" 1234567") = 1234567 ok 4163 - Math::BigInt::Subclass->new("1234567 ") = 1234567 ok 4164 - Math::BigInt::Subclass->new(" 1234567 ") = 1234567 ok 4165 - Math::BigInt::Subclass->new("\n1234567") = 1234567 ok 4166 - Math::BigInt::Subclass->new("1234567\n") = 1234567 ok 4167 - Math::BigInt::Subclass->new("\n1234567\n") = 1234567 ok 4168 - Math::BigInt::Subclass->new(" \n1234567\n") = 1234567 ok 4169 - Math::BigInt::Subclass->new(" \n1234567 \n") = 1234567 ok 4170 - Math::BigInt::Subclass->new(" \n1234567\n ") = 1234567 ok 4171 - Math::BigInt::Subclass->new(" \n1234567\n1") = 'NaN' ok 4172 - Math::BigInt::Subclass->new("1 \n1234567\n1") = 'NaN' ok 4173 - Math::BigInt::Subclass->new("12345678") = 12345678 ok 4174 - Math::BigInt::Subclass->new(" 12345678") = 12345678 ok 4175 - Math::BigInt::Subclass->new("12345678 ") = 12345678 ok 4176 - Math::BigInt::Subclass->new(" 12345678 ") = 12345678 ok 4177 - Math::BigInt::Subclass->new("\n12345678") = 12345678 ok 4178 - Math::BigInt::Subclass->new("12345678\n") = 12345678 ok 4179 - Math::BigInt::Subclass->new("\n12345678\n") = 12345678 ok 4180 - Math::BigInt::Subclass->new(" \n12345678\n") = 12345678 ok 4181 - Math::BigInt::Subclass->new(" \n12345678 \n") = 12345678 ok 4182 - Math::BigInt::Subclass->new(" \n12345678\n ") = 12345678 ok 4183 - Math::BigInt::Subclass->new(" \n12345678\n1") = 'NaN' ok 4184 - Math::BigInt::Subclass->new("1 \n12345678\n1") = 'NaN' ok 4185 - Math::BigInt::Subclass->new("123456789") = 123456789 ok 4186 - Math::BigInt::Subclass->new(" 123456789") = 123456789 ok 4187 - Math::BigInt::Subclass->new("123456789 ") = 123456789 ok 4188 - Math::BigInt::Subclass->new(" 123456789 ") = 123456789 ok 4189 - Math::BigInt::Subclass->new("\n123456789") = 123456789 ok 4190 - Math::BigInt::Subclass->new("123456789\n") = 123456789 ok 4191 - Math::BigInt::Subclass->new("\n123456789\n") = 123456789 ok 4192 - Math::BigInt::Subclass->new(" \n123456789\n") = 123456789 ok 4193 - Math::BigInt::Subclass->new(" \n123456789 \n") = 123456789 ok 4194 - Math::BigInt::Subclass->new(" \n123456789\n ") = 123456789 ok 4195 - Math::BigInt::Subclass->new(" \n123456789\n1") = 'NaN' ok 4196 - Math::BigInt::Subclass->new("1 \n123456789\n1") = 'NaN' ok 4197 - Math::BigInt::Subclass->new("1234567890") = 1234567890 ok 4198 - Math::BigInt::Subclass->new(" 1234567890") = 1234567890 ok 4199 - Math::BigInt::Subclass->new("1234567890 ") = 1234567890 ok 4200 - Math::BigInt::Subclass->new(" 1234567890 ") = 1234567890 ok 4201 - Math::BigInt::Subclass->new("\n1234567890") = 1234567890 ok 4202 - Math::BigInt::Subclass->new("1234567890\n") = 1234567890 ok 4203 - Math::BigInt::Subclass->new("\n1234567890\n") = 1234567890 ok 4204 - Math::BigInt::Subclass->new(" \n1234567890\n") = 1234567890 ok 4205 - Math::BigInt::Subclass->new(" \n1234567890 \n") = 1234567890 ok 4206 - Math::BigInt::Subclass->new(" \n1234567890\n ") = 1234567890 ok 4207 - Math::BigInt::Subclass->new(" \n1234567890\n1") = 'NaN' ok 4208 - Math::BigInt::Subclass->new("1 \n1234567890\n1") = 'NaN' ok 4209 - value of ((2^148)+1)/17 ok 4210 - number of digits in ((2^148)+1)/17 ok 4211 - value of 2^127-1 ok 4212 - number of digits in 2^127-1 ok 4213 - number of digits in fraction part of 2^127-1 ok 4214 - number of digits in 1_000_000_000_000 ok 4215 - number of digits in fraction part of 1_000_000_000_000 ok 4216 - 2 <<= 18 with Math::BigInt::Subclass objects ok 4217 - 2 <<= 18 with Math::BigInt::Subclass objects ok 4218 - 2 >>= 18 with Math::BigInt::Subclass objects ok 4219 - 2 >>= 18 with Math::BigInt::Subclass objects ok 4220 - $x = Math::Foo->new(5); $x = $x - 8; $x = 3 ok 4221 - $x is an object of class "Math::Foo" ok 4222 - $x = Math::Foo->new(5); $x = 8 - $x; $x = -3 ok 4223 - $x is an object of class "Math::Foo" ok 4224 - Math::BigInt::Subclass->new("+inf") = "inf" ok 4225 - bigint 2**64-1 as string ok 4226 - bigint 2**64-1 as number ok 4227 - bigint -2**63 as string ok 4228 - bigint -2**63 as number ok 4229 - is a valid object ok 4230 - $x == 1000000000 ok 4231 - is a valid object ok 4232 - $x == 999999999 ok 4233 - is a valid object ok 4234 - $x->numify() = $BASE-1 ok 4235 - $x->numify() = -($BASE-1) ok 4236 - $x->numify()+0 = $BASE+0 ok 4237 - $x->numify() = -$BASE ok 4238 - $x->numify() = -($BASE*$BASE*1+$BASE*1+1)) ok 4239 - $x > $BASE ok 4240 - $x > $BASE ok 4241 - $x->length() = length($MAX) ok 4242 - Math::BigInt::Subclass->digit(123, 2) = 1 ok 4243 - testing bug in sub ok 4244 - testing bug in sub ok 4245 - testing number with a zero-hole of BASE_LEN_SMALL ok 4246 - see if mul shortcut for small numbers works (999999999 * 999999999 = 999999998000000001) ok 4247 - -322056000 / -12882240 has remainder 0 ok 4248 - is a valid object ok 4249 - $x->bmod(5033) = 4404 ok 4250 - Math::BigInt::Subclass->bzero() = 0 ok 4251 - Math::BigInt::Subclass->bone() = 1 ok 4252 - Math::BigInt::Subclass->bone("+") = 1 ok 4253 - Math::BigInt::Subclass->bone("-") = -1 ok 4254 - Math::BigInt::Subclass->bnan() = "NaN" ok 4255 - Math::BigInt::Subclass->binf() = "inf" ok 4256 - Math::BigInt::Subclass->binf("+") = "inf" ok 4257 - Math::BigInt::Subclass->binf("-") = "-inf" ok 4258 - Math::BigInt::Subclass->binf("-inf") = "-inf" ok 4259 - Math::BigInt::Subclass->new(1)->is_one("-") = 0 ok 4260 - Math::BigInt::Subclass->new(-1)->is_one("-") = 1 ok 4261 - Math::BigInt::Subclass->new(1)->is_one() = 1 ok 4262 - Math::BigInt::Subclass->new(-1)->is_one() = 0 ok 4263 - $x = Math::BigInt::Subclass->new(3); $x -= $x; = 0 ok 4264 - $x = Math::BigInt::Subclass->new(-3); $x -= $x; = 0 ok 4265 - $x = Math::BigInt::Subclass->new("NaN"); $x -= $x; $x->is_nan() = 1 ok 4266 - $x = Math::BigInt::Subclass->new("inf"); $x -= $x; $x->is_nan() = 1 ok 4267 - $x = Math::BigInt::Subclass->new("-inf"); $x -= $x; $x->is_nan() = 1 ok 4268 - $x = Math::BigInt::Subclass->new("NaN"); $x += $x; $x->is_nan() = 1 ok 4269 - $x = Math::BigInt::Subclass->new("inf"); $x += $x; $x->is_inf() = 1 ok 4270 - $x = Math::BigInt::Subclass->new("-inf"); $x += $x; $x->is_inf("-") = 1 ok 4271 - $x = Math::BigInt::Subclass->new(3); $x += $x; $x = 6 ok 4272 - $x = Math::BigInt::Subclass->new(-3); $x += $x; $x = -6 ok 4273 - $x = Math::BigInt::Subclass->new(3); $x *= $x; $x = 9 ok 4274 - $x = Math::BigInt::Subclass->new(-3); $x *= $x; $x = 9 ok 4275 - $x = Math::BigInt::Subclass->new(3); $x /= $x; $x = 1 ok 4276 - $x = Math::BigInt::Subclass->new(-3); $x /= $x; $x = 1 ok 4277 - $x = Math::BigInt::Subclass->new(3); $x %= $x; $x = 0 ok 4278 - $x = Math::BigInt::Subclass->new(-3); $x %= $x; $x = 0 ok 4279 - $ms has custom attribute \$ms->{_custom} ok 4280 - An object of class 'Math::BigInt::Subclass' isa 'Math::BigInt' ok 4281 - $ms is 46 ok 4282 - $ms has custom attribute $ms->{_custom} ok 4283 - $ms is not an object of class 'Math::BigInt::Subclass' ok 4284 - Math::BigInt::Subclass gets 'accuracy' from parent ok 4285 - Math::BigInt::Subclass gets 'precision' from parent ok 4286 - Math::BigInt::Subclass gets 'div_scale' from parent ok 4287 - Math::BigInt::Subclass gets 'round_mode' from parent ok t/sub_mbr.t ................... 1..908 ok 1 ok 2 - $x = Math::BigRat::Subclass->new("123"); $x->digit(2); ok 3 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(0); ok 4 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(1); ok 5 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(2); ok 6 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(3); ok 7 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-1); ok 8 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-2); ok 9 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-3); ok 10 - $x = Math::BigRat::Subclass->new("1234"); $x->digit(-4); ok 11 - $x = Math::BigRat::Subclass->new("0"); $x->digit(0); ok 12 - $x = Math::BigRat::Subclass->new("0"); $x->digit(1); ok 13 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x->bmodinv($y); ok 14 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 15 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $x->bmodinv($y); ok 16 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 17 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 18 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-5"); $x->bmodinv($y); ok 19 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 20 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("5033"); $x->bmodinv($y); ok 21 - $x = Math::BigRat::Subclass->new("1234567891"); $y = Math::BigRat::Subclass->new("13"); $x->bmodinv($y); ok 22 - $x = Math::BigRat::Subclass->new("-1234567891"); $y = Math::BigRat::Subclass->new("13"); $x->bmodinv($y); ok 23 - $x = Math::BigRat::Subclass->new("324958749843759385732954874325984357439658735983745"); $y = Math::BigRat::Subclass->new("2348249874968739"); $x->bmodinv($y); ok 24 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 25 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("inf"); $x->bmodinv($y); ok 26 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("5"); $x->bmodinv($y); ok 27 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("-inf"); $x->bmodinv($y); ok 28 - $x = Math::BigRat::Subclass->new("144/7"); $x->as_number(); ok 29 - $x = Math::BigRat::Subclass->new("12/1"); $x->as_number(); ok 30 - $x = Math::BigRat::Subclass->new("-12/1"); $x->as_number(); ok 31 - $x = Math::BigRat::Subclass->new("-12/3"); $x->as_number(); ok 32 - $x = Math::BigRat::Subclass->new("NaN"); $x->as_number(); ok 33 - $x = Math::BigRat::Subclass->new("+inf"); $x->as_number(); ok 34 - $x = Math::BigRat::Subclass->new("-inf"); $x->as_number(); ok 35 - $x = Math::BigRat::Subclass->new("144/7"); $x->as_int(); ok 36 - $x = Math::BigRat::Subclass->new("12/1"); $x->as_int(); ok 37 - $x = Math::BigRat::Subclass->new("-12/1"); $x->as_int(); ok 38 - $x = Math::BigRat::Subclass->new("-12/3"); $x->as_int(); ok 39 - $x = Math::BigRat::Subclass->new("NaN"); $x->as_int(); ok 40 - $x = Math::BigRat::Subclass->new("+inf"); $x->as_int(); ok 41 - $x = Math::BigRat::Subclass->new("-inf"); $x->as_int(); ok 42 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 43 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 44 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 45 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 46 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("abc"); $x->bmodpow($y, $z); ok 47 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("abc"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 48 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("5"); $x->bmodpow($y, $z); ok 49 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("2"); $x->bmodpow($y, $z); ok 50 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("2"); $x->bmodpow($y, $z); ok 51 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $z = Math::BigRat::Subclass->new("1"); $x->bmodpow($y, $z); ok 52 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("7"); $z = Math::BigRat::Subclass->new("5032"); $x->bmodpow($y, $z); ok 53 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("-1"); $z = Math::BigRat::Subclass->new("5033"); $x->bmodpow($y, $z); ok 54 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("8"); $z = Math::BigRat::Subclass->new("-5"); $x->bmodpow($y, $z); ok 55 - $x = Math::BigRat::Subclass->new("98436739867439843769485798542749827593285729587325"); $y = Math::BigRat::Subclass->new("43698764986460981048259837659386739857456983759328457"); $z = Math::BigRat::Subclass->new("6943857329857295827698367"); $x->bmodpow($y, $z); ok 56 - $x = Math::BigRat::Subclass->new("8"); $y = Math::BigRat::Subclass->new("-1"); $z = Math::BigRat::Subclass->new("16"); $x->bmodpow($y, $z); ok 57 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("5"); $z = Math::BigRat::Subclass->new("13"); $x->bmodpow($y, $z); ok 58 - $x = Math::BigRat::Subclass->new("5"); $y = Math::BigRat::Subclass->new("inf"); $z = Math::BigRat::Subclass->new("13"); $x->bmodpow($y, $z); ok 59 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x % $y; ok 60 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x % $y; ok 61 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1"); $x % $y; ok 62 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("2"); $x % $y; ok 63 - $x = Math::BigRat::Subclass->new("12"); $y = Math::BigRat::Subclass->new("6"); $x % $y; ok 64 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/14"); $x % $y; ok 65 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/16"); $x % $y; ok 66 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/16"); $x % $y; ok 67 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/16"); $x % $y; ok 68 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/16"); $x % $y; ok 69 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/32"); $x % $y; ok 70 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/32"); $x % $y; ok 71 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/32"); $x % $y; ok 72 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/32"); $x % $y; ok 73 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("4/28"); $x % $y; ok 74 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("4/28"); $x % $y; ok 75 - $x = Math::BigRat::Subclass->new("7/4"); $y = Math::BigRat::Subclass->new("-4/28"); $x % $y; ok 76 - $x = Math::BigRat::Subclass->new("-7/4"); $y = Math::BigRat::Subclass->new("-4/28"); $x % $y; ok 77 - $x = Math::BigRat::Subclass->new("1"); ; $x->bsqrt(); ok 78 - $x = Math::BigRat::Subclass->new("0"); ; $x->bsqrt(); ok 79 - $x = Math::BigRat::Subclass->new("NaN"); ; $x->bsqrt(); ok 80 - $x = Math::BigRat::Subclass->new("+inf"); ; $x->bsqrt(); ok 81 - $x = Math::BigRat::Subclass->new("-inf"); ; $x->bsqrt(); ok 82 - $x = Math::BigRat::Subclass->new("144"); ; $x->bsqrt(); ok 83 - $x = Math::BigRat::Subclass->new("144/4"); ; $x->bsqrt(); ok 84 - $x = Math::BigRat::Subclass->new("25/16"); ; $x->bsqrt(); ok 85 - $x = Math::BigRat::Subclass->new("-3"); ; $x->bsqrt(); ok 86 - $x = Math::BigRat::Subclass->new("4/9"); ; $x->bsqrt(); ok 87 - $x = Math::BigRat::Subclass->new("36/49"); ; $x->bsqrt(); ok 88 - $x = Math::BigRat::Subclass->new("49/121"); ; $x->bsqrt(); ok 89 - $x = Math::BigRat::Subclass->new("999966000289/99999820000081"); ; $x->bsqrt(); ok 90 - $x = Math::BigRat::Subclass->new("NaN"); ; $x->blog(); ok 91 - $x = Math::BigRat::Subclass->new("0"); ; $x->blog(); ok 92 - $x = Math::BigRat::Subclass->new("-2"); ; $x->blog(); ok 93 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 94 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 95 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("0"); $x->blog($y); ok 96 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x->blog($y); ok 97 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x->blog($y); ok 98 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("2"); $x->blog($y); ok 99 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-2"); $x->blog($y); ok 100 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-2"); $x->blog($y); ok 101 - $x = Math::BigRat::Subclass->new("1"); $x->binf("+"); ok 102 - $x = Math::BigRat::Subclass->new("2"); $x->binf("-"); ok 103 - $x = Math::BigRat::Subclass->new("3"); $x->binf("abc"); ok 104 - $x = Math::BigRat::Subclass->new("0"); $x->numify(); ok 105 - $x = Math::BigRat::Subclass->new("+1"); $x->numify(); ok 106 - $x = Math::BigRat::Subclass->new("1234"); $x->numify(); ok 107 - $x = Math::BigRat::Subclass->new("3/4"); $x->numify(); ok 108 - $x = Math::BigRat::Subclass->new("5/2"); $x->numify(); ok 109 - $x = Math::BigRat::Subclass->new("3/2"); $x->numify(); ok 110 - $x = Math::BigRat::Subclass->new("5/4"); $x->numify(); ok 111 - $x = Math::BigRat::Subclass->new("abc"); $x->bnan(); ok 112 - $x = Math::BigRat::Subclass->new("2"); $x->bnan(); ok 113 - $x = Math::BigRat::Subclass->new("-2"); $x->bnan(); ok 114 - $x = Math::BigRat::Subclass->new("0"); $x->bnan(); ok 115 - $x = Math::BigRat::Subclass->new("2"); $x->bone("+"); ok 116 - $x = Math::BigRat::Subclass->new("-2"); $x->bone("-"); ok 117 - $x = Math::BigRat::Subclass->new("-2"); $x->bone("+"); ok 118 - $x = Math::BigRat::Subclass->new("2"); $x->bone("-"); ok 119 - $x = Math::BigRat::Subclass->new("0"); $x->bone(""); ok 120 - $x = Math::BigRat::Subclass->new("-2"); $x->bone(""); ok 121 - $x = Math::BigRat::Subclass->new("abc"); $x->bone(""); ok 122 - $x = Math::BigRat::Subclass->new("2"); $x->bone("abc"); ok 123 - $x = Math::BigRat::Subclass->new("+inf"); $x->bsstr(); ok 124 - $x = Math::BigRat::Subclass->new("-inf"); $x->bsstr(); ok 125 - $x = Math::BigRat::Subclass->new("abcfsstr"); $x->bsstr(); ok 126 - $x = Math::BigRat::Subclass->new("1"); $x->bsstr(); ok 127 - $x = Math::BigRat::Subclass->new("3/1"); $x->bsstr(); ok 128 - $x = Math::BigRat::Subclass->new("0.1"); $x->bsstr(); ok 129 - $x = Math::BigRat::Subclass->new("1"); $x; ok 130 - $x = Math::BigRat::Subclass->new("-0"); $x; ok 131 - $x = Math::BigRat::Subclass->new("bnormNaN"); $x; ok 132 - $x = Math::BigRat::Subclass->new("+inf"); $x; ok 133 - $x = Math::BigRat::Subclass->new("-inf"); $x; ok 134 - $x = Math::BigRat::Subclass->new("inf/inf"); $x; ok 135 - $x = Math::BigRat::Subclass->new("5/inf"); $x; ok 136 - $x = Math::BigRat::Subclass->new("5/-inf"); $x; ok 137 - $x = Math::BigRat::Subclass->new("inf/5"); $x; ok 138 - $x = Math::BigRat::Subclass->new("-inf/5"); $x; ok 139 - $x = Math::BigRat::Subclass->new("inf/-5"); $x; ok 140 - $x = Math::BigRat::Subclass->new("-inf/-5"); $x; ok 141 - $x = Math::BigRat::Subclass->new("123"); $x; ok 142 - $x = Math::BigRat::Subclass->new("-123.4567"); $x; ok 143 - $x = Math::BigRat::Subclass->new(".2E-3."); $x; ok 144 - $x = Math::BigRat::Subclass->new(".2E2"); $x; ok 145 - $x = Math::BigRat::Subclass->new("inf"); $x; ok 146 - $x = Math::BigRat::Subclass->new("+inf"); $x; ok 147 - $x = Math::BigRat::Subclass->new("-inf"); $x; ok 148 - $x = Math::BigRat::Subclass->new("+InFiNiTy"); $x; ok 149 - $x = Math::BigRat::Subclass->new("+-inf"); $x; ok 150 - $x = Math::BigRat::Subclass->new("abc"); $x; ok 151 - $x = Math::BigRat::Subclass->new(" 1 a"); $x; ok 152 - $x = Math::BigRat::Subclass->new("1bcd2"); $x; ok 153 - $x = Math::BigRat::Subclass->new("11111b"); $x; ok 154 - $x = Math::BigRat::Subclass->new("+1z"); $x; ok 155 - $x = Math::BigRat::Subclass->new("-1z"); $x; ok 156 - $x = Math::BigRat::Subclass->new("0"); $x; ok 157 - $x = Math::BigRat::Subclass->new("+0"); $x; ok 158 - $x = Math::BigRat::Subclass->new("+00"); $x; ok 159 - $x = Math::BigRat::Subclass->new("+0_0_0"); $x; ok 160 - $x = Math::BigRat::Subclass->new("000000_0000000_00000"); $x; ok 161 - $x = Math::BigRat::Subclass->new("-0"); $x; ok 162 - $x = Math::BigRat::Subclass->new("-0000"); $x; ok 163 - $x = Math::BigRat::Subclass->new("+1"); $x; ok 164 - $x = Math::BigRat::Subclass->new("+01"); $x; ok 165 - $x = Math::BigRat::Subclass->new("+001"); $x; ok 166 - $x = Math::BigRat::Subclass->new("+00000100000"); $x; ok 167 - $x = Math::BigRat::Subclass->new("+00000800/00000010"); $x; ok 168 - $x = Math::BigRat::Subclass->new("-00000800/00000010"); $x; ok 169 - $x = Math::BigRat::Subclass->new("+00000800/-00000010"); $x; ok 170 - $x = Math::BigRat::Subclass->new("-00000800/-00000010"); $x; ok 171 - $x = Math::BigRat::Subclass->new("123456789"); $x; ok 172 - $x = Math::BigRat::Subclass->new("-1"); $x; ok 173 - $x = Math::BigRat::Subclass->new("-01"); $x; ok 174 - $x = Math::BigRat::Subclass->new("-001"); $x; ok 175 - $x = Math::BigRat::Subclass->new("-123456789"); $x; ok 176 - $x = Math::BigRat::Subclass->new("-00000100000"); $x; ok 177 - $x = Math::BigRat::Subclass->new("123.456a"); $x; ok 178 - $x = Math::BigRat::Subclass->new("123.456"); $x; ok 179 - $x = Math::BigRat::Subclass->new("0.01"); $x; ok 180 - $x = Math::BigRat::Subclass->new(".002"); $x; ok 181 - $x = Math::BigRat::Subclass->new("+.2"); $x; ok 182 - $x = Math::BigRat::Subclass->new("-0.0003"); $x; ok 183 - $x = Math::BigRat::Subclass->new("-.0000000004"); $x; ok 184 - $x = Math::BigRat::Subclass->new("123456E2"); $x; ok 185 - $x = Math::BigRat::Subclass->new("123456E-2"); $x; ok 186 - $x = Math::BigRat::Subclass->new("-123456E2"); $x; ok 187 - $x = Math::BigRat::Subclass->new("-123456E-2"); $x; ok 188 - $x = Math::BigRat::Subclass->new("1e1"); $x; ok 189 - $x = Math::BigRat::Subclass->new("2e-11"); $x; ok 190 - $x = Math::BigRat::Subclass->new("12/10"); $x; ok 191 - $x = Math::BigRat::Subclass->new("0.1/0.1"); $x; ok 192 - $x = Math::BigRat::Subclass->new("100/0.1"); $x; ok 193 - $x = Math::BigRat::Subclass->new("0.1/10"); $x; ok 194 - $x = Math::BigRat::Subclass->new("1 / 3"); $x; ok 195 - $x = Math::BigRat::Subclass->new("1/ 3"); $x; ok 196 - $x = Math::BigRat::Subclass->new("1 /3"); $x; ok 197 - $x = Math::BigRat::Subclass->new("fnegNaN"); $x->bneg(); ok 198 - $x = Math::BigRat::Subclass->new("+inf"); $x->bneg(); ok 199 - $x = Math::BigRat::Subclass->new("-inf"); $x->bneg(); ok 200 - $x = Math::BigRat::Subclass->new("+0"); $x->bneg(); ok 201 - $x = Math::BigRat::Subclass->new("+1"); $x->bneg(); ok 202 - $x = Math::BigRat::Subclass->new("-1"); $x->bneg(); ok 203 - $x = Math::BigRat::Subclass->new("+123456789"); $x->bneg(); ok 204 - $x = Math::BigRat::Subclass->new("-123456789"); $x->bneg(); ok 205 - $x = Math::BigRat::Subclass->new("+123.456789"); $x->bneg(); ok 206 - $x = Math::BigRat::Subclass->new("-123456.789"); $x->bneg(); ok 207 - $x = Math::BigRat::Subclass->new("123/7"); $x->bneg(); ok 208 - $x = Math::BigRat::Subclass->new("-123/7"); $x->bneg(); ok 209 - $x = Math::BigRat::Subclass->new("123/-7"); $x->bneg(); ok 210 - $x = Math::BigRat::Subclass->new("fabsNaN"); $x->babs(); ok 211 - $x = Math::BigRat::Subclass->new("+inf"); $x->babs(); ok 212 - $x = Math::BigRat::Subclass->new("-inf"); $x->babs(); ok 213 - $x = Math::BigRat::Subclass->new("+0"); $x->babs(); ok 214 - $x = Math::BigRat::Subclass->new("+1"); $x->babs(); ok 215 - $x = Math::BigRat::Subclass->new("-1"); $x->babs(); ok 216 - $x = Math::BigRat::Subclass->new("+123456789"); $x->babs(); ok 217 - $x = Math::BigRat::Subclass->new("-123456789"); $x->babs(); ok 218 - $x = Math::BigRat::Subclass->new("+123.456789"); $x->babs(); ok 219 - $x = Math::BigRat::Subclass->new("-123456.789"); $x->babs(); ok 220 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x + $y; ok 221 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 222 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x + $y; ok 223 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x + $y; ok 224 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 225 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 226 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x + $y; ok 227 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 228 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x + $y; ok 229 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x + $y; ok 230 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x + $y; ok 231 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 232 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 233 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 234 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 235 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x + $y; ok 236 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 237 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 238 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 239 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 240 - $x = Math::BigRat::Subclass->new("+9"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 241 - $x = Math::BigRat::Subclass->new("+99"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 242 - $x = Math::BigRat::Subclass->new("+999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 243 - $x = Math::BigRat::Subclass->new("+9999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 244 - $x = Math::BigRat::Subclass->new("+99999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 245 - $x = Math::BigRat::Subclass->new("+999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 246 - $x = Math::BigRat::Subclass->new("+9999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 247 - $x = Math::BigRat::Subclass->new("+99999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 248 - $x = Math::BigRat::Subclass->new("+999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 249 - $x = Math::BigRat::Subclass->new("+9999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 250 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+1"); $x + $y; ok 251 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 252 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 253 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 254 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 255 - $x = Math::BigRat::Subclass->new("+100000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 256 - $x = Math::BigRat::Subclass->new("+1000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 257 - $x = Math::BigRat::Subclass->new("+10000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 258 - $x = Math::BigRat::Subclass->new("+100000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 259 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 260 - $x = Math::BigRat::Subclass->new("+10000000000"); $y = Math::BigRat::Subclass->new("-1"); $x + $y; ok 261 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x + $y; ok 262 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x + $y; ok 263 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x + $y; ok 264 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x + $y; ok 265 - $x = Math::BigRat::Subclass->new("1/3"); $y = Math::BigRat::Subclass->new("1/3"); $x + $y; ok 266 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("-1/3"); $x + $y; ok 267 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x - $y; ok 268 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 269 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x - $y; ok 270 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x - $y; ok 271 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 272 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 273 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x - $y; ok 274 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 275 - $x = Math::BigRat::Subclass->new("baddNaN"); $y = Math::BigRat::Subclass->new("+inf"); $x - $y; ok 276 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x - $y; ok 277 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("baddNaN"); $x - $y; ok 278 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 279 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 280 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 281 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 282 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x - $y; ok 283 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 284 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 285 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 286 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 287 - $x = Math::BigRat::Subclass->new("+9"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 288 - $x = Math::BigRat::Subclass->new("+99"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 289 - $x = Math::BigRat::Subclass->new("+999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 290 - $x = Math::BigRat::Subclass->new("+9999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 291 - $x = Math::BigRat::Subclass->new("+99999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 292 - $x = Math::BigRat::Subclass->new("+999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 293 - $x = Math::BigRat::Subclass->new("+9999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 294 - $x = Math::BigRat::Subclass->new("+99999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 295 - $x = Math::BigRat::Subclass->new("+999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 296 - $x = Math::BigRat::Subclass->new("+9999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 297 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+1"); $x - $y; ok 298 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 299 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 300 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 301 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 302 - $x = Math::BigRat::Subclass->new("+100000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 303 - $x = Math::BigRat::Subclass->new("+1000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 304 - $x = Math::BigRat::Subclass->new("+10000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 305 - $x = Math::BigRat::Subclass->new("+100000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 306 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 307 - $x = Math::BigRat::Subclass->new("+10000000000"); $y = Math::BigRat::Subclass->new("-1"); $x - $y; ok 308 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x - $y; ok 309 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x - $y; ok 310 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x - $y; ok 311 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x - $y; ok 312 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("1/3"); $x - $y; ok 313 - $x = Math::BigRat::Subclass->new("7/27"); $y = Math::BigRat::Subclass->new("3/54"); $x - $y; ok 314 - $x = Math::BigRat::Subclass->new("-2/3"); $y = Math::BigRat::Subclass->new("+2/3"); $x - $y; ok 315 - $x = Math::BigRat::Subclass->new("-2/3"); $y = Math::BigRat::Subclass->new("-2/3"); $x - $y; ok 316 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-123"); $x - $y; ok 317 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("123"); $x - $y; ok 318 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $x * $y; ok 319 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 320 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("abc"); $x * $y; ok 321 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaNmul"); $x * $y; ok 322 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaNmul"); $x * $y; ok 323 - $x = Math::BigRat::Subclass->new("NaNmul"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 324 - $x = Math::BigRat::Subclass->new("NaNmul"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 325 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 326 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 327 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 328 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 329 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("123.34"); $x * $y; ok 330 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-123.34"); $x * $y; ok 331 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("123.34"); $x * $y; ok 332 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-123.34"); $x * $y; ok 333 - $x = Math::BigRat::Subclass->new("123.34"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 334 - $x = Math::BigRat::Subclass->new("-123.34"); $y = Math::BigRat::Subclass->new("+inf"); $x * $y; ok 335 - $x = Math::BigRat::Subclass->new("123.34"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 336 - $x = Math::BigRat::Subclass->new("-123.34"); $y = Math::BigRat::Subclass->new("-inf"); $x * $y; ok 337 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 338 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 339 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 340 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 341 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 342 - $x = Math::BigRat::Subclass->new("+123456789123456789"); $y = Math::BigRat::Subclass->new("+0"); $x * $y; ok 343 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+123456789123456789"); $x * $y; ok 344 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 345 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 346 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x * $y; ok 347 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $x * $y; ok 348 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("+3"); $x * $y; ok 349 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("+3"); $x * $y; ok 350 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("-3"); $x * $y; ok 351 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3"); $x * $y; ok 352 - $x = Math::BigRat::Subclass->new("+111"); $y = Math::BigRat::Subclass->new("+111"); $x * $y; ok 353 - $x = Math::BigRat::Subclass->new("+10101"); $y = Math::BigRat::Subclass->new("+10101"); $x * $y; ok 354 - $x = Math::BigRat::Subclass->new("+1001001"); $y = Math::BigRat::Subclass->new("+1001001"); $x * $y; ok 355 - $x = Math::BigRat::Subclass->new("+100010001"); $y = Math::BigRat::Subclass->new("+100010001"); $x * $y; ok 356 - $x = Math::BigRat::Subclass->new("+10000100001"); $y = Math::BigRat::Subclass->new("+10000100001"); $x * $y; ok 357 - $x = Math::BigRat::Subclass->new("+11111111111"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 358 - $x = Math::BigRat::Subclass->new("+22222222222"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 359 - $x = Math::BigRat::Subclass->new("+33333333333"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 360 - $x = Math::BigRat::Subclass->new("+44444444444"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 361 - $x = Math::BigRat::Subclass->new("+55555555555"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 362 - $x = Math::BigRat::Subclass->new("+66666666666"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 363 - $x = Math::BigRat::Subclass->new("+77777777777"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 364 - $x = Math::BigRat::Subclass->new("+88888888888"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 365 - $x = Math::BigRat::Subclass->new("+99999999999"); $y = Math::BigRat::Subclass->new("+9"); $x * $y; ok 366 - $x = Math::BigRat::Subclass->new("6"); $y = Math::BigRat::Subclass->new("120"); $x * $y; ok 367 - $x = Math::BigRat::Subclass->new("10"); $y = Math::BigRat::Subclass->new("10000"); $x * $y; ok 368 - $x = Math::BigRat::Subclass->new("1/4"); $y = Math::BigRat::Subclass->new("1/3"); $x * $y; ok 369 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 370 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1"); ; join(",", $x->bdiv($y)); ok 371 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 372 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("0"); ; join(",", $x->bdiv($y)); ok 373 - $x = Math::BigRat::Subclass->new("9"); $y = Math::BigRat::Subclass->new("4"); ; join(",", $x->bdiv($y)); ok 374 - $x = Math::BigRat::Subclass->new("-9"); $y = Math::BigRat::Subclass->new("4"); ; join(",", $x->bdiv($y)); ok 375 - $x = Math::BigRat::Subclass->new("9"); $y = Math::BigRat::Subclass->new("-4"); ; join(",", $x->bdiv($y)); ok 376 - $x = Math::BigRat::Subclass->new("-9"); $y = Math::BigRat::Subclass->new("-4"); ; join(",", $x->bdiv($y)); ok 377 - $x = Math::BigRat::Subclass->new("11/7"); $y = Math::BigRat::Subclass->new("2/3"); ; join(",", $x->bdiv($y)); ok 378 - $x = Math::BigRat::Subclass->new("-11/7"); $y = Math::BigRat::Subclass->new("2/3"); ; join(",", $x->bdiv($y)); ok 379 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 380 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 381 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 382 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 383 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("abc"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 384 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 385 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 386 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 387 - $x = Math::BigRat::Subclass->new("+3214"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 388 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 389 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 390 - $x = Math::BigRat::Subclass->new("-3214"); $y = Math::BigRat::Subclass->new("+0"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 391 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 392 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 393 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 394 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 395 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("+2"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 396 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("+1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 397 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("+inf"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 398 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("-inf"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 399 - $x = Math::BigRat::Subclass->new("+10"); $y = Math::BigRat::Subclass->new("+5"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 400 - $x = Math::BigRat::Subclass->new("+100"); $y = Math::BigRat::Subclass->new("+4"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 401 - $x = Math::BigRat::Subclass->new("+1000"); $y = Math::BigRat::Subclass->new("+8"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 402 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("+16"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 403 - $x = Math::BigRat::Subclass->new("+10000"); $y = Math::BigRat::Subclass->new("-16"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 404 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 405 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+99"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 406 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 407 - $x = Math::BigRat::Subclass->new("+999999999999"); $y = Math::BigRat::Subclass->new("+9999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 408 - $x = Math::BigRat::Subclass->new("+999999999999999"); $y = Math::BigRat::Subclass->new("+99999"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 409 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 410 - $x = Math::BigRat::Subclass->new("+2000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 411 - $x = Math::BigRat::Subclass->new("+3000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 412 - $x = Math::BigRat::Subclass->new("+4000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 413 - $x = Math::BigRat::Subclass->new("+5000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 414 - $x = Math::BigRat::Subclass->new("+6000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 415 - $x = Math::BigRat::Subclass->new("+7000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 416 - $x = Math::BigRat::Subclass->new("+8000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 417 - $x = Math::BigRat::Subclass->new("+9000000000"); $y = Math::BigRat::Subclass->new("+9"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 418 - $x = Math::BigRat::Subclass->new("+35500000"); $y = Math::BigRat::Subclass->new("+113"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 419 - $x = Math::BigRat::Subclass->new("+71000000"); $y = Math::BigRat::Subclass->new("+226"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 420 - $x = Math::BigRat::Subclass->new("+106500000"); $y = Math::BigRat::Subclass->new("+339"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 421 - $x = Math::BigRat::Subclass->new("+1000000000"); $y = Math::BigRat::Subclass->new("+3"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 422 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("25.024996000799840031993601279744051189762"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 423 - $x = Math::BigRat::Subclass->new("123456"); $y = Math::BigRat::Subclass->new("1"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 424 - $x = Math::BigRat::Subclass->new("1/4"); $y = Math::BigRat::Subclass->new("1/3"); $Math::BigRat::Subclass::div_scale = 40; $Math::BigRat::Subclass::round_mode = "even"; $x / $y; ok 425 - $x = Math::BigRat::Subclass->new("123"); $x->is_nan(); ok 426 - $x = Math::BigRat::Subclass->new("abc"); $x->is_nan(); ok 427 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_nan(); ok 428 - $x = Math::BigRat::Subclass->new("-123"); $x->is_nan(); ok 429 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf(); ok 430 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf(); ok 431 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf(); ok 432 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf(); ok 433 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf(); ok 434 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf(); ok 435 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf(); ok 436 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf("+"); ok 437 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf("+"); ok 438 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf("+"); ok 439 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf("+"); ok 440 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf("+"); ok 441 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf("+"); ok 442 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf("+"); ok 443 - $x = Math::BigRat::Subclass->new("abc"); $x->is_inf("-"); ok 444 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_inf("-"); ok 445 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_inf("-"); ok 446 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_inf("-"); ok 447 - $x = Math::BigRat::Subclass->new("-1"); $x->is_inf("-"); ok 448 - $x = Math::BigRat::Subclass->new("0"); $x->is_inf("-"); ok 449 - $x = Math::BigRat::Subclass->new("1"); $x->is_inf("-"); ok 450 - $x = Math::BigRat::Subclass->new("+infinity"); $x->is_inf(); ok 451 - $x = Math::BigRat::Subclass->new("-infinity"); $x->is_inf(); ok 452 - $x = Math::BigRat::Subclass->new("abc"); $x->is_odd(); ok 453 - $x = Math::BigRat::Subclass->new("0"); $x->is_odd(); ok 454 - $x = Math::BigRat::Subclass->new("-1"); $x->is_odd(); ok 455 - $x = Math::BigRat::Subclass->new("-3"); $x->is_odd(); ok 456 - $x = Math::BigRat::Subclass->new("1"); $x->is_odd(); ok 457 - $x = Math::BigRat::Subclass->new("3"); $x->is_odd(); ok 458 - $x = Math::BigRat::Subclass->new("1000001"); $x->is_odd(); ok 459 - $x = Math::BigRat::Subclass->new("1000002"); $x->is_odd(); ok 460 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_odd(); ok 461 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_odd(); ok 462 - $x = Math::BigRat::Subclass->new("123.45"); $x->is_odd(); ok 463 - $x = Math::BigRat::Subclass->new("-123.45"); $x->is_odd(); ok 464 - $x = Math::BigRat::Subclass->new("2"); $x->is_odd(); ok 465 - $x = Math::BigRat::Subclass->new("NaNis_int"); $x->is_int(); ok 466 - $x = Math::BigRat::Subclass->new("0"); $x->is_int(); ok 467 - $x = Math::BigRat::Subclass->new("1"); $x->is_int(); ok 468 - $x = Math::BigRat::Subclass->new("2"); $x->is_int(); ok 469 - $x = Math::BigRat::Subclass->new("-2"); $x->is_int(); ok 470 - $x = Math::BigRat::Subclass->new("-1"); $x->is_int(); ok 471 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_int(); ok 472 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_int(); ok 473 - $x = Math::BigRat::Subclass->new("123.4567"); $x->is_int(); ok 474 - $x = Math::BigRat::Subclass->new("-0.1"); $x->is_int(); ok 475 - $x = Math::BigRat::Subclass->new("-0.002"); $x->is_int(); ok 476 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_int(); ok 477 - $x = Math::BigRat::Subclass->new("3/1"); $x->is_int(); ok 478 - $x = Math::BigRat::Subclass->new("abc"); $x->is_even(); ok 479 - $x = Math::BigRat::Subclass->new("0"); $x->is_even(); ok 480 - $x = Math::BigRat::Subclass->new("-1"); $x->is_even(); ok 481 - $x = Math::BigRat::Subclass->new("-3"); $x->is_even(); ok 482 - $x = Math::BigRat::Subclass->new("1"); $x->is_even(); ok 483 - $x = Math::BigRat::Subclass->new("3"); $x->is_even(); ok 484 - $x = Math::BigRat::Subclass->new("1000001"); $x->is_even(); ok 485 - $x = Math::BigRat::Subclass->new("1000002"); $x->is_even(); ok 486 - $x = Math::BigRat::Subclass->new("2"); $x->is_even(); ok 487 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_even(); ok 488 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_even(); ok 489 - $x = Math::BigRat::Subclass->new("123.456"); $x->is_even(); ok 490 - $x = Math::BigRat::Subclass->new("-123.456"); $x->is_even(); ok 491 - $x = Math::BigRat::Subclass->new("0.01"); $x->is_even(); ok 492 - $x = Math::BigRat::Subclass->new("-0.01"); $x->is_even(); ok 493 - $x = Math::BigRat::Subclass->new("120"); $x->is_even(); ok 494 - $x = Math::BigRat::Subclass->new("1200"); $x->is_even(); ok 495 - $x = Math::BigRat::Subclass->new("-1200"); $x->is_even(); ok 496 - $x = Math::BigRat::Subclass->new("0"); $x->is_pos(); ok 497 - $x = Math::BigRat::Subclass->new("1"); $x->is_pos(); ok 498 - $x = Math::BigRat::Subclass->new("-1"); $x->is_pos(); ok 499 - $x = Math::BigRat::Subclass->new("-123"); $x->is_pos(); ok 500 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_pos(); ok 501 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_pos(); ok 502 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_pos(); ok 503 - $x = Math::BigRat::Subclass->new("0"); $x->is_positive(); ok 504 - $x = Math::BigRat::Subclass->new("1"); $x->is_positive(); ok 505 - $x = Math::BigRat::Subclass->new("-1"); $x->is_positive(); ok 506 - $x = Math::BigRat::Subclass->new("-123"); $x->is_positive(); ok 507 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_positive(); ok 508 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_positive(); ok 509 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_positive(); ok 510 - $x = Math::BigRat::Subclass->new("0"); $x->is_neg(); ok 511 - $x = Math::BigRat::Subclass->new("1"); $x->is_neg(); ok 512 - $x = Math::BigRat::Subclass->new("-1"); $x->is_neg(); ok 513 - $x = Math::BigRat::Subclass->new("-123"); $x->is_neg(); ok 514 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_neg(); ok 515 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_neg(); ok 516 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_neg(); ok 517 - $x = Math::BigRat::Subclass->new("0"); $x->is_negative(); ok 518 - $x = Math::BigRat::Subclass->new("1"); $x->is_negative(); ok 519 - $x = Math::BigRat::Subclass->new("-1"); $x->is_negative(); ok 520 - $x = Math::BigRat::Subclass->new("-123"); $x->is_negative(); ok 521 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_negative(); ok 522 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_negative(); ok 523 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_negative(); ok 524 - $x = Math::BigRat::Subclass->new("0"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 525 - $x = Math::BigRat::Subclass->new("1"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 526 - $x = Math::BigRat::Subclass->new("123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 527 - $x = Math::BigRat::Subclass->new("-123"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 528 - $x = Math::BigRat::Subclass->new("-1200"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 529 - $x = Math::BigRat::Subclass->new("5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 530 - $x = Math::BigRat::Subclass->new("-5/7"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 531 - $x = Math::BigRat::Subclass->new("NaNparts"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 532 - $x = Math::BigRat::Subclass->new("+inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 533 - $x = Math::BigRat::Subclass->new("-inf"); ($a,$b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 534 - $x = Math::BigRat::Subclass->new("123"); $x->length(); ok 535 - $x = Math::BigRat::Subclass->new("-123"); $x->length(); ok 536 - $x = Math::BigRat::Subclass->new("0"); $x->length(); ok 537 - $x = Math::BigRat::Subclass->new("1"); $x->length(); ok 538 - $x = Math::BigRat::Subclass->new("12345678901234567890"); $x->length(); ok 539 - $x = Math::BigRat::Subclass->new("NaNzero"); $x->is_zero(); ok 540 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_zero(); ok 541 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_zero(); ok 542 - $x = Math::BigRat::Subclass->new("0"); $x->is_zero(); ok 543 - $x = Math::BigRat::Subclass->new("-1"); $x->is_zero(); ok 544 - $x = Math::BigRat::Subclass->new("1"); $x->is_zero(); ok 545 - $x = Math::BigRat::Subclass->new("0/3"); $x->is_zero(); ok 546 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_zero(); ok 547 - $x = Math::BigRat::Subclass->new("-0/3"); $x->is_zero(); ok 548 - $x = Math::BigRat::Subclass->new("5/inf"); $x->is_zero(); ok 549 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one(); ok 550 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one(); ok 551 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one(); ok 552 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one(); ok 553 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one(); ok 554 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one(); ok 555 - $x = Math::BigRat::Subclass->new("0"); $x->is_one(); ok 556 - $x = Math::BigRat::Subclass->new("1"); $x->is_one(); ok 557 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one(); ok 558 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one("+"); ok 559 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one("+"); ok 560 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one("+"); ok 561 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one("+"); ok 562 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("+"); ok 563 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one("+"); ok 564 - $x = Math::BigRat::Subclass->new("0"); $x->is_one("+"); ok 565 - $x = Math::BigRat::Subclass->new("1"); $x->is_one("+"); ok 566 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("+"); ok 567 - $x = Math::BigRat::Subclass->new("invalid"); $x->is_one("-"); ok 568 - $x = Math::BigRat::Subclass->new("NaN"); $x->is_one("-"); ok 569 - $x = Math::BigRat::Subclass->new("+inf"); $x->is_one("-"); ok 570 - $x = Math::BigRat::Subclass->new("-inf"); $x->is_one("-"); ok 571 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("-"); ok 572 - $x = Math::BigRat::Subclass->new("-1"); $x->is_one("-"); ok 573 - $x = Math::BigRat::Subclass->new("0"); $x->is_one("-"); ok 574 - $x = Math::BigRat::Subclass->new("1"); $x->is_one("-"); ok 575 - $x = Math::BigRat::Subclass->new("-2"); $x->is_one("-"); ok 576 - $x = Math::BigRat::Subclass->new("1/3"); $x->is_one(); ok 577 - $x = Math::BigRat::Subclass->new("100/100"); $x->is_one(); ok 578 - $x = Math::BigRat::Subclass->new("0.1/0.1"); $x->is_one(); ok 579 - $x = Math::BigRat::Subclass->new("5/inf"); $x->is_one(); ok 580 - $x = Math::BigRat::Subclass->new("0"); $x->bfloor(); ok 581 - $x = Math::BigRat::Subclass->new("abc"); $x->bfloor(); ok 582 - $x = Math::BigRat::Subclass->new("+inf"); $x->bfloor(); ok 583 - $x = Math::BigRat::Subclass->new("-inf"); $x->bfloor(); ok 584 - $x = Math::BigRat::Subclass->new("1"); $x->bfloor(); ok 585 - $x = Math::BigRat::Subclass->new("-51"); $x->bfloor(); ok 586 - $x = Math::BigRat::Subclass->new("-51.2"); $x->bfloor(); ok 587 - $x = Math::BigRat::Subclass->new("12.2"); $x->bfloor(); ok 588 - $x = Math::BigRat::Subclass->new("3/7"); $x->bfloor(); ok 589 - $x = Math::BigRat::Subclass->new("6/7"); $x->bfloor(); ok 590 - $x = Math::BigRat::Subclass->new("7/7"); $x->bfloor(); ok 591 - $x = Math::BigRat::Subclass->new("8/7"); $x->bfloor(); ok 592 - $x = Math::BigRat::Subclass->new("13/7"); $x->bfloor(); ok 593 - $x = Math::BigRat::Subclass->new("14/7"); $x->bfloor(); ok 594 - $x = Math::BigRat::Subclass->new("15/7"); $x->bfloor(); ok 595 - $x = Math::BigRat::Subclass->new("-3/7"); $x->bfloor(); ok 596 - $x = Math::BigRat::Subclass->new("-6/7"); $x->bfloor(); ok 597 - $x = Math::BigRat::Subclass->new("-7/1"); $x->bfloor(); ok 598 - $x = Math::BigRat::Subclass->new("-8/7"); $x->bfloor(); ok 599 - $x = Math::BigRat::Subclass->new("-13/7"); $x->bfloor(); ok 600 - $x = Math::BigRat::Subclass->new("-14/7"); $x->bfloor(); ok 601 - $x = Math::BigRat::Subclass->new("-15/7"); $x->bfloor(); ok 602 - $x = Math::BigRat::Subclass->new("0"); $x->bceil(); ok 603 - $x = Math::BigRat::Subclass->new("abc"); $x->bceil(); ok 604 - $x = Math::BigRat::Subclass->new("+inf"); $x->bceil(); ok 605 - $x = Math::BigRat::Subclass->new("-inf"); $x->bceil(); ok 606 - $x = Math::BigRat::Subclass->new("1"); $x->bceil(); ok 607 - $x = Math::BigRat::Subclass->new("-51"); $x->bceil(); ok 608 - $x = Math::BigRat::Subclass->new("-51.2"); $x->bceil(); ok 609 - $x = Math::BigRat::Subclass->new("12.2"); $x->bceil(); ok 610 - $x = Math::BigRat::Subclass->new("3/7"); $x->bceil(); ok 611 - $x = Math::BigRat::Subclass->new("6/7"); $x->bceil(); ok 612 - $x = Math::BigRat::Subclass->new("8/7"); $x->bceil(); ok 613 - $x = Math::BigRat::Subclass->new("13/7"); $x->bceil(); ok 614 - $x = Math::BigRat::Subclass->new("14/7"); $x->bceil(); ok 615 - $x = Math::BigRat::Subclass->new("15/7"); $x->bceil(); ok 616 - $x = Math::BigRat::Subclass->new("-3/7"); $x->bceil(); ok 617 - $x = Math::BigRat::Subclass->new("-6/7"); $x->bceil(); ok 618 - $x = Math::BigRat::Subclass->new("-8/7"); $x->bceil(); ok 619 - $x = Math::BigRat::Subclass->new("-13/7"); $x->bceil(); ok 620 - $x = Math::BigRat::Subclass->new("-14/7"); $x->bceil(); ok 621 - $x = Math::BigRat::Subclass->new("-15/7"); $x->bceil(); ok 622 - $x = Math::BigRat::Subclass->new("NaN"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 623 - $x = Math::BigRat::Subclass->new("1"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 624 - $x = Math::BigRat::Subclass->new("-1"); $Math::BigRat::Subclass::div_scale = 40; $x->bfac(); ok 625 - $x = Math::BigRat::Subclass->new("abc"); $y = Math::BigRat::Subclass->new("123"); $x->bpow($y); ok 626 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("abc"); $x->bpow($y); ok 627 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 628 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 629 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 630 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 631 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 632 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 633 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 634 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 635 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 636 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 637 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 638 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 639 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 640 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 641 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 642 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 643 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 644 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 645 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 646 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 647 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 648 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 649 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 650 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 651 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 652 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 653 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 654 - $x = Math::BigRat::Subclass->new("-3"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 655 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 656 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 657 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 658 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 659 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 660 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 661 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 662 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 663 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 664 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 665 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 666 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 667 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 668 - $x = Math::BigRat::Subclass->new("-2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 669 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 670 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 671 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 672 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 673 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 674 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 675 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 676 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 677 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 678 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 679 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 680 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 681 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 682 - $x = Math::BigRat::Subclass->new("-3/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 683 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 684 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 685 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 686 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 687 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 688 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 689 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 690 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 691 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 692 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 693 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 694 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 695 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 696 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 697 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 698 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 699 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 700 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 701 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 702 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 703 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 704 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 705 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 706 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 707 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 708 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 709 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 710 - $x = Math::BigRat::Subclass->new("-1/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 711 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 712 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 713 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 714 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 715 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 716 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 717 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 718 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 719 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 720 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 721 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 722 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 723 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 724 - $x = Math::BigRat::Subclass->new("0"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 725 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 726 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 727 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 728 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 729 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 730 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 731 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 732 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 733 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 734 - $x = Math::BigRat::Subclass->new("1/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 735 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 736 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 737 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 738 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 739 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 740 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 741 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 742 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 743 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 744 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 745 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 746 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 747 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 748 - $x = Math::BigRat::Subclass->new("1"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 749 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 750 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 751 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 752 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 753 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 754 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 755 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 756 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 757 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 758 - $x = Math::BigRat::Subclass->new("3/2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 759 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 760 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 761 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 763 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 764 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 765 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 766 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 767 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 768 - $x = Math::BigRat::Subclass->new("2"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 769 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 770 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 771 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 772 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 773 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 774 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 775 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 776 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 777 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 778 - $x = Math::BigRat::Subclass->new("3"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 779 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 780 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 781 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 782 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 783 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 784 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 785 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 786 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 787 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 788 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 789 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 790 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 791 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 792 - $x = Math::BigRat::Subclass->new("inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 793 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-inf"); $x->bpow($y); ok 794 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-3"); $x->bpow($y); ok 795 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-2"); $x->bpow($y); ok 796 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-3/2"); $x->bpow($y); ok 797 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-1"); $x->bpow($y); ok 798 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-1/2"); $x->bpow($y); ok 799 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("0"); $x->bpow($y); ok 800 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1/2"); $x->bpow($y); ok 801 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("1"); $x->bpow($y); ok 802 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("3/2"); $x->bpow($y); ok 803 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("2"); $x->bpow($y); ok 804 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("3"); $x->bpow($y); ok 805 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("inf"); $x->bpow($y); ok 806 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("NaN"); $x->bpow($y); ok 807 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("-0"); $x->bacmp($y); ok 808 - $x = Math::BigRat::Subclass->new("+0"); $y = Math::BigRat::Subclass->new("+1"); $x->bacmp($y); ok 809 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+1"); $x->bacmp($y); ok 810 - $x = Math::BigRat::Subclass->new("+1"); $y = Math::BigRat::Subclass->new("-1"); $x->bacmp($y); ok 811 - $x = Math::BigRat::Subclass->new("-1"); $y = Math::BigRat::Subclass->new("+2"); $x->bacmp($y); ok 812 - $x = Math::BigRat::Subclass->new("+2"); $y = Math::BigRat::Subclass->new("-1"); $x->bacmp($y); ok 813 - $x = Math::BigRat::Subclass->new("-123456789"); $y = Math::BigRat::Subclass->new("+987654321"); $x->bacmp($y); ok 814 - $x = Math::BigRat::Subclass->new("+123456789"); $y = Math::BigRat::Subclass->new("-987654321"); $x->bacmp($y); ok 815 - $x = Math::BigRat::Subclass->new("+987654321"); $y = Math::BigRat::Subclass->new("+123456789"); $x->bacmp($y); ok 816 - $x = Math::BigRat::Subclass->new("-987654321"); $y = Math::BigRat::Subclass->new("+123456789"); $x->bacmp($y); ok 817 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("+4567889"); $x->bacmp($y); ok 818 - $x = Math::BigRat::Subclass->new("acmpNaN"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 819 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("acmpNaN"); $x->bacmp($y); ok 820 - $x = Math::BigRat::Subclass->new("acmpNaN"); $y = Math::BigRat::Subclass->new("acmpNaN"); $x->bacmp($y); ok 821 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("+inf"); $x->bacmp($y); ok 822 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 823 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 824 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("+inf"); $x->bacmp($y); ok 825 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 826 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("123"); $x->bacmp($y); ok 827 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-123"); $x->bacmp($y); ok 828 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-123"); $x->bacmp($y); ok 829 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("1/23"); $x->bacmp($y); ok 830 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("1/23"); $x->bacmp($y); ok 831 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-1/23"); $x->bacmp($y); ok 832 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-1/23"); $x->bacmp($y); ok 833 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("12/3"); $x->bacmp($y); ok 834 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("12/3"); $x->bacmp($y); ok 835 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("-12/3"); $x->bacmp($y); ok 836 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("-12/3"); $x->bacmp($y); ok 837 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 838 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 839 - $x = Math::BigRat::Subclass->new("123"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 840 - $x = Math::BigRat::Subclass->new("-123"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 841 - $x = Math::BigRat::Subclass->new("1/23"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 842 - $x = Math::BigRat::Subclass->new("-1/23"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 843 - $x = Math::BigRat::Subclass->new("1/23"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 844 - $x = Math::BigRat::Subclass->new("-1/23"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 845 - $x = Math::BigRat::Subclass->new("12/3"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 846 - $x = Math::BigRat::Subclass->new("-12/3"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 847 - $x = Math::BigRat::Subclass->new("12/3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 848 - $x = Math::BigRat::Subclass->new("-12/3"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 849 - $x = Math::BigRat::Subclass->new("+inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bacmp($y); ok 850 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("inf"); $x->bacmp($y); ok 851 - $x = Math::BigRat::Subclass->new("-inf"); $y = Math::BigRat::Subclass->new("NaN"); $x->bacmp($y); ok 852 - $x = Math::BigRat::Subclass->new("NaN"); $y = Math::BigRat::Subclass->new("-inf"); $x->bacmp($y); ok 853 - $x = Math::BigRat::Subclass->new("1/3"); $y = Math::BigRat::Subclass->new("2/3"); $x->bacmp($y); ok 854 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("1/3"); $x->bacmp($y); ok 855 - $x = Math::BigRat::Subclass->new("2/3"); $y = Math::BigRat::Subclass->new("2/3"); $x->bacmp($y); ok 856 - $x = Math::BigRat::Subclass->new("NaN"); $x->numerator()->bstr(); ok 857 - $x = Math::BigRat::Subclass->new("inf"); $x->numerator()->bstr(); ok 858 - $x = Math::BigRat::Subclass->new("-inf"); $x->numerator()->bstr(); ok 859 - $x = Math::BigRat::Subclass->new("3/7"); $x->numerator()->bstr(); ok 860 - $x = Math::BigRat::Subclass->new("-3/7"); $x->numerator()->bstr(); ok 861 - $x = Math::BigRat::Subclass->new("0"); $x->numerator()->bstr(); ok 862 - $x = Math::BigRat::Subclass->new("1"); $x->numerator()->bstr(); ok 863 - $x = Math::BigRat::Subclass->new("5/-3"); $x->numerator()->bstr(); ok 864 - $x = Math::BigRat::Subclass->new("NaN"); $x->denominator()->bstr(); ok 865 - $x = Math::BigRat::Subclass->new("inf"); $x->denominator()->bstr(); ok 866 - $x = Math::BigRat::Subclass->new("-inf"); $x->denominator()->bstr(); ok 867 - $x = Math::BigRat::Subclass->new("3/7"); $x->denominator()->bstr(); ok 868 - $x = Math::BigRat::Subclass->new("0"); $x->denominator()->bstr(); ok 869 - $x = Math::BigRat::Subclass->new("1/1"); $x->denominator()->bstr(); ok 870 - $x = Math::BigRat::Subclass->new("-1/1"); $x->denominator()->bstr(); ok 871 - $x = Math::BigRat::Subclass->new("-3/7"); $x->denominator()->bstr(); ok 872 - $x = Math::BigRat::Subclass->new("4/-5"); $x->denominator()->bstr(); ok 873 - $x = Math::BigRat::Subclass->new("3/2"); ++$x; ok 874 - $x = Math::BigRat::Subclass->new("-15/6"); ++$x; ok 875 - $x = Math::BigRat::Subclass->new("NaN"); ++$x; ok 876 - $x = Math::BigRat::Subclass->new("-1/3"); ++$x; ok 877 - $x = Math::BigRat::Subclass->new("-2/7"); ++$x; ok 878 - $x = Math::BigRat::Subclass->new("15/6"); --$x; ok 879 - $x = Math::BigRat::Subclass->new("-3/2"); --$x; ok 880 - $x = Math::BigRat::Subclass->new("1/3"); --$x; ok 881 - $x = Math::BigRat::Subclass->new("2/7"); --$x; ok 882 - $x = Math::BigRat::Subclass->new("NaN"); --$x; ok 883 - $x = Math::BigRat::Subclass->new("-1"); $x = log($x); ok 884 - $x = Math::BigRat::Subclass->new("0"); $x = log($x); ok 885 - $x = Math::BigRat::Subclass->new("1"); $x = log($x); ok 886 - $x = Math::BigRat::Subclass->new("34803"); $x = log($x); ok 887 - $x = Math::BigRat::Subclass->new("-inf"); $x = log($x); ok 888 - $x = Math::BigRat::Subclass->new("inf"); $x = log($x); ok 889 - $x = Math::BigRat::Subclass->new("NaN"); $x = log($x); ok 890 - $x = Math::BigInt->new(1200); $y = Math::BigRat::Subclass->new($x); 1200 ok 891 - $x = Math::BigInt->new(1200); $y = Math::BigRat::Subclass->new($x); 1200 ok 892 - $x = Math::BigRat::Subclass->new(2); $x->bzero(); $x->{accuracy} ok 893 - $x = Math::BigRat::Subclass->new(2); $x->bzero(); $x->{precision} ok 894 - $x = Math::BigRat::Subclass->new(2); $x->binf(); $x->{accuracy} ok 895 - $x = Math::BigRat::Subclass->new(2); $x->binf(); $x->{precision} ok 896 - $x = Math::BigRat::Subclass->new(2); $x->bone(); $x->{accuracy} ok 897 - $x = Math::BigRat::Subclass->new(2); $x->bone(); $x->{precision} ok 898 - $x = Math::BigRat::Subclass->new(2); $x->bnan(); $x->{accuracy} ok 899 - $x = Math::BigRat::Subclass->new(2); $x->bnan(); $x->{precision} ok 900 - $ms has custom attribute \$ms->{_custom} ok 901 - An object of class 'Math::BigRat::Subclass' isa 'Math::BigRat' ok 902 - $ms is 46 ok 903 - $ms has custom attribute $ms->{_custom} ok 904 - $ms is not an object of class 'Math::BigRat::Subclass' ok 905 - Math::BigRat::Subclass gets 'accuracy' from parent ok 906 - Math::BigRat::Subclass gets 'precision' from parent ok 907 - Math::BigRat::Subclass gets 'div_scale' from parent ok 908 - Math::BigRat::Subclass gets 'round_mode' from parent ok t/sub_mif.t ................... 1..712 ok 1 - ${"Math::BigInt::Subclass::accuracy"} ok 2 - ${"Math::BigInt::Subclass::precision"} ok 3 - Math::BigInt::Subclass->accuracy() ok 4 - Math::BigInt::Subclass->precision() ok 5 - ${"Math::BigInt::Subclass::div_scale"} ok 6 - ${"Math::BigInt::Subclass::round_mode"} ok 7 - Math::BigInt::Subclass->round_mode() ok 8 - ${"Math::BigFloat::Subclass::accuracy"} ok 9 - ${"Math::BigFloat::Subclass::precision"} ok 10 - Math::BigFloat::Subclass->precision() ok 11 - Math::BigFloat::Subclass->precision() ok 12 - ${"Math::BigFloat::Subclass::div_scale"} ok 13 - ${"Math::BigFloat::Subclass::round_mode"} ok 14 - Math::BigFloat::Subclass->round_mode() ok 15 - Math::BigInt::Subclass->accuracy() ok 16 - Math::BigInt::Subclass->precision() ok 17 - Math::BigInt::Subclass->round_mode() ok 18 - Math::BigInt::Subclass->div_scale() ok 19 - Math::BigInt::Subclass->div_scale(20) ok 20 - Math::BigInt::Subclass->div_scale() ok 21 - Math::BigInt::Subclass->round_mode("odd") ok 22 - Math::BigInt::Subclass->round_mode() ok 23 - Math::BigInt::Subclass->accuracy(2) ok 24 - Math::BigInt::Subclass->accuracy() ok 25 - Math::BigInt::Subclass->accuracy(undef) ok 26 - Math::BigInt::Subclass->precision(2) ok 27 - Math::BigInt::Subclass->precision(-2) ok 28 - Math::BigInt::Subclass->precision() ok 29 - Math::BigInt::Subclass->precision(undef) ok 30 - Math::BigFloat::Subclass->accuracy() ok 31 - Math::BigFloat::Subclass->precision() ok 32 - Math::BigFloat::Subclass->round_mode() ok 33 - Math::BigFloat::Subclass->div_scale() ok 34 - Math::BigFloat::Subclass->div_scale(20) ok 35 - Math::BigFloat::Subclass->div_scale() ok 36 - Math::BigFloat::Subclass->round_mode("odd") ok 37 - Math::BigFloat::Subclass->round_mode() ok 38 - Math::BigFloat::Subclass->accuracy(2) ok 39 - Math::BigFloat::Subclass->accuracy() ok 40 - Math::BigFloat::Subclass->accuracy(undef) ok 41 - Math::BigFloat::Subclass->precision(2) ok 42 - Math::BigFloat::Subclass->precision(-2) ok 43 - Math::BigFloat::Subclass->precision() ok 44 - Math::BigFloat::Subclass->precision(undef) ok 45 - ${"Math::BigFloat::Subclass::accuracy"} = 5 ok 46 - ${"Math::BigInt::Subclass::accuracy"} = 5 ok 47 - ${"Math::BigFloat::Subclass::accuracy"} = 42 ok 48 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 49 - ${"Math::BigFloat::Subclass::accuracy"} = -1 ok 50 - ${"Math::BigInt::Subclass::accuracy"} = -1 ok 51 - ${"Math::BigFloat::Subclass::accuracy"} = 0 ok 52 - ${"Math::BigInt::Subclass::accuracy"} = 0 ok 53 - ${"Math::BigFloat::Subclass::accuracy"} = undef ok 54 - ${"Math::BigInt::Subclass::accuracy"} = undef ok 55 - ${"Math::BigFloat::Subclass::precision"} = 5 ok 56 - ${"Math::BigInt::Subclass::precision"} = 5 ok 57 - ${"Math::BigFloat::Subclass::precision"} = 42 ok 58 - ${"Math::BigInt::Subclass::precision"} = 42 ok 59 - ${"Math::BigFloat::Subclass::precision"} = -1 ok 60 - ${"Math::BigInt::Subclass::precision"} = -1 ok 61 - ${"Math::BigFloat::Subclass::precision"} = 0 ok 62 - ${"Math::BigInt::Subclass::precision"} = 0 ok 63 - ${"Math::BigFloat::Subclass::precision"} = undef ok 64 - ${"Math::BigInt::Subclass::precision"} = undef ok 65 - ${"Math::BigFloat::Subclass::div_scale"} = 5 ok 66 - ${"Math::BigInt::Subclass::div_scale"} = 5 ok 67 - ${"Math::BigFloat::Subclass::div_scale"} = 42 ok 68 - ${"Math::BigInt::Subclass::div_scale"} = 42 ok 69 - ${"Math::BigFloat::Subclass::div_scale"} = 1 ok 70 - ${"Math::BigInt::Subclass::div_scale"} = 1 ok 71 - ${"Math::BigFloat::Subclass::round_mode"} = "odd" ok 72 - ${"Math::BigInt::Subclass::round_mode"} = "odd" ok 73 - ${"Math::BigFloat::Subclass::round_mode"} = "even" ok 74 - ${"Math::BigInt::Subclass::round_mode"} = "even" ok 75 - ${"Math::BigFloat::Subclass::round_mode"} = "zero" ok 76 - ${"Math::BigInt::Subclass::round_mode"} = "zero" ok 77 - ${"Math::BigFloat::Subclass::round_mode"} = "trunc" ok 78 - ${"Math::BigInt::Subclass::round_mode"} = "trunc" ok 79 - ${"Math::BigFloat::Subclass::round_mode"} = "+inf" ok 80 - ${"Math::BigInt::Subclass::round_mode"} = "+inf" ok 81 - ${"Math::BigFloat::Subclass::round_mode"} = "-inf" ok 82 - ${"Math::BigInt::Subclass::round_mode"} = "-inf" ok 83 - ${"Math::BigFloat::Subclass::round_mode"} ok 84 - ${"Math::BigInt::Subclass::round_mode"} ok 85 - $x->accuracy() ok 86 - $x->accuracy(5) ok 87 - $x->accuracy(undef) ok 88 - $x->precision() ok 89 - $x->precision(5) ok 90 - $x->precision(undef) ok 91 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 92 - ${"Math::BigFloat::Subclass::accuracy"} = 64 ok 93 - ${"Math::BigInt::Subclass::accuracy"} = 42 ok 94 - ${"Math::BigFloat::Subclass::accuracy"} = 64 ok 95 - Math::BigInt::Subclass->new(123456) = 123500 ok 96 - Math::BigInt::Subclass->new(123456) = 123000 ok 97 - Math::BigFloat::Subclass->new("123.456") = 123.5 ok 98 - Math::BigFloat::Subclass->new("123.456") = 123.5 ok 99 - Math::BigFloat::Subclass->new("123.456") = 123.456 ok 100 - $x = Math::BigFloat::Subclass->new("123.456"); $x->accuracy(4) ok 101 - $x = Math::BigFloat::Subclass->new("123.456"); $x->precision(-2) ok 102 - $x = Math::BigInt::Subclass->new(123456); $x->accuracy(4) ok 103 - $x = Math::BigInt::Subclass->new(123456); $x->precision(2) ok 104 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(5) ok 105 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(4) ok 106 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(5, 2) ok 107 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(undef, -2) ok 108 - $x = Math::BigFloat::Subclass->new("123.456"); $x->copy()->round(undef, 2) ok 109 - $x = Math::BigInt::Subclass->new("123"); $x->round(5, 2) ok 110 - $x = Math::BigFloat::Subclass->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 111 - $x = Math::BigFloat::Subclass->new("123.4567"); $y = $x->copy()->bround() ok 112 - $y = $x->copy()->round(5); $y->accuracy() ok 113 - $y = $x->copy()->round(5); $y->precision() ok 114 - $y = $x->copy()->round(undef, 2); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 116 - $x = $mbf->new("123.4567") ok 117 - $x->accuracy(4) ok 118 - $x->precision(-2) ok 119 - $x->accuracy() ok 120 - $x = $mbf->new("123.4567") ok 121 - $x->precision(-2) ok 122 - $x->accuracy(4) ok 123 - $x->precision() ok 124 - $z = $x->copy(); $z->accuracy() ok 125 - $z = $x->copy(); $z->precision() ok 126 - $x->copy()->bdiv(3, 4) ok 127 - $x->copy()->bdiv(3, 8) ok 128 - $x->copy()->bdiv(3, 16) ok 129 - $x->copy()->bdiv(3, 32) ok 130 - $x = Math::BigInt::Subclass->bzero(); $x->accuracy(5); $x->{accuracy} ok 131 - $x = Math::BigInt::Subclass->bzero(); $x->precision(5); $x->{precision} ok 132 - $x = Math::BigInt::Subclass->new(0); $x->accuracy(5); $x->{accuracy} ok 133 - $x = Math::BigInt::Subclass->new(0); $x->precision(5); $x->{precision} ok 134 - $x = Math::BigInt::Subclass->bzero(); $x->round(5); $x->{accuracy} ok 135 - $x = Math::BigInt::Subclass->bzero(); $x->round(undef, 5); $x->{precision} ok 136 - $x = Math::BigInt::Subclass->new(0); $x->round(5); $x->{accuracy} ok 137 - $x = Math::BigInt::Subclass->new(0); $x->round(undef, 5); $x->{precision} ok 138 - $x = Math::BigInt::Subclass->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 139 - $x = Math::BigFloat::Subclass->bzero(); $x->accuracy(5); $x->{accuracy} ok 140 - $x = Math::BigFloat::Subclass->bzero(); $x->precision(5); $x->{precision} ok 141 - $x = Math::BigFloat::Subclass->new(0); $x->accuracy(5); $x->{accuracy} ok 142 - $x = Math::BigFloat::Subclass->new(0); $x->precision(5); $x->{precision} ok 143 - $x = Math::BigFloat::Subclass->bzero(); $x->round(5); $x->{accuracy} ok 144 - $x = Math::BigFloat::Subclass->bzero(); $x->round(undef, 5); $x->{precision} ok 145 - $x = Math::BigFloat::Subclass->new(0); $x->round(5); $x->{accuracy} ok 146 - $x = Math::BigFloat::Subclass->new(0); $x->round(undef, 5); $x->{precision} ok 147 - $x = Math::BigFloat::Subclass->bzero(); $x->{accuracy} = 3; $x->round(5); $x->{accuracy} ok 148 - Math::BigInt::Subclass->new(123)->badd(123) ok 149 - Math::BigInt::Subclass->badd(123, 321) ok 150 - Math::BigInt::Subclass->badd(123, Math::BigInt::Subclass->new(321)) ok 151 - Math::BigInt::Subclass->new(123)->bsub(122) ok 152 - Math::BigInt::Subclass->bsub(321, 123) ok 153 - Math::BigInt::Subclass->bsub(321, Math::BigInt::Subclass->new(123)) ok 154 - Math::BigInt::Subclass->new(123)->bmul(123) ok 155 - Math::BigInt::Subclass->bmul(123, 123) ok 156 - Math::BigInt::Subclass->bmul(123, Math::BigInt::Subclass->new(123)) ok 157 - Math::BigInt::Subclass->new(15131)->bmod(123) ok 158 - Math::BigInt::Subclass->bmod(15131, 123) ok 159 - Math::BigInt::Subclass->bmod(15131, Math::BigInt::Subclass->new(123)) ok 160 - Math::BigInt::Subclass->new(2)->bpow(16) ok 161 - Math::BigInt::Subclass->bpow(2, 16) ok 162 - Math::BigInt::Subclass->bpow(2, Math::BigInt::Subclass->new(16)) ok 163 - Math::BigInt::Subclass->new(2**15)->brsft(1) ok 164 - Math::BigInt::Subclass->brsft(2**15, 1) ok 165 - Math::BigInt::Subclass->brsft(2**15, Math::BigInt::Subclass->new(1)) ok 166 - Math::BigInt::Subclass->new(2**13)->blsft(1) ok 167 - Math::BigInt::Subclass->blsft(2**13, 1) ok 168 - Math::BigInt::Subclass->blsft(2**13, Math::BigInt::Subclass->new(1)) ok 169 - Math::BigFloat::Subclass->new(123)->badd(123) ok 170 - Math::BigFloat::Subclass->badd(123, 321) ok 171 - Math::BigFloat::Subclass->badd(123, Math::BigFloat::Subclass->new(321)) ok 172 - Math::BigFloat::Subclass->new(123)->bsub(122) ok 173 - Math::BigFloat::Subclass->bsub(321, 123) ok 174 - Math::BigFloat::Subclass->bsub(321, Math::BigFloat::Subclass->new(123)) ok 175 - Math::BigFloat::Subclass->new(123)->bmul(123) ok 176 - Math::BigFloat::Subclass->bmul(123, 123) ok 177 - Math::BigFloat::Subclass->bmul(123, Math::BigFloat::Subclass->new(123)) ok 178 - Math::BigFloat::Subclass->new(15131)->bmod(123) ok 179 - Math::BigFloat::Subclass->bmod(15131, 123) ok 180 - Math::BigFloat::Subclass->bmod(15131, Math::BigFloat::Subclass->new(123)) ok 181 - Math::BigFloat::Subclass->new(2)->bpow(16) ok 182 - Math::BigFloat::Subclass->bpow(2, 16) ok 183 - Math::BigFloat::Subclass->bpow(2, Math::BigFloat::Subclass->new(16)) ok 184 - Math::BigFloat::Subclass->new(2**15)->brsft(1) ok 185 - Math::BigFloat::Subclass->brsft(2**15, 1) ok 186 - Math::BigFloat::Subclass->brsft(2**15, Math::BigFloat::Subclass->new(1)) ok 187 - Math::BigFloat::Subclass->new(2**13)->blsft(1) ok 188 - Math::BigFloat::Subclass->blsft(2**13, 1) ok 189 - Math::BigFloat::Subclass->blsft(2**13, Math::BigFloat::Subclass->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{accuracy} ok 209 - $x->bdiv($y) ok 210 - $x->{accuracy} ok 211 - $x->bdiv($y) ok 212 - $x->{accuracy} ok 213 - $x->bdiv($y) ok 214 - $x->{accuracy} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{accuracy} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt::Subclass->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt::Subclass->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt::Subclass->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat::Subclass" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat::Subclass" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat::Subclass" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{accuracy} ok 253 - $x->bdiv($y) ok 254 - $x->{accuracy} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{accuracy} = 4 ok 260 - $y->{accuracy} = 4 ok 261 - $x->{precision} = undef ok 262 - $y->{precision} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{precision} = -2 ok 265 - $y->{precision} = -2 ok 266 - $x->{accuracy} = undef ok 267 - $y->{accuracy} = undef ok 268 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 269 - $x = "1.000" ok 270 - $x->{accuracy} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{accuracy} = 3 ok 274 - $x = "1230" # bround(n) should set accuracy ok 275 - $x = "1200" ok 276 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 277 - $x = "12300" ok 278 - $x->{accuracy} = 4 # bround(-n) should set accuracy ok 279 - $x = "12000" ok 280 - $x->{accuracy} = 3 # bround(-n) should set accuracy ok 281 - $x = "10000" ok 282 - $x->{accuracy} = 2 # bround(-n) should set accuracy ok 283 - $x = "0" ok 284 - $x->{accuracy} = 1 # bround(-n) should be no-op if n too big ok 285 - $x = "0" ok 286 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 287 - $x = "100000" ok 288 - $x->{accuracy} = 0 # bround(-n) should be no-op if n too big ok 289 - $x = "100000" ok 290 - $x->{accuracy} = 0 # bround(n) should set accuracy ok 291 - $x = "12345" ok 292 - $x->{accuracy} = 5 # bround(n) should set accuracy ok 293 - $x = "12345" ok 294 - $x = "0.01" ok 295 - $x = "0.00" ok 296 - $x = "0.00" ok 297 - $x = "12340" ok 298 - $x = "12340" # MBI::bfround should clear A for negative P ok 299 - $x->{accuracy} = undef # test that bfround() and bround() work with large numbers ok 300 - $x = "0.000176118351532229658330398027474462839027826699542092286016203" ok 301 - $x = "0.000176118351532229658330398027474462839027826699542092286016202888340965128566396618527651" ok 302 - $x = "0.00017611835153222965833039802747446283902782669954209228601620288834096512856639662" # rounding with already set precision/accuracy ok 303 - $x = "1.00000" # further rounding down ok 304 - $x->bfround(-2) = "1.00" ok 305 - $x->{precision} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{accuracy} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{accuracy} = 2 # mantissa/exponent format and A/P ok 310 - $x = "12350" ok 311 - $x->{accuracy} = 4 ok 312 - $x->{precision} = undef # check for no A/P in case of fallback result ok 313 - $x->{accuracy} = undef ok 314 - $x->{precision} = undef # result & remainder ok 315 - $x->{accuracy} = undef ok 316 - $x->{precision} = undef ok 317 - $y->{accuracy} = undef ok 318 - $y->{precision} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x = Math::BigInt::Subclass->new(2)->bzero(); $x->{accuracy} ok 348 - $x = Math::BigInt::Subclass->new(2)->bzero(); $x->{precision} ok 349 - $x = Math::BigInt::Subclass->new(2)->bone(); $x->{accuracy} ok 350 - $x = Math::BigInt::Subclass->new(2)->bone(); $x->{precision} ok 351 - $x = Math::BigInt::Subclass->new(2)->binf(); $x->{accuracy} ok 352 - $x = Math::BigInt::Subclass->new(2)->binf(); $x->{precision} ok 353 - $x = Math::BigInt::Subclass->new(2)->bnan(); $x->{accuracy} ok 354 - $x = Math::BigInt::Subclass->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 355 - $x = Math::BigInt::Subclass->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 356 - $x = Math::BigInt::Subclass->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 357 - $x = Math::BigInt::Subclass->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 358 - $x = Math::BigInt::Subclass->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 359 - $x = Math::BigInt::Subclass->new(2, 1); $x->{accuracy} ok 360 - $x = Math::BigInt::Subclass->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 361 - $x = Math::BigInt::Subclass->new(2, undef, 1); $x->{accuracy} ok 362 - $x = Math::BigInt::Subclass->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 363 - $x = Math::BigInt::Subclass->new(2, 1)->bzero(); $x->{accuracy} ok 364 - $x = Math::BigInt::Subclass->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 365 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bzero(); $x->{accuracy} ok 366 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 367 - $x = Math::BigInt::Subclass->new(2, 1)->bone(); $x->{accuracy} ok 368 - $x = Math::BigInt::Subclass->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 369 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bone(); $x->{accuracy} ok 370 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 371 - $x = Math::BigInt::Subclass->new(2); $x->{accuracy} ok 372 - $x = Math::BigInt::Subclass->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 373 - $x = Math::BigInt::Subclass->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 374 - $x = Math::BigInt::Subclass->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 375 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 376 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 377 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 378 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 379 - $x = Math::BigInt::Subclass->new(2);$x->bzero(2, undef); $x->{accuracy} ok 380 - $x = Math::BigInt::Subclass->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 381 - $x = Math::BigInt::Subclass->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 382 - $x = Math::BigInt::Subclass->new(2); $x->bzero(undef, 2); $x->{precision} ok 383 - $x = Math::BigFloat::Subclass->new(2)->bzero(); $x->{accuracy} ok 384 - $x = Math::BigFloat::Subclass->new(2)->bzero(); $x->{precision} ok 385 - $x = Math::BigFloat::Subclass->new(2)->bone(); $x->{accuracy} ok 386 - $x = Math::BigFloat::Subclass->new(2)->bone(); $x->{precision} ok 387 - $x = Math::BigFloat::Subclass->new(2)->binf(); $x->{accuracy} ok 388 - $x = Math::BigFloat::Subclass->new(2)->binf(); $x->{precision} ok 389 - $x = Math::BigFloat::Subclass->new(2)->bnan(); $x->{accuracy} ok 390 - $x = Math::BigFloat::Subclass->new(2)->bnan(); $x->{precision} # Verify that bnan() does not delete/undefine accuracy and precision. ok 391 - $x = Math::BigFloat::Subclass->new(2); $x->{accuracy} = 1; $x->bnan(); $x->{accuracy} ok 392 - $x = Math::BigFloat::Subclass->new(2); $x->{precision} = 1; $x->bnan(); $x->{precision} # Verify that binf() does not delete/undefine accuracy and precision. ok 393 - $x = Math::BigFloat::Subclass->new(2); $x->{accuracy} = 1; $x->binf(); $x->{accuracy} ok 394 - $x = Math::BigFloat::Subclass->new(2); $x->{precision} = 1; $x->binf(); $x->{precision} # Verify that accuracy can be set as argument to new(). ok 395 - $x = Math::BigFloat::Subclass->new(2, 1); $x->{accuracy} ok 396 - $x = Math::BigFloat::Subclass->new(2, 1); $x->{precision} # Verify that precision can be set as argument to new(). ok 397 - $x = Math::BigFloat::Subclass->new(2, undef, 1); $x->{accuracy} ok 398 - $x = Math::BigFloat::Subclass->new(2, undef, 1); $x->{precision} # Verify that accuracy set with new() is preserved after calling bzero(). ok 399 - $x = Math::BigFloat::Subclass->new(2, 1)->bzero(); $x->{accuracy} ok 400 - $x = Math::BigFloat::Subclass->new(2, 1)->bzero(); $x->{precision} # Verify that precision set with new() is preserved after calling bzero(). ok 401 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bzero(); $x->{accuracy} ok 402 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bzero(); $x->{precision} # Verify that accuracy set with new() is preserved after calling bone(). ok 403 - $x = Math::BigFloat::Subclass->new(2, 1)->bone(); $x->{accuracy} ok 404 - $x = Math::BigFloat::Subclass->new(2, 1)->bone(); $x->{precision} # Verify that precision set with new() is preserved after calling bone(). ok 405 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bone(); $x->{accuracy} ok 406 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bone(); $x->{precision} # Verify that accuracy can be set with instance method bone('+'). ok 407 - $x = Math::BigFloat::Subclass->new(2); $x->{accuracy} ok 408 - $x = Math::BigFloat::Subclass->new(2); $x->{precision} # Verify that precision can be set with instance method bone('+'). ok 409 - $x = Math::BigFloat::Subclass->new(2); $x->bone('+', undef, 2); $x->{accuracy} ok 410 - $x = Math::BigFloat::Subclass->new(2); $x->bone('+', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bone('-'). ok 411 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', 2, undef); $x->{accuracy} ok 412 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', 2, undef); $x->{precision} # Verify that precision can be set with instance method bone('-'). ok 413 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', undef, 2); $x->{accuracy} ok 414 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', undef, 2); $x->{precision} # Verify that accuracy can be set with instance method bzero(). ok 415 - $x = Math::BigFloat::Subclass->new(2);$x->bzero(2, undef); $x->{accuracy} ok 416 - $x = Math::BigFloat::Subclass->new(2);$x->bzero(2, undef); $x->{precision} # Verify that precision can be set with instance method bzero(). ok 417 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(undef, 2); $x->{accuracy} ok 418 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(undef, 2); $x->{precision} # Verify that class accuracy is copied into new objects. ok 419 - Math::BigInt::Subclass->accuracy(3); $x = Math::BigInt::Subclass->bzero(); $x->accuracy() ok 420 - Math::BigInt::Subclass->accuracy(3); $x = Math::BigInt::Subclass->bone(); $x->accuracy() ok 421 - Math::BigInt::Subclass->accuracy(3); $x = Math::BigInt::Subclass->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 422 - Math::BigInt::Subclass->precision(-4); $x = Math::BigInt::Subclass->bzero(); $x->precision() ok 423 - Math::BigInt::Subclass->precision(-4); $x = Math::BigInt::Subclass->bone(); $x->precision() ok 424 - Math::BigInt::Subclass->precision(-4); $x = Math::BigInt::Subclass->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 425 - Math::BigInt::Subclass->accuracy(2); $x = Math::BigInt::Subclass->bzero(5); $x->accuracy() ok 426 # skip 1 ok 427 - Math::BigInt::Subclass->accuracy(2); $x = Math::BigInt::Subclass->bone("+", 5); $x->accuracy() ok 428 # skip 1 ok 429 - Math::BigInt::Subclass->accuracy(2); $x = Math::BigInt::Subclass->new(2, 5); $x->accuracy() ok 430 # skip 1 # Verify that setting precision as method argument overrides class variable ok 431 - Math::BigInt::Subclass->precision(-2); $x = Math::BigInt::Subclass->bzero(undef, -6); $x->precision() ok 432 # skip 1 ok 433 - Math::BigInt::Subclass->precision(-2); $x = Math::BigInt::Subclass->bone("+", undef, -6); $x->precision() ok 434 # skip 1 ok 435 - Math::BigInt::Subclass->precision(-2); $x = Math::BigInt::Subclass->new(2, undef, -6); $x->precision() ok 436 # skip 1 # Verify that class accuracy is copied into new objects. ok 437 - Math::BigFloat::Subclass->accuracy(3); $x = Math::BigFloat::Subclass->bzero(); $x->accuracy() ok 438 - Math::BigFloat::Subclass->accuracy(3); $x = Math::BigFloat::Subclass->bone(); $x->accuracy() ok 439 - Math::BigFloat::Subclass->accuracy(3); $x = Math::BigFloat::Subclass->new(2); $x->accuracy() # Verify that class precision is copied into new objects. ok 440 - Math::BigFloat::Subclass->precision(-4); $x = Math::BigFloat::Subclass->bzero(); $x->precision() ok 441 - Math::BigFloat::Subclass->precision(-4); $x = Math::BigFloat::Subclass->bone(); $x->precision() ok 442 - Math::BigFloat::Subclass->precision(-4); $x = Math::BigFloat::Subclass->new(2); $x->precision() # Verify that setting accuracy as method argument overrides class variable ok 443 - Math::BigFloat::Subclass->accuracy(2); $x = Math::BigFloat::Subclass->bzero(5); $x->accuracy() ok 444 # skip 1 ok 445 - Math::BigFloat::Subclass->accuracy(2); $x = Math::BigFloat::Subclass->bone("+", 5); $x->accuracy() ok 446 # skip 1 ok 447 - Math::BigFloat::Subclass->accuracy(2); $x = Math::BigFloat::Subclass->new(2, 5); $x->accuracy() ok 448 # skip 1 # Verify that setting precision as method argument overrides class variable ok 449 - Math::BigFloat::Subclass->precision(-2); $x = Math::BigFloat::Subclass->bzero(undef, -6); $x->precision() ok 450 # skip 1 ok 451 - Math::BigFloat::Subclass->precision(-2); $x = Math::BigFloat::Subclass->bone("+", undef, -6); $x->precision() ok 452 # skip 1 ok 453 - Math::BigFloat::Subclass->precision(-2); $x = Math::BigFloat::Subclass->new(2, undef, -6); $x->precision() ok 454 # skip 1 ok 455 - mixing A and P creates a NaN ok 456 - $class->new(123) = "NaN" ok 457 - mixing A and P creates a NaN ok 458 - $class->new(123) = "NaN" ok 459 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->badd($y); ok 460 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bsub($y); ok 461 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bmul($y); ok 462 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bpow($y); ok 463 - my $x = Math::BigInt::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigInt::Subclass->new(12); $y->precision(-3); $x->bmod($y); ok 464 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->badd($y); ok 465 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bsub($y); ok 466 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bmul($y); ok 467 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bpow($y); ok 468 - my $x = Math::BigFloat::Subclass->new(1234); $x->accuracy(5); my $y = Math::BigFloat::Subclass->new(12); $y->precision(-3); $x->bmod($y); ok 469 - my $x = Math::BigInt::Subclass->new(1234, 5, -3); ok 470 - my $x = Math::BigInt::Subclass->bsqrt(1234, 5, -3); ok 471 - $x = 120 ok 472 - $x = 120 ok 473 - $x = 120 ok 474 - $x = 120 ok 475 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("123"); $x->badd($y); ok 476 - is a valid object ok 477 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 478 - is a valid object ok 479 - $x->{accuracy} == 3 ok 480 - $x->{precision} is undef ok 481 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("0"); $x->badd($y); ok 482 - is a valid object ok 483 - $x->{precision} == -3 ok 484 - $x->{accuracy} is undef ok 485 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(3); $x->badd($y); ok 486 - is a valid object ok 487 - $x->{accuracy} == 3 ok 488 - $x->{precision} is undef ok 489 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-3); $x->badd($y); ok 490 - is a valid object ok 491 - $x->{precision} == -3 ok 492 - $x->{accuracy} is undef ok 493 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->bmul($y); ok 494 - is a valid object ok 495 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("0"); $x->bmul($y); ok 496 - is a valid object ok 497 - $x->{accuracy} == 3 ok 498 - $x->{precision} is undef ok 499 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("0"); $x->bmul($y); ok 500 - is a valid object ok 501 - $x->{precision} == -3 ok 502 - $x->{accuracy} is undef ok 503 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(3); $x->bmul($y); ok 504 - is a valid object ok 505 - $x->{accuracy} == 3 ok 506 - $x->{precision} is undef ok 507 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-3); $x->bmul($y); ok 508 - is a valid object ok 509 - $x->{precision} == -3 ok 510 - $x->{accuracy} is undef ok 511 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("1"); $x->bmul($y); ok 512 - is a valid object ok 513 - $x->{accuracy} == 3 ok 514 - $x->{precision} is undef ok 515 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-3); $y = Math::BigInt::Subclass->new("1"); $x->bmul($y); ok 516 - is a valid object ok 517 - $x->{precision} == -3 ok 518 - $x->{accuracy} is undef ok 519 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->accuracy(3); $x->bmul($y); ok 520 - is a valid object ok 521 - $x->{accuracy} == 3 ok 522 - $x->{precision} is undef ok 523 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->precision(-3); $x->bmul($y); ok 524 - is a valid object ok 525 - $x->{precision} == -3 ok 526 - $x->{accuracy} is undef ok 527 - $x = Math::BigInt::Subclass->new("1"); $x->accuracy(3); $y = Math::BigInt::Subclass->new("123"); $x->bmul($y); ok 528 - is a valid object ok 529 - $x->{accuracy} == 3 ok 530 - $x->{precision} is undef ok 531 - $x = Math::BigInt::Subclass->new("1"); $x->precision(-3); $y = Math::BigInt::Subclass->new("123"); $x->bmul($y); ok 532 - is a valid object ok 533 - $x->{precision} == -3 ok 534 - $x->{accuracy} is undef ok 535 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->accuracy(3); $x->bmul($y); ok 536 - is a valid object ok 537 - $x->{accuracy} == 3 ok 538 - $x->{precision} is undef ok 539 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->precision(-3); $x->bmul($y); ok 540 - is a valid object ok 541 - $x->{precision} == -3 ok 542 - $x->{accuracy} is undef ok 543 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 544 - is a valid object ok 545 - $x = Math::BigInt::Subclass->new("123"); $x->accuracy(4); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 546 - is a valid object ok 547 - $x->{accuracy} == 4 ok 548 - $x->{precision} is undef ok 549 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->accuracy(4); $x->bdiv($y); ok 550 - is a valid object ok 551 - $x->{accuracy} == 4 ok 552 - $x->{precision} is undef ok 553 - $x = Math::BigInt::Subclass->new("123"); $y = Math::BigInt::Subclass->new("1"); $y->precision(-4); $x->bdiv($y); ok 554 - is a valid object ok 555 - $x->{precision} == -4 ok 556 - $x->{accuracy} is undef ok 557 - $x = Math::BigInt::Subclass->new("123"); $x->precision(-4); $y = Math::BigInt::Subclass->new("1"); $x->bdiv($y); ok 558 - is a valid object ok 559 - $x->{precision} == -4 ok 560 - $x->{accuracy} is undef ok 561 - $x = Math::BigInt::Subclass->new("1"); $x->accuracy(4); $y = Math::BigInt::Subclass->new("123"); $x->bdiv($y); ok 562 - is a valid object ok 563 - $x->{accuracy} == 4 ok 564 - $x->{precision} is undef ok 565 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->accuracy(4); $x->bdiv($y); ok 566 - is a valid object ok 567 - $x->{accuracy} == 4 ok 568 - $x->{precision} is undef ok 569 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("123"); $y->precision(-4); $x->bdiv($y); ok 570 - is a valid object ok 571 - $x->{precision} == -4 ok 572 - $x->{accuracy} is undef ok 573 - $x = Math::BigInt::Subclass->new("1"); $x->precision(-4); $y = Math::BigInt::Subclass->new("123"); $x->bdiv($y); ok 574 - is a valid object ok 575 - $x->{precision} == -4 ok 576 - $x->{accuracy} is undef ok 577 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->band($y); ok 578 - is a valid object ok 579 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->band($y); ok 580 - is a valid object ok 581 - $x->{accuracy} == 1 ok 582 - $x->{precision} is undef ok 583 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->band($y); ok 584 - is a valid object ok 585 - $x->{accuracy} == 1 ok 586 - $x->{precision} is undef ok 587 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(-1); $y = Math::BigInt::Subclass->new("0"); $x->band($y); ok 588 - is a valid object ok 589 - $x->{precision} == -1 ok 590 - $x->{accuracy} is undef ok 591 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(-1); $x->band($y); ok 592 - is a valid object ok 593 - $x->{precision} == -1 ok 594 - $x->{accuracy} is undef ok 595 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->band($y); ok 596 - is a valid object ok 597 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->band($y); ok 598 - is a valid object ok 599 - $x->{accuracy} == 2 ok 600 - $x->{precision} is undef ok 601 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->accuracy(2); $x->band($y); ok 602 - is a valid object ok 603 - $x->{accuracy} == 2 ok 604 - $x->{precision} is undef ok 605 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->band($y); ok 606 - is a valid object ok 607 - $x->{precision} == 1 ok 608 - $x->{accuracy} is undef ok 609 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->band($y); ok 610 - is a valid object ok 611 - $x->{precision} == 1 ok 612 - $x->{accuracy} is undef ok 613 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bxor($y); ok 614 - is a valid object ok 615 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->bxor($y); ok 616 - is a valid object ok 617 - $x->{accuracy} == 1 ok 618 - $x->{precision} is undef ok 619 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->bxor($y); ok 620 - is a valid object ok 621 - $x->{accuracy} == 1 ok 622 - $x->{precision} is undef ok 623 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(3); $y = Math::BigInt::Subclass->new("0"); $x->bxor($y); ok 624 - is a valid object ok 625 - $x->{precision} == 3 ok 626 - $x->{accuracy} is undef ok 627 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(3); $x->bxor($y); ok 628 - is a valid object ok 629 - $x->{precision} == 3 ok 630 - $x->{accuracy} is undef ok 631 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->bxor($y); ok 632 - is a valid object ok 633 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->bxor($y); ok 634 - is a valid object ok 635 - $x->{accuracy} == 2 ok 636 - $x->{precision} is undef ok 637 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->accuracy(2); $x->bxor($y); ok 638 - is a valid object ok 639 - $x->{accuracy} == 2 ok 640 - $x->{precision} is undef ok 641 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->bxor($y); ok 642 - is a valid object ok 643 - $x->{precision} == 1 ok 644 - $x->{accuracy} is undef ok 645 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->bxor($y); ok 646 - is a valid object ok 647 - $x->{precision} == 1 ok 648 - $x->{accuracy} is undef ok 649 - $x = Math::BigInt::Subclass->new("0xFF"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFFF"); $x->bxor($y); ok 650 - is a valid object ok 651 - $x->{accuracy} == 2 ok 652 - $x->{precision} is undef ok 653 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFFF"); $y->accuracy(2); $x->bxor($y); ok 654 - is a valid object ok 655 - $x->{accuracy} == 2 ok 656 - $x->{precision} is undef ok 657 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(2); $y = Math::BigInt::Subclass->new("0xFFF"); $x->bxor($y); ok 658 - is a valid object ok 659 - $x->{precision} == 2 ok 660 - $x->{accuracy} is undef ok 661 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFFF"); $y->precision(2); $x->bxor($y); ok 662 - is a valid object ok 663 - $x->{precision} == 2 ok 664 - $x->{accuracy} is undef ok 665 - $x = Math::BigInt::Subclass->new("1"); $y = Math::BigInt::Subclass->new("3"); $x->bior($y); ok 666 - is a valid object ok 667 - $x = Math::BigInt::Subclass->new("1234"); $x->accuracy(1); $y = Math::BigInt::Subclass->new("0"); $x->bior($y); ok 668 - is a valid object ok 669 - $x->{accuracy} == 1 ok 670 - $x->{precision} is undef ok 671 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(1); $x->bior($y); ok 672 - is a valid object ok 673 - $x->{accuracy} == 1 ok 674 - $x->{precision} is undef ok 675 - $x = Math::BigInt::Subclass->new("1234"); $x->precision(3); $y = Math::BigInt::Subclass->new("0"); $x->bior($y); ok 676 - is a valid object ok 677 - $x->{precision} == 3 ok 678 - $x->{accuracy} is undef ok 679 - $x = Math::BigInt::Subclass->new("1234"); $y = Math::BigInt::Subclass->new("0"); $y->precision(3); $x->bior($y); ok 680 - is a valid object ok 681 - $x->{precision} == 3 ok 682 - $x->{accuracy} is undef ok 683 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0x10"); $x->bior($y); ok 684 - is a valid object ok 685 - $x = Math::BigInt::Subclass->new("250"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0xFF"); $x->bior($y); ok 686 - is a valid object ok 687 - $x->{accuracy} == 2 ok 688 - $x->{precision} is undef ok 689 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("250"); $y->accuracy(2); $x->bior($y); ok 690 - is a valid object ok 691 - $x->{accuracy} == 2 ok 692 - $x->{precision} is undef ok 693 - $x = Math::BigInt::Subclass->new("0xFF"); $x->precision(1); $y = Math::BigInt::Subclass->new("0xFF"); $x->bior($y); ok 694 - is a valid object ok 695 - $x->{precision} == 1 ok 696 - $x->{accuracy} is undef ok 697 - $x = Math::BigInt::Subclass->new("0xFF"); $y = Math::BigInt::Subclass->new("0xFF"); $y->precision(1); $x->bior($y); ok 698 - is a valid object ok 699 - $x->{precision} == 1 ok 700 - $x->{accuracy} is undef ok 701 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("3"); $x->bpow($y); ok 702 - is a valid object ok 703 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $x->bpow($y); ok 704 - is a valid object ok 705 - $x = Math::BigInt::Subclass->new("2"); $x->accuracy(2); $y = Math::BigInt::Subclass->new("0"); $x->bpow($y); ok 706 - is a valid object ok 707 - $x->{accuracy} == 2 ok 708 - $x->{precision} is undef ok 709 - $x = Math::BigInt::Subclass->new("2"); $y = Math::BigInt::Subclass->new("0"); $y->accuracy(2); $x->bpow($y); ok 710 - is a valid object ok 711 - $x->{accuracy} == 2 ok 712 - $x->{precision} is undef ok t/trap.t ...................... 1..90 ok 1 - use Math::BigInt; ok 2 - use Math::BigFloat; ok 3 - use Math::BigRat; ok 4 - Math::BigInt->can('config') ok 5 - trap_nan defaults to 0 ok 6 - trap_inf defaults to 0 ok 7 - Math::BigInt->config( trap_nan => 1 ); ok 8 - Math::BigInt->config( trap_nan => 0 ); ok 9 - Math::BigInt->config( { trap_nan => 1 } ); ok 10 - $x = Math::BigInt->new("0"); $x->bdiv(0); ok 11 - $x = Math::BigInt->new("0"); $x->bdiv(0); ok 12 - died ok 13 - $x after new() never modified ok 14 - Math::BigInt->config( trap_nan => 0 ); ok 15 - trap_inf enabled ok 16 - died ok 17 - $x after new() never modified ok 18 - died ok 19 - $x after new() never modified ok 20 - died ok 21 - $x after new() never modified ok 22 - died ok 23 - $x after new() never modified ok 24 - died ok 25 - $x after new not modified ok 26 - died ok 27 - $x after new not modified ok 28 - Math::BigFloat->can('config') ok 29 - trap_nan defaults to 0 ok 30 - trap_inf defaults to 0 ok 31 - Math::BigFloat->config( trap_nan => 1 ); ok 32 - Math::BigFloat->config( trap_nan => 0 ); ok 33 - Math::BigFloat->config( { trap_nan => 1 } ); ok 34 - $x = Math::BigFloat->new("0"); $x->bdiv(0); ok 35 - $x = Math::BigFloat->new("0"); $x->bdiv(0); ok 36 - died ok 37 - $x after new() never modified ok 38 - Math::BigFloat->config( trap_nan => 0 ); ok 39 - trap_inf enabled ok 40 - died ok 41 - $x after new() never modified ok 42 - died ok 43 - $x after new() never modified ok 44 - died ok 45 - $x after new() never modified ok 46 - died ok 47 - $x after new() never modified ok 48 - died ok 49 - $x after new not modified ok 50 - died ok 51 - $x after new not modified ok 52 - Math::BigRat->can('config') ok 53 - trap_nan defaults to 0 ok 54 - trap_inf defaults to 0 ok 55 - Math::BigRat->config( trap_nan => 1 ); ok 56 - Math::BigRat->config( trap_nan => 0 ); ok 57 - Math::BigRat->config( { trap_nan => 1 } ); ok 58 - $x = Math::BigRat->new("0"); $x->bdiv(0); ok 59 - $x = Math::BigRat->new("0"); $x->bdiv(0); ok 60 - died ok 61 - $x after new() never modified ok 62 - Math::BigRat->config( trap_nan => 0 ); ok 63 - trap_inf enabled ok 64 - died ok 65 - $x after new() never modified ok 66 - died ok 67 - $x after new() never modified ok 68 - died ok 69 - $x after new() never modified ok 70 - died ok 71 - $x after new() never modified ok 72 - died ok 73 - $x after new not modified ok 74 - died ok 75 - $x after new not modified ok 76 - never modified since it dies ok 77 - never modified since it dies ok 78 - never modified since it dies # ok 79 - $x = Math::BigRat->new("0.1a"); ok 80 - $x = Math::BigRat->new("0.1a"); ok 81 - $x = Math::BigRat->new("0.1a/7"); # ok 82 - $x = Math::BigRat->new("+inf"); ok 83 - $x = Math::BigRat->new("+inf"); ok 84 - $x = Math::BigRat->new("+inf/7"); # ok 85 - $x = Math::BigRat->new("inf"); ok 86 - $x = Math::BigRat->new("inf"); ok 87 - $x = Math::BigRat->new("inf/7"); # ok 88 - $x = Math::BigRat->new("-inf"); ok 89 - $x = Math::BigRat->new("-inf"); ok 90 - $x = Math::BigRat->new("-inf/7"); ok t/upgrade.t ................... 1..2142 ok 1 - 9/4 = 2 without upgrading ok 2 - 9/4 gives a Math::BigInt without upgrading ok 3 - 9/4 = 2.25 with upgrading ok 4 - 9/4 gives a Math::BigFloat with upgrading ok 5 - Math::BigInt->upgrade() ok 6 - Math::BigInt->downgrade() 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("100"); $y = Math::BigInt->new("3"); $x /= $y; ok 26 - is a valid object ok 27 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("2"); $x /= $y; ok 28 - is a valid object ok 29 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x |= $y; ok 30 - is a valid object ok 31 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("7"); $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("0"); $x->is_negative(); ok 36 - $x = Math::BigInt->new("-1"); $x->is_negative(); ok 37 - $x = Math::BigInt->new("1"); $x->is_negative(); ok 38 - $x = Math::BigInt->new("+inf"); $x->is_negative(); ok 39 - $x = Math::BigInt->new("-inf"); $x->is_negative(); ok 40 - $x = Math::BigInt->new("NaNneg"); $x->is_negative(); ok 41 - $x = Math::BigInt->new("0"); $x->is_positive(); ok 42 - $x = Math::BigInt->new("-1"); $x->is_positive(); ok 43 - $x = Math::BigInt->new("1"); $x->is_positive(); ok 44 - $x = Math::BigInt->new("+inf"); $x->is_positive(); ok 45 - $x = Math::BigInt->new("-inf"); $x->is_positive(); ok 46 - $x = Math::BigInt->new("NaNneg"); $x->is_positive(); ok 47 - $x = Math::BigInt->new("0"); $x->is_non_negative(); ok 48 - $x = Math::BigInt->new("-1"); $x->is_non_negative(); ok 49 - $x = Math::BigInt->new("1"); $x->is_non_negative(); ok 50 - $x = Math::BigInt->new("+inf"); $x->is_non_negative(); ok 51 - $x = Math::BigInt->new("-inf"); $x->is_non_negative(); ok 52 - $x = Math::BigInt->new("NaN"); $x->is_non_negative(); ok 53 - $x = Math::BigInt->new("0"); $x->is_non_positive(); ok 54 - $x = Math::BigInt->new("-1"); $x->is_non_positive(); ok 55 - $x = Math::BigInt->new("1"); $x->is_non_positive(); ok 56 - $x = Math::BigInt->new("+inf"); $x->is_non_positive(); ok 57 - $x = Math::BigInt->new("-inf"); $x->is_non_positive(); ok 58 - $x = Math::BigInt->new("NaN"); $x->is_non_positive(); ok 59 - $x = Math::BigInt->new("abc"); $x->is_odd(); ok 60 - $x = Math::BigInt->new("0"); $x->is_odd(); ok 61 - $x = Math::BigInt->new("1"); $x->is_odd(); ok 62 - $x = Math::BigInt->new("3"); $x->is_odd(); ok 63 - $x = Math::BigInt->new("-1"); $x->is_odd(); ok 64 - $x = Math::BigInt->new("-3"); $x->is_odd(); ok 65 - $x = Math::BigInt->new("10000001"); $x->is_odd(); ok 66 - $x = Math::BigInt->new("10000002"); $x->is_odd(); ok 67 - $x = Math::BigInt->new("2"); $x->is_odd(); ok 68 - $x = Math::BigInt->new("120"); $x->is_odd(); ok 69 - $x = Math::BigInt->new("121"); $x->is_odd(); ok 70 - $x = Math::BigInt->new("NaN"); $x->is_int(); ok 71 - $x = Math::BigInt->new("inf"); $x->is_int(); ok 72 - $x = Math::BigInt->new("-inf"); $x->is_int(); ok 73 - $x = Math::BigInt->new("1"); $x->is_int(); ok 74 - $x = Math::BigInt->new("12"); $x->is_int(); ok 75 - $x = Math::BigInt->new("123e12"); $x->is_int(); ok 76 - $x = Math::BigInt->new("abc"); $x->is_even(); ok 77 - $x = Math::BigInt->new("0"); $x->is_even(); ok 78 - $x = Math::BigInt->new("1"); $x->is_even(); ok 79 - $x = Math::BigInt->new("3"); $x->is_even(); ok 80 - $x = Math::BigInt->new("-1"); $x->is_even(); ok 81 - $x = Math::BigInt->new("-3"); $x->is_even(); ok 82 - $x = Math::BigInt->new("10000001"); $x->is_even(); ok 83 - $x = Math::BigInt->new("10000002"); $x->is_even(); ok 84 - $x = Math::BigInt->new("2"); $x->is_even(); ok 85 - $x = Math::BigInt->new("120"); $x->is_even(); ok 86 - $x = Math::BigInt->new("121"); $x->is_even(); ok 87 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-0"); $x->bacmp($y); ok 88 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 89 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x->bacmp($y); ok 90 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 91 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+2"); $x->bacmp($y); ok 92 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-1"); $x->bacmp($y); ok 93 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x->bacmp($y); ok 94 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bacmp($y); ok 95 - $x = Math::BigInt->new("+987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 96 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("+123456789"); $x->bacmp($y); ok 97 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("+4567889"); $x->bacmp($y); ok 98 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 99 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 100 - $x = Math::BigInt->new("acmpNaN"); $y = Math::BigInt->new("acmpNaN"); $x->bacmp($y); ok 101 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 102 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 103 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 104 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bacmp($y); ok 105 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 106 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("123"); $x->bacmp($y); ok 107 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 108 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-123"); $x->bacmp($y); ok 109 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 110 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bacmp($y); ok 111 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bacmp($y); ok 112 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bacmp($y); ok 113 - $x = Math::BigInt->bnorm("123"); ok 114 - is a valid object ok 115 - $x = Math::BigInt->bnorm("12.3"); ok 116 - ref($got) ok 117 - $Math::BigInt::upgrade ok 118 - is a valid object ok 119 - $x = Math::BigInt->bnorm("0babc"); ok 120 - is a valid object ok 121 - $x = Math::BigInt->bnorm("0b123"); ok 122 - is a valid object ok 123 - $x = Math::BigInt->bnorm("0b0"); ok 124 - is a valid object ok 125 - $x = Math::BigInt->bnorm("-0b0"); ok 126 - is a valid object ok 127 - $x = Math::BigInt->bnorm("-0b1"); ok 128 - is a valid object ok 129 - $x = Math::BigInt->bnorm("0b0001"); ok 130 - is a valid object ok 131 - $x = Math::BigInt->bnorm("0b001"); ok 132 - is a valid object ok 133 - $x = Math::BigInt->bnorm("0b011"); ok 134 - is a valid object ok 135 - $x = Math::BigInt->bnorm("0b101"); ok 136 - is a valid object ok 137 - $x = Math::BigInt->bnorm("0b1001"); ok 138 - is a valid object ok 139 - $x = Math::BigInt->bnorm("0b10001"); ok 140 - is a valid object ok 141 - $x = Math::BigInt->bnorm("0b100001"); ok 142 - is a valid object ok 143 - $x = Math::BigInt->bnorm("0b1000001"); ok 144 - is a valid object ok 145 - $x = Math::BigInt->bnorm("0b10000001"); ok 146 - is a valid object ok 147 - $x = Math::BigInt->bnorm("0b100000001"); ok 148 - is a valid object ok 149 - $x = Math::BigInt->bnorm("0b1000000001"); ok 150 - is a valid object ok 151 - $x = Math::BigInt->bnorm("0b10000000001"); ok 152 - is a valid object ok 153 - $x = Math::BigInt->bnorm("0b100000000001"); ok 154 - is a valid object ok 155 - $x = Math::BigInt->bnorm("0b1000000000001"); ok 156 - is a valid object ok 157 - $x = Math::BigInt->bnorm("0b10000000000001"); ok 158 - is a valid object ok 159 - $x = Math::BigInt->bnorm("0b100000000000001"); ok 160 - is a valid object ok 161 - $x = Math::BigInt->bnorm("0b1000000000000001"); ok 162 - is a valid object ok 163 - $x = Math::BigInt->bnorm("0b10000000000000001"); ok 164 - is a valid object ok 165 - $x = Math::BigInt->bnorm("0b100000000000000001"); ok 166 - is a valid object ok 167 - $x = Math::BigInt->bnorm("0b1000000000000000001"); ok 168 - is a valid object ok 169 - $x = Math::BigInt->bnorm("0b10000000000000000001"); ok 170 - is a valid object ok 171 - $x = Math::BigInt->bnorm("0b100000000000000000001"); ok 172 - is a valid object ok 173 - $x = Math::BigInt->bnorm("0b1000000000000000000001"); ok 174 - is a valid object ok 175 - $x = Math::BigInt->bnorm("0b10000000000000000000001"); ok 176 - is a valid object ok 177 - $x = Math::BigInt->bnorm("0b100000000000000000000001"); ok 178 - is a valid object ok 179 - $x = Math::BigInt->bnorm("0b1000000000000000000000001"); ok 180 - is a valid object ok 181 - $x = Math::BigInt->bnorm("0b10000000000000000000000001"); ok 182 - is a valid object ok 183 - $x = Math::BigInt->bnorm("0b100000000000000000000000001"); ok 184 - is a valid object ok 185 - $x = Math::BigInt->bnorm("0b1000000000000000000000000001"); ok 186 - is a valid object ok 187 - $x = Math::BigInt->bnorm("0b10000000000000000000000000001"); ok 188 - is a valid object ok 189 - $x = Math::BigInt->bnorm("0b100000000000000000000000000001"); ok 190 - is a valid object ok 191 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000001"); ok 192 - is a valid object ok 193 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000001"); ok 194 - is a valid object ok 195 - $x = Math::BigInt->bnorm("0b100000000000000000000000000000001"); ok 196 - is a valid object ok 197 - $x = Math::BigInt->bnorm("0b1000000000000000000000000000000001"); ok 198 - is a valid object ok 199 - $x = Math::BigInt->bnorm("0b10000000000000000000000000000000001"); ok 200 - is a valid object ok 201 - $x = Math::BigInt->bnorm("0b1_0_1"); ok 202 - is a valid object ok 203 - $x = Math::BigInt->bnorm("0b0_0_0_1"); ok 204 - is a valid object ok 205 - $x = Math::BigInt->bnorm("-0x0"); ok 206 - is a valid object ok 207 - $x = Math::BigInt->bnorm("0xabcdefgh"); ok 208 - is a valid object ok 209 - $x = Math::BigInt->bnorm("0x1234"); ok 210 - is a valid object ok 211 - $x = Math::BigInt->bnorm("0xabcdef"); ok 212 - is a valid object ok 213 - $x = Math::BigInt->bnorm("-0xABCDEF"); ok 214 - is a valid object ok 215 - $x = Math::BigInt->bnorm("-0x1234"); ok 216 - is a valid object ok 217 - $x = Math::BigInt->bnorm("0x12345678"); ok 218 - is a valid object ok 219 - $x = Math::BigInt->bnorm("0x1_2_3_4_56_78"); ok 220 - is a valid object ok 221 - $x = Math::BigInt->bnorm("0xa_b_c_d_e_f"); ok 222 - is a valid object ok 223 - $x = Math::BigInt->bnorm("0x9"); ok 224 - is a valid object ok 225 - $x = Math::BigInt->bnorm("0x11"); ok 226 - is a valid object ok 227 - $x = Math::BigInt->bnorm("0x21"); ok 228 - is a valid object ok 229 - $x = Math::BigInt->bnorm("0x41"); ok 230 - is a valid object ok 231 - $x = Math::BigInt->bnorm("0x81"); ok 232 - is a valid object ok 233 - $x = Math::BigInt->bnorm("0x101"); ok 234 - is a valid object ok 235 - $x = Math::BigInt->bnorm("0x201"); ok 236 - is a valid object ok 237 - $x = Math::BigInt->bnorm("0x401"); ok 238 - is a valid object ok 239 - $x = Math::BigInt->bnorm("0x801"); ok 240 - is a valid object ok 241 - $x = Math::BigInt->bnorm("0x1001"); ok 242 - is a valid object ok 243 - $x = Math::BigInt->bnorm("0x2001"); ok 244 - is a valid object ok 245 - $x = Math::BigInt->bnorm("0x4001"); ok 246 - is a valid object ok 247 - $x = Math::BigInt->bnorm("0x8001"); ok 248 - is a valid object ok 249 - $x = Math::BigInt->bnorm("0x10001"); ok 250 - is a valid object ok 251 - $x = Math::BigInt->bnorm("0x20001"); ok 252 - is a valid object ok 253 - $x = Math::BigInt->bnorm("0x40001"); ok 254 - is a valid object ok 255 - $x = Math::BigInt->bnorm("0x80001"); ok 256 - is a valid object ok 257 - $x = Math::BigInt->bnorm("0x100001"); ok 258 - is a valid object ok 259 - $x = Math::BigInt->bnorm("0x200001"); ok 260 - is a valid object ok 261 - $x = Math::BigInt->bnorm("0x400001"); ok 262 - is a valid object ok 263 - $x = Math::BigInt->bnorm("0x800001"); ok 264 - is a valid object ok 265 - $x = Math::BigInt->bnorm("0x1000001"); ok 266 - is a valid object ok 267 - $x = Math::BigInt->bnorm("0x2000001"); ok 268 - is a valid object ok 269 - $x = Math::BigInt->bnorm("0x4000001"); ok 270 - is a valid object ok 271 - $x = Math::BigInt->bnorm("0x8000001"); ok 272 - is a valid object ok 273 - $x = Math::BigInt->bnorm("0x10000001"); ok 274 - is a valid object ok 275 - $x = Math::BigInt->bnorm("0x20000001"); ok 276 - is a valid object ok 277 - $x = Math::BigInt->bnorm("0x40000001"); ok 278 - is a valid object ok 279 - $x = Math::BigInt->bnorm("0x80000001"); ok 280 - is a valid object ok 281 - $x = Math::BigInt->bnorm("0x100000001"); ok 282 - is a valid object ok 283 - $x = Math::BigInt->bnorm("0x200000001"); ok 284 - is a valid object ok 285 - $x = Math::BigInt->bnorm("0x400000001"); ok 286 - is a valid object ok 287 - $x = Math::BigInt->bnorm("0x800000001"); ok 288 - is a valid object ok 289 - $x = Math::BigInt->bnorm("inf"); ok 290 - is a valid object ok 291 - $x = Math::BigInt->bnorm("+inf"); ok 292 - is a valid object ok 293 - $x = Math::BigInt->bnorm("-inf"); ok 294 - is a valid object ok 295 - $x = Math::BigInt->bnorm("0inf"); ok 296 - is a valid object ok 297 - $x = Math::BigInt->bnorm(""); ok 298 - is a valid object ok 299 - $x = Math::BigInt->bnorm("abc"); ok 300 - is a valid object ok 301 - $x = Math::BigInt->bnorm(" 1 a"); ok 302 - is a valid object ok 303 - $x = Math::BigInt->bnorm("1bcd2"); ok 304 - is a valid object ok 305 - $x = Math::BigInt->bnorm("11111b"); ok 306 - is a valid object ok 307 - $x = Math::BigInt->bnorm("+1z"); ok 308 - is a valid object ok 309 - $x = Math::BigInt->bnorm("-1z"); ok 310 - is a valid object ok 311 - $x = Math::BigInt->bnorm("_123"); ok 312 - is a valid object ok 313 - $x = Math::BigInt->bnorm("_123_"); ok 314 - is a valid object ok 315 - $x = Math::BigInt->bnorm("1E_12"); ok 316 - is a valid object ok 317 - $x = Math::BigInt->bnorm("1_E_12"); ok 318 - is a valid object ok 319 - $x = Math::BigInt->bnorm("+_1E12"); ok 320 - is a valid object ok 321 - $x = Math::BigInt->bnorm("+0_1E2"); ok 322 - is a valid object ok 323 - $x = Math::BigInt->bnorm("+0_0_1E2"); ok 324 - is a valid object ok 325 - $x = Math::BigInt->bnorm("-0_0_1E2"); ok 326 - is a valid object ok 327 - $x = Math::BigInt->bnorm("-0_0_1E+0_0_2"); ok 328 - is a valid object ok 329 - $x = Math::BigInt->bnorm("E1"); ok 330 - is a valid object ok 331 - $x = Math::BigInt->bnorm("E23"); ok 332 - is a valid object ok 333 - $x = Math::BigInt->bnorm("1.23E1"); ok 334 - ref($got) ok 335 - $Math::BigInt::upgrade ok 336 - is a valid object ok 337 - $x = Math::BigInt->bnorm("1.23E-1"); ok 338 - ref($got) ok 339 - $Math::BigInt::upgrade ok 340 - is a valid object ok 341 - $x = Math::BigInt->bnorm("1e2e3"); ok 342 - is a valid object ok 343 - $x = Math::BigInt->bnorm("1e2r"); ok 344 - is a valid object ok 345 - $x = Math::BigInt->bnorm("1e2.0"); ok 346 - is a valid object ok 347 - $x = Math::BigInt->bnorm("012"); ok 348 - is a valid object ok 349 - $x = Math::BigInt->bnorm("0123"); ok 350 - is a valid object ok 351 - $x = Math::BigInt->bnorm("01234"); ok 352 - is a valid object ok 353 - $x = Math::BigInt->bnorm("012345"); ok 354 - is a valid object ok 355 - $x = Math::BigInt->bnorm("0123456"); ok 356 - is a valid object ok 357 - $x = Math::BigInt->bnorm("01234567"); ok 358 - is a valid object ok 359 - $x = Math::BigInt->bnorm("012345678"); ok 360 - is a valid object ok 361 - $x = Math::BigInt->bnorm("0123456789"); ok 362 - is a valid object ok 363 - $x = Math::BigInt->bnorm("01234567891"); ok 364 - is a valid object ok 365 - $x = Math::BigInt->bnorm("012345678912"); ok 366 - is a valid object ok 367 - $x = Math::BigInt->bnorm("0123456789123"); ok 368 - is a valid object ok 369 - $x = Math::BigInt->bnorm("01234567891234"); ok 370 - is a valid object ok 371 - $x = Math::BigInt->bnorm("0"); ok 372 - is a valid object ok 373 - $x = Math::BigInt->bnorm("+0"); ok 374 - is a valid object ok 375 - $x = Math::BigInt->bnorm("+00"); ok 376 - is a valid object ok 377 - $x = Math::BigInt->bnorm("+000"); ok 378 - is a valid object ok 379 - $x = Math::BigInt->bnorm("000000000000000000"); ok 380 - is a valid object ok 381 - $x = Math::BigInt->bnorm("-0"); ok 382 - is a valid object ok 383 - $x = Math::BigInt->bnorm("-0000"); ok 384 - is a valid object ok 385 - $x = Math::BigInt->bnorm("+1"); ok 386 - is a valid object ok 387 - $x = Math::BigInt->bnorm("+01"); ok 388 - is a valid object ok 389 - $x = Math::BigInt->bnorm("+001"); ok 390 - is a valid object ok 391 - $x = Math::BigInt->bnorm("+00000100000"); ok 392 - is a valid object ok 393 - $x = Math::BigInt->bnorm("123456789"); ok 394 - is a valid object ok 395 - $x = Math::BigInt->bnorm("-1"); ok 396 - is a valid object ok 397 - $x = Math::BigInt->bnorm("-01"); ok 398 - is a valid object ok 399 - $x = Math::BigInt->bnorm("-001"); ok 400 - is a valid object ok 401 - $x = Math::BigInt->bnorm("-123456789"); ok 402 - is a valid object ok 403 - $x = Math::BigInt->bnorm("-00000100000"); ok 404 - is a valid object ok 405 - $x = Math::BigInt->bnorm("1_2_3"); ok 406 - is a valid object ok 407 - $x = Math::BigInt->bnorm("10000000000E-1_0"); ok 408 - is a valid object ok 409 - $x = Math::BigInt->bnorm("1E2"); ok 410 - is a valid object ok 411 - $x = Math::BigInt->bnorm("1E1"); ok 412 - is a valid object ok 413 - $x = Math::BigInt->bnorm("1E0"); ok 414 - is a valid object ok 415 - $x = Math::BigInt->bnorm("1.23E2"); ok 416 - is a valid object ok 417 - $x = Math::BigInt->bnorm("100E-1"); ok 418 - is a valid object ok 419 - $x = Math::BigInt->bnorm("1.E3"); ok 420 - is a valid object ok 421 - $x = Math::BigInt->bnorm("1.01E2"); ok 422 - is a valid object ok 423 - $x = Math::BigInt->bnorm("1010E-1"); ok 424 - is a valid object ok 425 - $x = Math::BigInt->bnorm("-1010E0"); ok 426 - is a valid object ok 427 - $x = Math::BigInt->bnorm("-1010E1"); ok 428 - is a valid object ok 429 - $x = Math::BigInt->bnorm("1234.00"); ok 430 - is a valid object ok 431 - $x = Math::BigInt->bnorm("-1010E-2"); ok 432 - ref($got) ok 433 - $Math::BigInt::upgrade ok 434 - is a valid object ok 435 - $x = Math::BigInt->bnorm("-1.01E+1"); ok 436 - ref($got) ok 437 - $Math::BigInt::upgrade ok 438 - is a valid object ok 439 - $x = Math::BigInt->bnorm("-1.01E-1"); ok 440 - ref($got) ok 441 - $Math::BigInt::upgrade ok 442 - is a valid object ok 443 - $x = Math::BigInt->new("1"); $x->bnan(); ok 444 - is a valid object ok 445 - $x = Math::BigInt->new("2"); $x->bnan(); ok 446 - is a valid object ok 447 - $x = Math::BigInt->new("abc"); $x->bnan(); ok 448 - is a valid object ok 449 - $x = Math::BigInt->new("2"); $x->bone('+'); ok 450 - is a valid object ok 451 - $x = Math::BigInt->new("2"); $x->bone('-'); ok 452 - is a valid object ok 453 - $x = Math::BigInt->new("boneNaN"); $x->bone('-'); ok 454 - is a valid object ok 455 - $x = Math::BigInt->new("boneNaN"); $x->bone('+'); ok 456 - is a valid object ok 457 - $x = Math::BigInt->new("2"); $x->bone('abc'); ok 458 - is a valid object ok 459 - $x = Math::BigInt->new("3"); $x->bone(''); ok 460 - is a valid object ok 461 - $x = Math::BigInt->new("1"); $x->binf('+'); ok 462 - is a valid object ok 463 - $x = Math::BigInt->new("2"); $x->binf('-'); ok 464 - is a valid object ok 465 - $x = Math::BigInt->new("3"); $x->binf('+inf'); ok 466 - is a valid object ok 467 - $x = Math::BigInt->new("123"); $x->is_nan(); ok 468 - $x = Math::BigInt->new("abc"); $x->is_nan(); ok 469 - $x = Math::BigInt->new("NaN"); $x->is_nan(); ok 470 - $x = Math::BigInt->new("-123"); $x->is_nan(); ok 471 - $x = Math::BigInt->new("+inf"); $x->is_inf(''); ok 472 - $x = Math::BigInt->new("-inf"); $x->is_inf(''); ok 473 - $x = Math::BigInt->new("abc"); $x->is_inf(''); ok 474 - $x = Math::BigInt->new("1"); $x->is_inf(''); ok 475 - $x = Math::BigInt->new("NaN"); $x->is_inf(''); ok 476 - $x = Math::BigInt->new("-1"); $x->is_inf(''); ok 477 - $x = Math::BigInt->new("+inf"); $x->is_inf('-'); ok 478 - $x = Math::BigInt->new("+inf"); $x->is_inf('+'); ok 479 - $x = Math::BigInt->new("-inf"); $x->is_inf('-'); ok 480 - $x = Math::BigInt->new("-inf"); $x->is_inf('+'); ok 481 - $x = Math::BigInt->new("+iNfInItY"); $x->is_inf(''); ok 482 - $x = Math::BigInt->new("-InFiNiTy"); $x->is_inf(''); ok 483 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x << $y; ok 484 - is a valid object ok 485 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+2"); $x << $y; ok 486 - is a valid object ok 487 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+32"); $x << $y; ok 488 - is a valid object ok 489 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+48"); $x << $y; ok 490 - is a valid object ok 491 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("-2"); $x << $y; ok 492 - is a valid object ok 493 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("4"); $x->blsft($y, 10); ok 494 - is a valid object ok 495 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 496 - is a valid object ok 497 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->blsft($y, 10); ok 498 - is a valid object ok 499 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 500 - is a valid object ok 501 - $x = Math::BigInt->new("+12"); $y = Math::BigInt->new("2"); $x->blsft($y, 10); ok 502 - is a valid object ok 503 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->blsft($y, 10); ok 504 - is a valid object ok 505 - $x = Math::BigInt->new("1234567890123"); $y = Math::BigInt->new("12"); $x->blsft($y, 10); ok 506 - is a valid object ok 507 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x >> $y; ok 508 - is a valid object ok 509 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x >> $y; ok 510 - is a valid object ok 511 - $x = Math::BigInt->new("+4294967296"); $y = Math::BigInt->new("+32"); $x >> $y; ok 512 - is a valid object ok 513 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+48"); $x >> $y; ok 514 - is a valid object ok 515 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-2"); $x >> $y; ok 516 - is a valid object ok 517 - $x = Math::BigInt->new("-1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 518 - is a valid object ok 519 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("0"); $x->brsft($y, 10); ok 520 - is a valid object ok 521 - $x = Math::BigInt->new("+200"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 522 - is a valid object ok 523 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("3"); $x->brsft($y, 10); ok 524 - is a valid object ok 525 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("2"); $x->brsft($y, 10); ok 526 - is a valid object ok 527 - $x = Math::BigInt->new("+1234"); $y = Math::BigInt->new("-3"); $x->brsft($y, 10); ok 528 - is a valid object ok 529 - $x = Math::BigInt->new("310000"); $y = Math::BigInt->new("4"); $x->brsft($y, 10); ok 530 - is a valid object ok 531 - $x = Math::BigInt->new("12300000"); $y = Math::BigInt->new("5"); $x->brsft($y, 10); ok 532 - is a valid object ok 533 - $x = Math::BigInt->new("1230000000000"); $y = Math::BigInt->new("10"); $x->brsft($y, 10); ok 534 - is a valid object ok 535 - $x = Math::BigInt->new("09876123456789067890"); $y = Math::BigInt->new("12"); $x->brsft($y, 10); ok 536 - is a valid object ok 537 - $x = Math::BigInt->new("1234561234567890123"); $y = Math::BigInt->new("13"); $x->brsft($y, 10); ok 538 - is a valid object ok 539 - $x = Math::BigInt->new("1e+34"); $x->bsstr(); ok 540 - $x = Math::BigInt->new("123.456E3"); $x->bsstr(); ok 541 - $x = Math::BigInt->new("100"); $x->bsstr(); ok 542 - $x = Math::BigInt->new("abc"); $x->bsstr(); ok 543 - $x = Math::BigInt->new("bnegNaN"); $x->bneg(); ok 544 - is a valid object ok 545 - $x = Math::BigInt->new("+inf"); $x->bneg(); ok 546 - is a valid object ok 547 - $x = Math::BigInt->new("-inf"); $x->bneg(); ok 548 - is a valid object ok 549 - $x = Math::BigInt->new("abd"); $x->bneg(); ok 550 - is a valid object ok 551 - $x = Math::BigInt->new("0"); $x->bneg(); ok 552 - is a valid object ok 553 - $x = Math::BigInt->new("1"); $x->bneg(); ok 554 - is a valid object ok 555 - $x = Math::BigInt->new("-1"); $x->bneg(); ok 556 - is a valid object ok 557 - $x = Math::BigInt->new("+123456789"); $x->bneg(); ok 558 - is a valid object ok 559 - $x = Math::BigInt->new("-123456789"); $x->bneg(); ok 560 - is a valid object ok 561 - $x = Math::BigInt->new("babsNaN"); $x->babs(); ok 562 - is a valid object ok 563 - $x = Math::BigInt->new("+inf"); $x->babs(); ok 564 - is a valid object ok 565 - $x = Math::BigInt->new("-inf"); $x->babs(); ok 566 - is a valid object ok 567 - $x = Math::BigInt->new("0"); $x->babs(); ok 568 - is a valid object ok 569 - $x = Math::BigInt->new("1"); $x->babs(); ok 570 - is a valid object ok 571 - $x = Math::BigInt->new("-1"); $x->babs(); ok 572 - is a valid object ok 573 - $x = Math::BigInt->new("+123456789"); $x->babs(); ok 574 - is a valid object ok 575 - $x = Math::BigInt->new("-123456789"); $x->babs(); ok 576 - is a valid object ok 577 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 578 - $x = Math::BigInt->new("bcmpNaN"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 579 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("bcmpNaN"); $x->bcmp($y); ok 580 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 581 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 582 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 583 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x->bcmp($y); ok 584 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 585 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 586 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 587 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x->bcmp($y); ok 588 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x->bcmp($y); ok 589 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 590 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("12"); $x->bcmp($y); ok 591 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 592 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 593 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-12"); $x->bcmp($y); ok 594 - $x = Math::BigInt->new("-12"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 595 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("124"); $x->bcmp($y); ok 596 - $x = Math::BigInt->new("124"); $y = Math::BigInt->new("123"); $x->bcmp($y); ok 597 - $x = Math::BigInt->new("-123"); $y = Math::BigInt->new("-124"); $x->bcmp($y); ok 598 - $x = Math::BigInt->new("-124"); $y = Math::BigInt->new("-123"); $x->bcmp($y); ok 599 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("5"); $x->bcmp($y); ok 600 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x->bcmp($y); ok 601 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x->bcmp($y); ok 602 - $x = Math::BigInt->new("-987654321"); $y = Math::BigInt->new("123456789"); $x->bcmp($y); ok 603 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 604 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("5432112345"); $x->bcmp($y); ok 605 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 606 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-5432112345"); $x->bcmp($y); ok 607 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 608 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 609 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 610 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x->bcmp($y); ok 611 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 612 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 613 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 614 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 615 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 616 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("inf"); $x->bcmp($y); ok 617 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaN"); $x->bcmp($y); ok 618 - $x = Math::BigInt->new("NaN"); $y = Math::BigInt->new("-inf"); $x->bcmp($y); ok 619 - $x = Math::BigInt->new("abc"); $x->binc(); ok 620 - is a valid object ok 621 - $x = Math::BigInt->new("+inf"); $x->binc(); ok 622 - is a valid object ok 623 - $x = Math::BigInt->new("-inf"); $x->binc(); ok 624 - is a valid object ok 625 - $x = Math::BigInt->new("+0"); $x->binc(); ok 626 - is a valid object ok 627 - $x = Math::BigInt->new("+1"); $x->binc(); ok 628 - is a valid object ok 629 - $x = Math::BigInt->new("-1"); $x->binc(); ok 630 - is a valid object ok 631 - $x = Math::BigInt->new("abc"); $x->bdec(); ok 632 - is a valid object ok 633 - $x = Math::BigInt->new("+inf"); $x->bdec(); ok 634 - is a valid object ok 635 - $x = Math::BigInt->new("-inf"); $x->bdec(); ok 636 - is a valid object ok 637 - $x = Math::BigInt->new("+0"); $x->bdec(); ok 638 - is a valid object ok 639 - $x = Math::BigInt->new("+1"); $x->bdec(); ok 640 - is a valid object ok 641 - $x = Math::BigInt->new("-1"); $x->bdec(); ok 642 - is a valid object ok 643 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x + $y; ok 644 - is a valid object ok 645 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x + $y; ok 646 - is a valid object ok 647 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x + $y; ok 648 - is a valid object ok 649 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 650 - is a valid object ok 651 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 652 - is a valid object ok 653 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x + $y; ok 654 - is a valid object ok 655 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x + $y; ok 656 - is a valid object ok 657 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 658 - is a valid object ok 659 - $x = Math::BigInt->new("baddNaN"); $y = Math::BigInt->new("+inf"); $x + $y; ok 660 - is a valid object ok 661 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 662 - is a valid object ok 663 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("baddNaN"); $x + $y; ok 664 - is a valid object ok 665 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x + $y; ok 666 - is a valid object ok 667 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x + $y; ok 668 - is a valid object ok 669 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x + $y; ok 670 - is a valid object ok 671 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x + $y; ok 672 - is a valid object ok 673 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x + $y; ok 674 - is a valid object ok 675 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x + $y; ok 676 - is a valid object ok 677 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x + $y; ok 678 - is a valid object ok 679 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x + $y; ok 680 - is a valid object ok 681 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x + $y; ok 682 - is a valid object ok 683 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x + $y; ok 684 - is a valid object ok 685 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x + $y; ok 686 - is a valid object ok 687 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x + $y; ok 688 - is a valid object ok 689 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x + $y; ok 690 - is a valid object ok 691 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x + $y; ok 692 - is a valid object ok 693 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 694 - is a valid object ok 695 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 696 - is a valid object ok 697 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 698 - is a valid object ok 699 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 700 - is a valid object ok 701 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 702 - is a valid object ok 703 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x + $y; ok 704 - is a valid object ok 705 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x + $y; ok 706 - is a valid object ok 707 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x + $y; ok 708 - is a valid object ok 709 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x + $y; ok 710 - is a valid object ok 711 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x + $y; ok 712 - is a valid object ok 713 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x + $y; ok 714 - is a valid object ok 715 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 716 - is a valid object ok 717 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 718 - is a valid object ok 719 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 720 - is a valid object ok 721 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 722 - is a valid object ok 723 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x + $y; ok 724 - is a valid object ok 725 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 726 - is a valid object ok 727 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("987654321"); $x + $y; ok 728 - is a valid object ok 729 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 730 - is a valid object ok 731 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x + $y; ok 732 - is a valid object ok 733 - $x = Math::BigInt->new("2"); $y = Math::BigFloat->new("2.5"); $x + $y; ok 734 - ref($got) ok 735 - $Math::BigInt::upgrade ok 736 - is a valid object ok 737 - $x = Math::BigInt->new("-123"); $y = Math::BigFloat->new("-1.5"); $x + $y; ok 738 - ref($got) ok 739 - $Math::BigInt::upgrade ok 740 - is a valid object ok 741 - $x = Math::BigInt->new("-1.2"); $y = Math::BigInt->new("1"); $x + $y; ok 742 - ref($got) ok 743 - $Math::BigInt::upgrade ok 744 - is a valid object ok 745 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x - $y; ok 746 - is a valid object ok 747 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x - $y; ok 748 - is a valid object ok 749 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x - $y; ok 750 - is a valid object ok 751 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 752 - is a valid object ok 753 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 754 - is a valid object ok 755 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x - $y; ok 756 - is a valid object ok 757 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x - $y; ok 758 - is a valid object ok 759 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x - $y; ok 760 - is a valid object ok 761 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x - $y; ok 762 - is a valid object ok 763 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x - $y; ok 764 - is a valid object ok 765 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x - $y; ok 766 - is a valid object ok 767 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x - $y; ok 768 - is a valid object ok 769 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x - $y; ok 770 - is a valid object ok 771 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x - $y; ok 772 - is a valid object ok 773 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x - $y; ok 774 - is a valid object ok 775 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x - $y; ok 776 - is a valid object ok 777 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("+1"); $x - $y; ok 778 - is a valid object ok 779 - $x = Math::BigInt->new("+99"); $y = Math::BigInt->new("+1"); $x - $y; ok 780 - is a valid object ok 781 - $x = Math::BigInt->new("+999"); $y = Math::BigInt->new("+1"); $x - $y; ok 782 - is a valid object ok 783 - $x = Math::BigInt->new("+9999"); $y = Math::BigInt->new("+1"); $x - $y; ok 784 - is a valid object ok 785 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+1"); $x - $y; ok 786 - is a valid object ok 787 - $x = Math::BigInt->new("+999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 788 - is a valid object ok 789 - $x = Math::BigInt->new("+9999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 790 - is a valid object ok 791 - $x = Math::BigInt->new("+99999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 792 - is a valid object ok 793 - $x = Math::BigInt->new("+999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 794 - is a valid object ok 795 - $x = Math::BigInt->new("+9999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 796 - is a valid object ok 797 - $x = Math::BigInt->new("+99999999999"); $y = Math::BigInt->new("+1"); $x - $y; ok 798 - is a valid object ok 799 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("-1"); $x - $y; ok 800 - is a valid object ok 801 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("-1"); $x - $y; ok 802 - is a valid object ok 803 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("-1"); $x - $y; ok 804 - is a valid object ok 805 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("-1"); $x - $y; ok 806 - is a valid object ok 807 - $x = Math::BigInt->new("+100000"); $y = Math::BigInt->new("-1"); $x - $y; ok 808 - is a valid object ok 809 - $x = Math::BigInt->new("+1000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 810 - is a valid object ok 811 - $x = Math::BigInt->new("+10000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 812 - is a valid object ok 813 - $x = Math::BigInt->new("+100000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 814 - is a valid object ok 815 - $x = Math::BigInt->new("+1000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 816 - is a valid object ok 817 - $x = Math::BigInt->new("+10000000000"); $y = Math::BigInt->new("-1"); $x - $y; ok 818 - is a valid object ok 819 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 820 - is a valid object ok 821 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("+987654321"); $x - $y; ok 822 - is a valid object ok 823 - $x = Math::BigInt->new("-123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 824 - is a valid object ok 825 - $x = Math::BigInt->new("+123456789"); $y = Math::BigInt->new("-987654321"); $x - $y; ok 826 - is a valid object ok 827 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x * $y; ok 828 - is a valid object ok 829 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); $x * $y; ok 830 - is a valid object ok 831 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); $x * $y; ok 832 - is a valid object ok 833 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("+inf"); $x * $y; ok 834 - is a valid object ok 835 - $x = Math::BigInt->new("NaNmul"); $y = Math::BigInt->new("-inf"); $x * $y; ok 836 - is a valid object ok 837 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 838 - is a valid object ok 839 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("NaNmul"); $x * $y; ok 840 - is a valid object ok 841 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 842 - is a valid object ok 843 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 844 - is a valid object ok 845 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("+inf"); $x * $y; ok 846 - is a valid object ok 847 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x * $y; ok 848 - is a valid object ok 849 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); $x * $y; ok 850 - is a valid object ok 851 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); $x * $y; ok 852 - is a valid object ok 853 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); $x * $y; ok 854 - is a valid object ok 855 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("-1"); $x * $y; ok 856 - is a valid object ok 857 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+0"); $x * $y; ok 858 - is a valid object ok 859 - $x = Math::BigInt->new("123456789123456789"); $y = Math::BigInt->new("0"); $x * $y; ok 860 - is a valid object ok 861 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("123456789123456789"); $x * $y; ok 862 - is a valid object ok 863 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x * $y; ok 864 - is a valid object ok 865 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("+1"); $x * $y; ok 866 - is a valid object ok 867 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("-1"); $x * $y; ok 868 - is a valid object ok 869 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); $x * $y; ok 870 - is a valid object ok 871 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); $x * $y; ok 872 - is a valid object ok 873 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("+3"); $x * $y; ok 874 - is a valid object ok 875 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("-3"); $x * $y; ok 876 - is a valid object ok 877 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x * $y; ok 878 - is a valid object ok 879 - $x = Math::BigInt->new("111"); $y = Math::BigInt->new("111"); $x * $y; ok 880 - is a valid object ok 881 - $x = Math::BigInt->new("10101"); $y = Math::BigInt->new("10101"); $x * $y; ok 882 - is a valid object ok 883 - $x = Math::BigInt->new("1001001"); $y = Math::BigInt->new("1001001"); $x * $y; ok 884 - is a valid object ok 885 - $x = Math::BigInt->new("100010001"); $y = Math::BigInt->new("100010001"); $x * $y; ok 886 - is a valid object ok 887 - $x = Math::BigInt->new("10000100001"); $y = Math::BigInt->new("10000100001"); $x * $y; ok 888 - is a valid object ok 889 - $x = Math::BigInt->new("11111111111"); $y = Math::BigInt->new("9"); $x * $y; ok 890 - is a valid object ok 891 - $x = Math::BigInt->new("22222222222"); $y = Math::BigInt->new("9"); $x * $y; ok 892 - is a valid object ok 893 - $x = Math::BigInt->new("33333333333"); $y = Math::BigInt->new("9"); $x * $y; ok 894 - is a valid object ok 895 - $x = Math::BigInt->new("44444444444"); $y = Math::BigInt->new("9"); $x * $y; ok 896 - is a valid object ok 897 - $x = Math::BigInt->new("55555555555"); $y = Math::BigInt->new("9"); $x * $y; ok 898 - is a valid object ok 899 - $x = Math::BigInt->new("66666666666"); $y = Math::BigInt->new("9"); $x * $y; ok 900 - is a valid object ok 901 - $x = Math::BigInt->new("77777777777"); $y = Math::BigInt->new("9"); $x * $y; ok 902 - is a valid object ok 903 - $x = Math::BigInt->new("88888888888"); $y = Math::BigInt->new("9"); $x * $y; ok 904 - is a valid object ok 905 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("9"); $x * $y; ok 906 - is a valid object ok 907 - $x = Math::BigInt->new("+25"); $y = Math::BigInt->new("+25"); $x * $y; ok 908 - is a valid object ok 909 - $x = Math::BigInt->new("+12345"); $y = Math::BigInt->new("+12345"); $x * $y; ok 910 - is a valid object ok 911 - $x = Math::BigInt->new("+99999"); $y = Math::BigInt->new("+11111"); $x * $y; ok 912 - is a valid object ok 913 - $x = Math::BigInt->new("9999"); $y = Math::BigInt->new("10000"); $x * $y; ok 914 - is a valid object ok 915 - $x = Math::BigInt->new("99999"); $y = Math::BigInt->new("100000"); $x * $y; ok 916 - is a valid object ok 917 - $x = Math::BigInt->new("999999"); $y = Math::BigInt->new("1000000"); $x * $y; ok 918 - is a valid object ok 919 - $x = Math::BigInt->new("9999999"); $y = Math::BigInt->new("10000000"); $x * $y; ok 920 - is a valid object ok 921 - $x = Math::BigInt->new("99999999"); $y = Math::BigInt->new("100000000"); $x * $y; ok 922 - is a valid object ok 923 - $x = Math::BigInt->new("999999999"); $y = Math::BigInt->new("1000000000"); $x * $y; ok 924 - is a valid object ok 925 - $x = Math::BigInt->new("9999999999"); $y = Math::BigInt->new("10000000000"); $x * $y; ok 926 - is a valid object ok 927 - $x = Math::BigInt->new("99999999999"); $y = Math::BigInt->new("100000000000"); $x * $y; ok 928 - is a valid object ok 929 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("1000000000000"); $x * $y; ok 930 - is a valid object ok 931 - $x = Math::BigInt->new("9999999999999"); $y = Math::BigInt->new("10000000000000"); $x * $y; ok 932 - is a valid object ok 933 - $x = Math::BigInt->new("99999999999999"); $y = Math::BigInt->new("100000000000000"); $x * $y; ok 934 - is a valid object ok 935 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("1000000000000000"); $x * $y; ok 936 - is a valid object ok 937 - $x = Math::BigInt->new("9999999999999999"); $y = Math::BigInt->new("10000000000000000"); $x * $y; ok 938 - is a valid object ok 939 - $x = Math::BigInt->new("99999999999999999"); $y = Math::BigInt->new("100000000000000000"); $x * $y; ok 940 - is a valid object ok 941 - $x = Math::BigInt->new("999999999999999999"); $y = Math::BigInt->new("1000000000000000000"); $x * $y; ok 942 - is a valid object ok 943 - $x = Math::BigInt->new("9999999999999999999"); $y = Math::BigInt->new("10000000000000000000"); $x * $y; ok 944 - is a valid object ok 945 - $x = Math::BigInt->new("3"); $y = Math::BigFloat->new("3.5"); $x * $y; ok 946 - ref($got) ok 947 - $Math::BigInt::upgrade ok 948 - is a valid object ok 949 - $x = Math::BigInt->new("3.5"); $y = Math::BigInt->new("3"); $x * $y; ok 950 - ref($got) ok 951 - $Math::BigInt::upgrade ok 952 - is a valid object ok 953 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("20"); join(",", $x->bdiv($y)); ok 954 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); join(",", $x->bdiv($y)); ok 955 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("-4095"); join(",", $x->bdiv($y)); ok 956 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("-4095"); join(",", $x->bdiv($y)); ok 957 - $x = Math::BigInt->new("-4095"); $y = Math::BigInt->new("4095"); join(",", $x->bdiv($y)); ok 958 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 959 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 960 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("4"); join(",", $x->bdiv($y)); ok 961 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("8"); join(",", $x->bdiv($y)); ok 962 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("8"); join(",", $x->bdiv($y)); ok 963 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 964 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); join(",", $x->bdiv($y)); ok 965 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); join(",", $x->bdiv($y)); ok 966 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 967 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 968 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 969 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 970 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 971 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 972 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 973 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 974 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 975 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 976 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); join(",", $x->bdiv($y)); ok 977 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); join(",", $x->bdiv($y)); ok 978 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 979 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 980 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); join(",", $x->bdiv($y)); ok 981 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); join(",", $x->bdiv($y)); ok 982 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 983 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 984 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 985 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 986 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); join(",", $x->bdiv($y)); ok 987 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x / $y; ok 988 - is a valid object ok 989 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x / $y; ok 990 - is a valid object ok 991 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x / $y; ok 992 - is a valid object ok 993 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x / $y; ok 994 - is a valid object ok 995 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x / $y; ok 996 - is a valid object ok 997 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x / $y; ok 998 - is a valid object ok 999 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1000 - is a valid object ok 1001 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1002 - is a valid object ok 1003 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x / $y; ok 1004 - is a valid object ok 1005 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1006 - is a valid object ok 1007 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1008 - is a valid object ok 1009 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x / $y; ok 1010 - is a valid object ok 1011 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1012 - is a valid object ok 1013 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x / $y; ok 1014 - is a valid object ok 1015 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x / $y; ok 1016 - is a valid object ok 1017 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x / $y; ok 1018 - is a valid object ok 1019 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1020 - is a valid object ok 1021 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1022 - is a valid object ok 1023 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x / $y; ok 1024 - is a valid object ok 1025 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x / $y; ok 1026 - is a valid object ok 1027 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x / $y; ok 1028 - is a valid object ok 1029 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1030 - is a valid object ok 1031 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x / $y; ok 1032 - is a valid object ok 1033 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x / $y; ok 1034 - is a valid object ok 1035 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("2"); $x / $y; ok 1036 - ref($got) ok 1037 - $Math::BigInt::upgrade ok 1038 - is a valid object ok 1039 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1040 - ref($got) ok 1041 - $Math::BigInt::upgrade ok 1042 - is a valid object ok 1043 - $x = Math::BigInt->new("-11"); $y = Math::BigInt->new("2"); $x / $y; ok 1044 - ref($got) ok 1045 - $Math::BigInt::upgrade ok 1046 - is a valid object ok 1047 - $x = Math::BigInt->new("11"); $y = Math::BigInt->new("-2"); $x / $y; ok 1048 - ref($got) ok 1049 - $Math::BigInt::upgrade ok 1050 - is a valid object ok 1051 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x / $y; ok 1052 - is a valid object ok 1053 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x / $y; ok 1054 - is a valid object ok 1055 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x / $y; ok 1056 - is a valid object ok 1057 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1058 - is a valid object ok 1059 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x / $y; ok 1060 - is a valid object ok 1061 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x / $y; ok 1062 - is a valid object ok 1063 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x / $y; ok 1064 - ref($got) ok 1065 - $Math::BigInt::upgrade ok 1066 - is a valid object ok 1067 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x / $y; ok 1068 - is a valid object ok 1069 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1070 - ref($got) ok 1071 - $Math::BigInt::upgrade ok 1072 - is a valid object ok 1073 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1074 - ref($got) ok 1075 - $Math::BigInt::upgrade ok 1076 - is a valid object ok 1077 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1078 - ref($got) ok 1079 - $Math::BigInt::upgrade ok 1080 - is a valid object ok 1081 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1082 - ref($got) ok 1083 - $Math::BigInt::upgrade ok 1084 - is a valid object ok 1085 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1086 - ref($got) ok 1087 - $Math::BigInt::upgrade ok 1088 - is a valid object ok 1089 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1090 - ref($got) ok 1091 - $Math::BigInt::upgrade ok 1092 - is a valid object ok 1093 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1094 - ref($got) ok 1095 - $Math::BigInt::upgrade ok 1096 - is a valid object ok 1097 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1098 - ref($got) ok 1099 - $Math::BigInt::upgrade ok 1100 - is a valid object ok 1101 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x / $y; ok 1102 - is a valid object ok 1103 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x / $y; ok 1104 - ref($got) ok 1105 - $Math::BigInt::upgrade ok 1106 - is a valid object ok 1107 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x / $y; ok 1108 - ref($got) ok 1109 - $Math::BigInt::upgrade ok 1110 - is a valid object ok 1111 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x / $y; ok 1112 - ref($got) ok 1113 - $Math::BigInt::upgrade ok 1114 - is a valid object ok 1115 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x / $y; ok 1116 - ref($got) ok 1117 - $Math::BigInt::upgrade ok 1118 - is a valid object ok 1119 - $x = Math::BigInt->new("+10"); $y = Math::BigInt->new("+5"); $x / $y; ok 1120 - is a valid object ok 1121 - $x = Math::BigInt->new("+100"); $y = Math::BigInt->new("+4"); $x / $y; ok 1122 - is a valid object ok 1123 - $x = Math::BigInt->new("+1000"); $y = Math::BigInt->new("+8"); $x / $y; ok 1124 - is a valid object ok 1125 - $x = Math::BigInt->new("+10000"); $y = Math::BigInt->new("+16"); $x / $y; ok 1126 - is a valid object ok 1127 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x / $y; ok 1128 - is a valid object ok 1129 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x / $y; ok 1130 - is a valid object ok 1131 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x / $y; ok 1132 - is a valid object ok 1133 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x / $y; ok 1134 - is a valid object ok 1135 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x / $y; ok 1136 - is a valid object ok 1137 - $x = Math::BigInt->new("+1111088889"); $y = Math::BigInt->new("99999"); $x / $y; ok 1138 - is a valid object ok 1139 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x / $y; ok 1140 - ref($got) ok 1141 - $Math::BigInt::upgrade ok 1142 - is a valid object ok 1143 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x / $y; ok 1144 - ref($got) ok 1145 - $Math::BigInt::upgrade ok 1146 - is a valid object ok 1147 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x / $y; ok 1148 - ref($got) ok 1149 - $Math::BigInt::upgrade ok 1150 - is a valid object ok 1151 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x / $y; ok 1152 - ref($got) ok 1153 - $Math::BigInt::upgrade ok 1154 - is a valid object ok 1155 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x / $y; ok 1156 - ref($got) ok 1157 - $Math::BigInt::upgrade ok 1158 - is a valid object ok 1159 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x / $y; ok 1160 - ref($got) ok 1161 - $Math::BigInt::upgrade ok 1162 - is a valid object ok 1163 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x / $y; ok 1164 - ref($got) ok 1165 - $Math::BigInt::upgrade ok 1166 - is a valid object ok 1167 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x / $y; ok 1168 - ref($got) ok 1169 - $Math::BigInt::upgrade ok 1170 - is a valid object ok 1171 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("5"); $x / $y; ok 1172 - ref($got) ok 1173 - $Math::BigInt::upgrade ok 1174 - is a valid object ok 1175 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("5"); $x / $y; ok 1176 - ref($got) ok 1177 - $Math::BigInt::upgrade ok 1178 - is a valid object ok 1179 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1180 - ref($got) ok 1181 - $Math::BigInt::upgrade ok 1182 - is a valid object ok 1183 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("3"); $x / $y; ok 1184 - ref($got) ok 1185 - $Math::BigInt::upgrade ok 1186 - is a valid object ok 1187 - $x = Math::BigInt->new("-14"); $y = Math::BigInt->new("-3"); $x / $y; ok 1188 - ref($got) ok 1189 - $Math::BigInt::upgrade ok 1190 - is a valid object ok 1191 - $x = Math::BigInt->new("14"); $y = Math::BigInt->new("3"); $x / $y; ok 1192 - ref($got) ok 1193 - $Math::BigInt::upgrade ok 1194 - is a valid object ok 1195 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("24"); $x / $y; ok 1196 - ref($got) ok 1197 - $Math::BigInt::upgrade ok 1198 - is a valid object ok 1199 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("inf"); $x % $y; ok 1200 - is a valid object ok 1201 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1202 - is a valid object ok 1203 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("inf"); $x % $y; ok 1204 - is a valid object ok 1205 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1206 - is a valid object ok 1207 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("inf"); $x % $y; ok 1208 - is a valid object ok 1209 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1210 - is a valid object ok 1211 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("5"); $x % $y; ok 1212 - is a valid object ok 1213 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("5"); $x % $y; ok 1214 - is a valid object ok 1215 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 1216 - is a valid object ok 1217 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-5"); $x % $y; ok 1218 - is a valid object ok 1219 - $x = Math::BigInt->new("5"); $y = Math::BigInt->new("5"); $x % $y; ok 1220 - is a valid object ok 1221 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-5"); $x % $y; ok 1222 - is a valid object ok 1223 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 1224 - is a valid object ok 1225 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1226 - is a valid object ok 1227 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("inf"); $x % $y; ok 1228 - is a valid object ok 1229 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("-inf"); $x % $y; ok 1230 - is a valid object ok 1231 - $x = Math::BigInt->new("8"); $y = Math::BigInt->new("0"); $x % $y; ok 1232 - is a valid object ok 1233 - $x = Math::BigInt->new("inf"); $y = Math::BigInt->new("0"); $x % $y; ok 1234 - is a valid object ok 1235 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("0"); $x % $y; ok 1236 - is a valid object ok 1237 - $x = Math::BigInt->new("-8"); $y = Math::BigInt->new("0"); $x % $y; ok 1238 - is a valid object ok 1239 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x % $y; ok 1240 - is a valid object ok 1241 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x % $y; ok 1242 - is a valid object ok 1243 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("1"); $x % $y; ok 1244 - is a valid object ok 1245 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("abc"); $x % $y; ok 1246 - is a valid object ok 1247 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x % $y; ok 1248 - is a valid object ok 1249 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x % $y; ok 1250 - is a valid object ok 1251 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x % $y; ok 1252 - is a valid object ok 1253 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x % $y; ok 1254 - is a valid object ok 1255 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x % $y; ok 1256 - is a valid object ok 1257 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x % $y; ok 1258 - is a valid object ok 1259 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x % $y; ok 1260 - is a valid object ok 1261 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x % $y; ok 1262 - is a valid object ok 1263 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x % $y; ok 1264 - is a valid object ok 1265 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x % $y; ok 1266 - is a valid object ok 1267 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1268 - is a valid object ok 1269 - $x = Math::BigInt->new("2000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1270 - is a valid object ok 1271 - $x = Math::BigInt->new("3000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1272 - is a valid object ok 1273 - $x = Math::BigInt->new("4000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1274 - is a valid object ok 1275 - $x = Math::BigInt->new("5000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1276 - is a valid object ok 1277 - $x = Math::BigInt->new("6000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1278 - is a valid object ok 1279 - $x = Math::BigInt->new("7000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1280 - is a valid object ok 1281 - $x = Math::BigInt->new("8000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1282 - is a valid object ok 1283 - $x = Math::BigInt->new("9000000000"); $y = Math::BigInt->new("9"); $x % $y; ok 1284 - is a valid object ok 1285 - $x = Math::BigInt->new("35500000"); $y = Math::BigInt->new("113"); $x % $y; ok 1286 - is a valid object ok 1287 - $x = Math::BigInt->new("71000000"); $y = Math::BigInt->new("226"); $x % $y; ok 1288 - is a valid object ok 1289 - $x = Math::BigInt->new("106500000"); $y = Math::BigInt->new("339"); $x % $y; ok 1290 - is a valid object ok 1291 - $x = Math::BigInt->new("1000000000"); $y = Math::BigInt->new("3"); $x % $y; ok 1292 - is a valid object ok 1293 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x % $y; ok 1294 - is a valid object ok 1295 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("4"); $x % $y; ok 1296 - is a valid object ok 1297 - $x = Math::BigInt->new("1000"); $y = Math::BigInt->new("8"); $x % $y; ok 1298 - is a valid object ok 1299 - $x = Math::BigInt->new("10000"); $y = Math::BigInt->new("16"); $x % $y; ok 1300 - is a valid object ok 1301 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9"); $x % $y; ok 1302 - is a valid object ok 1303 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("99"); $x % $y; ok 1304 - is a valid object ok 1305 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("999"); $x % $y; ok 1306 - is a valid object ok 1307 - $x = Math::BigInt->new("999999999999"); $y = Math::BigInt->new("9999"); $x % $y; ok 1308 - is a valid object ok 1309 - $x = Math::BigInt->new("999999999999999"); $y = Math::BigInt->new("99999"); $x % $y; ok 1310 - is a valid object ok 1311 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("+5"); $x % $y; ok 1312 - is a valid object ok 1313 - $x = Math::BigInt->new("+9"); $y = Math::BigInt->new("-5"); $x % $y; ok 1314 - is a valid object ok 1315 - $x = Math::BigInt->new("-9"); $y = Math::BigInt->new("-5"); $x % $y; ok 1316 - is a valid object ok 1317 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("3"); $x % $y; ok 1318 - is a valid object ok 1319 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x % $y; ok 1320 - is a valid object ok 1321 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("3"); $x % $y; ok 1322 - is a valid object ok 1323 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x % $y; ok 1324 - is a valid object ok 1325 - $x = Math::BigInt->new("-5"); $y = Math::BigInt->new("-3"); $x % $y; ok 1326 - is a valid object ok 1327 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x % $y; ok 1328 - is a valid object ok 1329 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-3"); $x % $y; ok 1330 - is a valid object ok 1331 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x % $y; ok 1332 - is a valid object ok 1333 - $x = Math::BigInt->new("4095"); $y = Math::BigInt->new("4095"); $x % $y; ok 1334 - is a valid object ok 1335 - $x = Math::BigInt->new("100041000510123"); $y = Math::BigInt->new("3"); $x % $y; ok 1336 - is a valid object ok 1337 - $x = Math::BigInt->new("152403346"); $y = Math::BigInt->new("12345"); $x % $y; ok 1338 - is a valid object ok 1339 - $x = Math::BigInt->new("9"); $y = Math::BigInt->new("5"); $x % $y; ok 1340 - is a valid object ok 1341 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 1342 - is a valid object ok 1343 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1344 - is a valid object ok 1345 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::bgcd($x, $y); ok 1346 - is a valid object ok 1347 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1348 - is a valid object ok 1349 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 1350 - is a valid object ok 1351 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::bgcd($x, $y); ok 1352 - is a valid object ok 1353 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+1"); Math::BigInt::bgcd($x, $y); ok 1354 - is a valid object ok 1355 - $x = Math::BigInt->new("+2"); $y = Math::BigInt->new("+3"); Math::BigInt::bgcd($x, $y); ok 1356 - is a valid object ok 1357 - $x = Math::BigInt->new("+3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 1358 - is a valid object ok 1359 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("+2"); Math::BigInt::bgcd($x, $y); ok 1360 - is a valid object ok 1361 - $x = Math::BigInt->new("100"); $y = Math::BigInt->new("625"); Math::BigInt::bgcd($x, $y); ok 1362 - is a valid object ok 1363 - $x = Math::BigInt->new("4096"); $y = Math::BigInt->new("81"); Math::BigInt::bgcd($x, $y); ok 1364 - is a valid object ok 1365 - $x = Math::BigInt->new("1034"); $y = Math::BigInt->new("804"); Math::BigInt::bgcd($x, $y); ok 1366 - is a valid object ok 1367 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("56"); Math::BigInt::bgcd($x, $y, $z); ok 1368 - is a valid object ok 1369 - $x = Math::BigInt->new("27"); $y = Math::BigInt->new("90"); $z = Math::BigInt->new("54"); Math::BigInt::bgcd($x, $y, $z); ok 1370 - is a valid object ok 1371 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 1372 - is a valid object ok 1373 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1374 - is a valid object ok 1375 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("abc"); Math::BigInt::blcm($x, $y); ok 1376 - is a valid object ok 1377 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1378 - is a valid object ok 1379 - $x = Math::BigInt->new("+1"); $y = Math::BigInt->new("+0"); Math::BigInt::blcm($x, $y); ok 1380 - is a valid object ok 1381 - $x = Math::BigInt->new("+0"); $y = Math::BigInt->new("+1"); Math::BigInt::blcm($x, $y); ok 1382 - is a valid object ok 1383 - $x = Math::BigInt->new("+27"); $y = Math::BigInt->new("+90"); Math::BigInt::blcm($x, $y); ok 1384 - is a valid object ok 1385 - $x = Math::BigInt->new("+1034"); $y = Math::BigInt->new("+804"); Math::BigInt::blcm($x, $y); ok 1386 - is a valid object ok 1387 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x & $y; ok 1388 - is a valid object ok 1389 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x & $y; ok 1390 - is a valid object ok 1391 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x & $y; ok 1392 - is a valid object ok 1393 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x & $y; ok 1394 - is a valid object ok 1395 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("2"); $x & $y; ok 1396 - is a valid object ok 1397 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x & $y; ok 1398 - is a valid object ok 1399 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x & $y; ok 1400 - is a valid object ok 1401 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x & $y; ok 1402 - is a valid object ok 1403 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("+281474976710656"); $x & $y; ok 1404 - is a valid object ok 1405 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x & $y; ok 1406 - is a valid object ok 1407 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x & $y; ok 1408 - is a valid object ok 1409 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x & $y; ok 1410 - is a valid object ok 1411 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("-4"); $x & $y; ok 1412 - is a valid object ok 1413 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x & $y; ok 1414 - is a valid object ok 1415 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x & $y; ok 1416 - is a valid object ok 1417 - $x = Math::BigInt->new("1"); $y = Math::BigFloat->new("0.5"); $x & $y; ok 1418 - is a valid object ok 1419 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x & $y; ok 1420 - is a valid object ok 1421 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x & $y; ok 1422 - is a valid object ok 1423 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x & $y; ok 1424 - is a valid object ok 1425 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x & $y; ok 1426 - is a valid object ok 1427 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x & $y; ok 1428 - is a valid object ok 1429 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x & $y; ok 1430 - is a valid object ok 1431 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x & $y; ok 1432 - is a valid object ok 1433 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x & $y; ok 1434 - is a valid object ok 1435 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x & $y; ok 1436 - is a valid object ok 1437 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x & $y; ok 1438 - is a valid object ok 1439 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x & $y; ok 1440 - is a valid object ok 1441 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x & $y; ok 1442 - is a valid object ok 1443 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x & $y; ok 1444 - is a valid object ok 1445 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x & $y; ok 1446 - is a valid object ok 1447 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x & $y; ok 1448 - is a valid object ok 1449 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0x3F0F0F0F0F0F"); $x & $y; ok 1450 - is a valid object ok 1451 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x | $y; ok 1452 - is a valid object ok 1453 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x | $y; ok 1454 - is a valid object ok 1455 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x | $y; ok 1456 - is a valid object ok 1457 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x | $y; ok 1458 - is a valid object ok 1459 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x | $y; ok 1460 - is a valid object ok 1461 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x | $y; ok 1462 - is a valid object ok 1463 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x | $y; ok 1464 - is a valid object ok 1465 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x | $y; ok 1466 - is a valid object ok 1467 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x | $y; ok 1468 - is a valid object ok 1469 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x | $y; ok 1470 - is a valid object ok 1471 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x | $y; ok 1472 - is a valid object ok 1473 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x | $y; ok 1474 - is a valid object ok 1475 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x | $y; ok 1476 - is a valid object ok 1477 - $x = Math::BigInt->new("1"); $y = Math::BigFloat->new("0.5"); $x | $y; ok 1478 - is a valid object ok 1479 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 1480 - is a valid object ok 1481 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 1482 - is a valid object ok 1483 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 1484 - is a valid object ok 1485 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 1486 - is a valid object ok 1487 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 1488 - is a valid object ok 1489 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x | $y; ok 1490 - is a valid object ok 1491 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x | $y; ok 1492 - is a valid object ok 1493 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x | $y; ok 1494 - is a valid object ok 1495 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x | $y; ok 1496 - is a valid object ok 1497 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x | $y; ok 1498 - is a valid object ok 1499 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1500 - is a valid object ok 1501 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1502 - is a valid object ok 1503 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1504 - is a valid object ok 1505 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1506 - is a valid object ok 1507 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x | $y; ok 1508 - is a valid object ok 1509 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x | $y; ok 1510 - is a valid object ok 1511 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 1512 - is a valid object ok 1513 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x | $y; ok 1514 - is a valid object ok 1515 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 1516 - is a valid object ok 1517 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x | $y; ok 1518 - is a valid object ok 1519 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x | $y; ok 1520 - is a valid object ok 1521 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 1522 - is a valid object ok 1523 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x | $y; ok 1524 - is a valid object ok 1525 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x | $y; ok 1526 - is a valid object ok 1527 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 1528 - is a valid object ok 1529 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x | $y; ok 1530 - is a valid object ok 1531 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x | $y; ok 1532 - is a valid object ok 1533 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1534 - is a valid object ok 1535 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x | $y; ok 1536 - is a valid object ok 1537 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1538 - is a valid object ok 1539 - $x = Math::BigInt->new("0x1F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x | $y; ok 1540 - is a valid object ok 1541 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 1542 - is a valid object ok 1543 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1544 - is a valid object ok 1545 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("abc"); $x ^ $y; ok 1546 - is a valid object ok 1547 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ^ $y; ok 1548 - is a valid object ok 1549 - $x = Math::BigInt->new("+8"); $y = Math::BigInt->new("+2"); $x ^ $y; ok 1550 - is a valid object ok 1551 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1552 - is a valid object ok 1553 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("1"); $x ^ $y; ok 1554 - is a valid object ok 1555 - $x = Math::BigInt->new("+281474976710656"); $y = Math::BigInt->new("281474976710656"); $x ^ $y; ok 1556 - is a valid object ok 1557 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ^ $y; ok 1558 - is a valid object ok 1559 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ^ $y; ok 1560 - is a valid object ok 1561 - $x = Math::BigInt->new("-6"); $y = Math::BigInt->new("-6"); $x ^ $y; ok 1562 - is a valid object ok 1563 - $x = Math::BigInt->new("-7"); $y = Math::BigInt->new("4"); $x ^ $y; ok 1564 - is a valid object ok 1565 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("7"); $x ^ $y; ok 1566 - is a valid object ok 1567 - $x = Math::BigInt->new("4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 1568 - is a valid object ok 1569 - $x = Math::BigInt->new("-4"); $y = Math::BigInt->new("-7"); $x ^ $y; ok 1570 - is a valid object ok 1571 - $x = Math::BigInt->new("1"); $y = Math::BigFloat->new("0.5"); $x ^ $y; ok 1572 - is a valid object ok 1573 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 1574 - is a valid object ok 1575 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 1576 - is a valid object ok 1577 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 1578 - is a valid object ok 1579 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 1580 - is a valid object ok 1581 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 1582 - is a valid object ok 1583 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFF"); $x ^ $y; ok 1584 - is a valid object ok 1585 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFF"); $x ^ $y; ok 1586 - is a valid object ok 1587 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFF"); $x ^ $y; ok 1588 - is a valid object ok 1589 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFF"); $x ^ $y; ok 1590 - is a valid object ok 1591 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0xFFFFFFFFFFFF"); $x ^ $y; ok 1592 - is a valid object ok 1593 - $x = Math::BigInt->new("0xFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1594 - is a valid object ok 1595 - $x = Math::BigInt->new("0xFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1596 - is a valid object ok 1597 - $x = Math::BigInt->new("0xFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1598 - is a valid object ok 1599 - $x = Math::BigInt->new("0xFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1600 - is a valid object ok 1601 - $x = Math::BigInt->new("0xFFFFFFFFFFFF"); $y = Math::BigInt->new("0"); $x ^ $y; ok 1602 - is a valid object ok 1603 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0xF0F0"); $x ^ $y; ok 1604 - is a valid object ok 1605 - $x = Math::BigInt->new("0x0F0F"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 1606 - is a valid object ok 1607 - $x = Math::BigInt->new("0xF0F0"); $y = Math::BigInt->new("0x0F0F"); $x ^ $y; ok 1608 - is a valid object ok 1609 - $x = Math::BigInt->new("0xF0F0F0"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 1610 - is a valid object ok 1611 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0x0F0F0F"); $x ^ $y; ok 1612 - is a valid object ok 1613 - $x = Math::BigInt->new("0x0F0F0F"); $y = Math::BigInt->new("0xF0F0F0"); $x ^ $y; ok 1614 - is a valid object ok 1615 - $x = Math::BigInt->new("0xF0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 1616 - is a valid object ok 1617 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F"); $x ^ $y; ok 1618 - is a valid object ok 1619 - $x = Math::BigInt->new("0x0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0"); $x ^ $y; ok 1620 - is a valid object ok 1621 - $x = Math::BigInt->new("0xF0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 1622 - is a valid object ok 1623 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F"); $x ^ $y; ok 1624 - is a valid object ok 1625 - $x = Math::BigInt->new("0x0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0"); $x ^ $y; ok 1626 - is a valid object ok 1627 - $x = Math::BigInt->new("0xF0F0F0F0F0F0"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 1628 - is a valid object ok 1629 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0x0F0F0F0F0F0F"); $x ^ $y; ok 1630 - is a valid object ok 1631 - $x = Math::BigInt->new("0x0F0F0F0F0F0F"); $y = Math::BigInt->new("0xF0F0F0F0F0F0"); $x ^ $y; ok 1632 - is a valid object ok 1633 - $x = Math::BigInt->new("abc"); $x->bnot(); ok 1634 - is a valid object ok 1635 - $x = Math::BigInt->new("+0"); $x->bnot(); ok 1636 - is a valid object ok 1637 - $x = Math::BigInt->new("+8"); $x->bnot(); ok 1638 - is a valid object ok 1639 - $x = Math::BigInt->new("+281474976710656"); $x->bnot(); ok 1640 - is a valid object ok 1641 - $x = Math::BigInt->new("-1"); $x->bnot(); ok 1642 - is a valid object ok 1643 - $x = Math::BigInt->new("-2"); $x->bnot(); ok 1644 - is a valid object ok 1645 - $x = Math::BigInt->new("-12"); $x->bnot(); ok 1646 - is a valid object ok 1647 - $x = Math::BigInt->new("0"); $x->digit(0); ok 1648 - $x = Math::BigInt->new("12"); $x->digit(0); ok 1649 - $x = Math::BigInt->new("12"); $x->digit(1); ok 1650 - $x = Math::BigInt->new("123"); $x->digit(0); ok 1651 - $x = Math::BigInt->new("123"); $x->digit(1); ok 1652 - $x = Math::BigInt->new("123"); $x->digit(2); ok 1653 - $x = Math::BigInt->new("123"); $x->digit(-1); ok 1654 - $x = Math::BigInt->new("123"); $x->digit(-2); ok 1655 - $x = Math::BigInt->new("123"); $x->digit(-3); ok 1656 - $x = Math::BigInt->new("123456"); $x->digit(0); ok 1657 - $x = Math::BigInt->new("123456"); $x->digit(1); ok 1658 - $x = Math::BigInt->new("123456"); $x->digit(2); ok 1659 - $x = Math::BigInt->new("123456"); $x->digit(3); ok 1660 - $x = Math::BigInt->new("123456"); $x->digit(4); ok 1661 - $x = Math::BigInt->new("123456"); $x->digit(5); ok 1662 - $x = Math::BigInt->new("123456"); $x->digit(-1); ok 1663 - $x = Math::BigInt->new("123456"); $x->digit(-2); ok 1664 - $x = Math::BigInt->new("123456"); $x->digit(-3); ok 1665 - $x = Math::BigInt->new("100000"); $x->digit(-3); ok 1666 - $x = Math::BigInt->new("100000"); $x->digit(0); ok 1667 - $x = Math::BigInt->new("100000"); $x->digit(1); ok 1668 - $x = Math::BigInt->new("abc"); $x = $x->mantissa()->bstr(); ok 1669 - $x = Math::BigInt->new("1e4"); $x = $x->mantissa()->bstr(); ok 1670 - $x = Math::BigInt->new("2e0"); $x = $x->mantissa()->bstr(); ok 1671 - $x = Math::BigInt->new("123"); $x = $x->mantissa()->bstr(); ok 1672 - $x = Math::BigInt->new("-1"); $x = $x->mantissa()->bstr(); ok 1673 - $x = Math::BigInt->new("-2"); $x = $x->mantissa()->bstr(); ok 1674 - $x = Math::BigInt->new("+inf"); $x = $x->mantissa()->bstr(); ok 1675 - $x = Math::BigInt->new("-inf"); $x = $x->mantissa()->bstr(); ok 1676 - $x = Math::BigInt->new("abc"); $x = $x->exponent()->bstr(); ok 1677 - $x = Math::BigInt->new("1e4"); $x = $x->exponent()->bstr(); ok 1678 - $x = Math::BigInt->new("2e0"); $x = $x->exponent()->bstr(); ok 1679 - $x = Math::BigInt->new("123"); $x = $x->exponent()->bstr(); ok 1680 - $x = Math::BigInt->new("-1"); $x = $x->exponent()->bstr(); ok 1681 - $x = Math::BigInt->new("-2"); $x = $x->exponent()->bstr(); ok 1682 - $x = Math::BigInt->new("0"); $x = $x->exponent()->bstr(); ok 1683 - $x = Math::BigInt->new("+inf"); $x = $x->exponent()->bstr(); ok 1684 - $x = Math::BigInt->new("-inf"); $x = $x->exponent()->bstr(); ok 1685 - $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 1686 - $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 1687 - $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 1688 - $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 1689 - $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 1690 - $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 1691 - $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 1692 - $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 1693 - $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 1694 - $x = Math::BigInt->new("abc"); $y = Math::BigInt->new("12"); $x ** $y; ok 1695 - is a valid object ok 1696 - $x = Math::BigInt->new("12"); $y = Math::BigInt->new("abc"); $x ** $y; ok 1697 - is a valid object ok 1698 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("0"); $x ** $y; ok 1699 - is a valid object ok 1700 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("1"); $x ** $y; ok 1701 - is a valid object ok 1702 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("2"); $x ** $y; ok 1703 - is a valid object ok 1704 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1705 - is a valid object ok 1706 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1707 - is a valid object ok 1708 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("0"); $x ** $y; ok 1709 - is a valid object ok 1710 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("1"); $x ** $y; ok 1711 - is a valid object ok 1712 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("2"); $x ** $y; ok 1713 - is a valid object ok 1714 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("3"); $x ** $y; ok 1715 - is a valid object ok 1716 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1717 - is a valid object ok 1718 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1719 - is a valid object ok 1720 - $x = Math::BigInt->new("1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1721 - is a valid object ok 1722 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("0"); $x ** $y; ok 1723 - is a valid object ok 1724 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("1"); $x ** $y; ok 1725 - is a valid object ok 1726 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("2"); $x ** $y; ok 1727 - is a valid object ok 1728 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("3"); $x ** $y; ok 1729 - is a valid object ok 1730 - $x = Math::BigInt->new("3"); $y = Math::BigInt->new("3"); $x ** $y; ok 1731 - is a valid object ok 1732 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1733 - ref($got) ok 1734 - $Math::BigInt::upgrade ok 1735 - is a valid object ok 1736 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1737 - ref($got) ok 1738 - $Math::BigInt::upgrade ok 1739 - is a valid object ok 1740 - $x = Math::BigInt->new("2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1741 - ref($got) ok 1742 - $Math::BigInt::upgrade ok 1743 - is a valid object ok 1744 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1745 - ref($got) ok 1746 - $Math::BigInt::upgrade ok 1747 - is a valid object ok 1748 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1749 - ref($got) ok 1750 - $Math::BigInt::upgrade ok 1751 - is a valid object ok 1752 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 1753 - is a valid object ok 1754 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500012"); $x ** $y; ok 1755 - is a valid object ok 1756 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("1234500013"); $x ** $y; ok 1757 - is a valid object ok 1758 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 1759 - is a valid object ok 1760 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("-12345000123"); $x ** $y; ok 1761 - is a valid object ok 1762 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("0"); $x ** $y; ok 1763 - is a valid object ok 1764 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("0"); $x ** $y; ok 1765 - is a valid object ok 1766 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("1"); $x ** $y; ok 1767 - is a valid object ok 1768 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("2"); $x ** $y; ok 1769 - is a valid object ok 1770 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("3"); $x ** $y; ok 1771 - is a valid object ok 1772 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("4"); $x ** $y; ok 1773 - is a valid object ok 1774 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("5"); $x ** $y; ok 1775 - is a valid object ok 1776 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-1"); $x ** $y; ok 1777 - is a valid object ok 1778 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-2"); $x ** $y; ok 1779 - is a valid object ok 1780 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-3"); $x ** $y; ok 1781 - is a valid object ok 1782 - $x = Math::BigInt->new("-1"); $y = Math::BigInt->new("-4"); $x ** $y; ok 1783 - is a valid object ok 1784 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("2"); $x ** $y; ok 1785 - is a valid object ok 1786 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("3"); $x ** $y; ok 1787 - is a valid object ok 1788 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("4"); $x ** $y; ok 1789 - is a valid object ok 1790 - $x = Math::BigInt->new("-2"); $y = Math::BigInt->new("5"); $x ** $y; ok 1791 - is a valid object ok 1792 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("2"); $x ** $y; ok 1793 - is a valid object ok 1794 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("3"); $x ** $y; ok 1795 - is a valid object ok 1796 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("4"); $x ** $y; ok 1797 - is a valid object ok 1798 - $x = Math::BigInt->new("-3"); $y = Math::BigInt->new("5"); $x ** $y; ok 1799 - is a valid object ok 1800 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("2"); $x ** $y; ok 1801 - is a valid object ok 1802 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("3"); $x ** $y; ok 1803 - is a valid object ok 1804 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("4"); $x ** $y; ok 1805 - is a valid object ok 1806 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("5"); $x ** $y; ok 1807 - is a valid object ok 1808 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("6"); $x ** $y; ok 1809 - is a valid object ok 1810 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("7"); $x ** $y; ok 1811 - is a valid object ok 1812 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("8"); $x ** $y; ok 1813 - is a valid object ok 1814 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("9"); $x ** $y; ok 1815 - is a valid object ok 1816 - $x = Math::BigInt->new("10"); $y = Math::BigInt->new("20"); $x ** $y; ok 1817 - is a valid object ok 1818 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("2"); $x ** $y; ok 1819 - is a valid object ok 1820 - $x = Math::BigInt->new("100"); $x->length(); ok 1821 - $x = Math::BigInt->new("10"); $x->length(); ok 1822 - $x = Math::BigInt->new("1"); $x->length(); ok 1823 - $x = Math::BigInt->new("0"); $x->length(); ok 1824 - $x = Math::BigInt->new("12345"); $x->length(); ok 1825 - $x = Math::BigInt->new("10000000000000000"); $x->length(); ok 1826 - $x = Math::BigInt->new("-123"); $x->length(); ok 1827 - $x = Math::BigInt->new("215960156869840440586892398248"); $x->length(); ok 1828 - $x = Math::BigInt->new("144"); $y = Math::BigInt->new("2"); $x->broot($y); ok 1829 - ref($got) ok 1830 - $Math::BigInt::upgrade ok 1831 - is a valid object ok 1832 - $x = Math::BigInt->new("123"); $y = Math::BigInt->new("2"); $x->broot($y); ok 1833 - ref($got) ok 1834 - $Math::BigInt::upgrade ok 1835 - is a valid object ok 1836 - $x = Math::BigInt->new("145"); $x->bsqrt(); ok 1837 - ref($got) ok 1838 - $Math::BigInt::upgrade ok 1839 - is a valid object ok 1840 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 1841 - ref($got) ok 1842 - $Math::BigInt::upgrade ok 1843 - is a valid object ok 1844 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 1845 - is a valid object ok 1846 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 1847 - ref($got) ok 1848 - $Math::BigInt::upgrade ok 1849 - is a valid object ok 1850 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 1851 - is a valid object ok 1852 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 1853 - ref($got) ok 1854 - $Math::BigInt::upgrade ok 1855 - is a valid object ok 1856 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 1857 - is a valid object ok 1858 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 1859 - ref($got) ok 1860 - $Math::BigInt::upgrade ok 1861 - is a valid object ok 1862 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 1863 - ref($got) ok 1864 - $Math::BigInt::upgrade ok 1865 - is a valid object ok 1866 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 1867 - is a valid object ok 1868 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 1869 - ref($got) ok 1870 - $Math::BigInt::upgrade ok 1871 - is a valid object ok 1872 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 1873 - is a valid object ok 1874 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 1875 - is a valid object ok 1876 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 1877 - is a valid object ok 1878 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 1879 - ref($got) ok 1880 - $Math::BigInt::upgrade ok 1881 - is a valid object ok 1882 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 1883 - is a valid object ok 1884 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 1885 - ref($got) ok 1886 - $Math::BigInt::upgrade ok 1887 - is a valid object ok 1888 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 1889 - is a valid object ok 1890 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 1891 - is a valid object ok 1892 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 1893 - is a valid object ok 1894 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 1895 - is a valid object ok 1896 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 1897 - is a valid object ok 1898 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 1899 - is a valid object ok 1900 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 1901 - is a valid object ok 1902 - $x = Math::BigInt->new("0"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1903 - is a valid object ok 1904 - $x = Math::BigInt->new("NaNbround"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1905 - is a valid object ok 1906 - $x = Math::BigInt->new("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1907 - is a valid object ok 1908 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1909 - is a valid object ok 1910 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1911 - is a valid object ok 1912 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1913 - is a valid object ok 1914 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1915 - is a valid object ok 1916 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1917 - is a valid object ok 1918 - $x = Math::BigInt->new("123456"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1919 - is a valid object ok 1920 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1921 - is a valid object ok 1922 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1923 - is a valid object ok 1924 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1925 - is a valid object ok 1926 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1927 - is a valid object ok 1928 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1929 - is a valid object ok 1930 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1931 - is a valid object ok 1932 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1933 - is a valid object ok 1934 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1935 - is a valid object ok 1936 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1937 - is a valid object ok 1938 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1939 - is a valid object ok 1940 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1941 - is a valid object ok 1942 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1943 - is a valid object ok 1944 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1945 - is a valid object ok 1946 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1947 - is a valid object ok 1948 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1949 - is a valid object ok 1950 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1951 - is a valid object ok 1952 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1953 - is a valid object ok 1954 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1955 - is a valid object ok 1956 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1957 - is a valid object ok 1958 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1959 - is a valid object ok 1960 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1961 - is a valid object ok 1962 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1963 - is a valid object ok 1964 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1965 - is a valid object ok 1966 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1967 - is a valid object ok 1968 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1969 - is a valid object ok 1970 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1971 - is a valid object ok 1972 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1973 - is a valid object ok 1974 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1975 - is a valid object ok 1976 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1977 - is a valid object ok 1978 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1979 - is a valid object ok 1980 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1981 - is a valid object ok 1982 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1983 - is a valid object ok 1984 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1985 - is a valid object ok 1986 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1987 - is a valid object ok 1988 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1989 - is a valid object ok 1990 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1991 - is a valid object ok 1992 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1993 - is a valid object ok 1994 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1995 - is a valid object ok 1996 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('even'); $x->bround($y); ok 1997 - is a valid object ok 1998 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("5"); Math::BigInt->round_mode('even'); $x->bround($y); ok 1999 - is a valid object ok 2000 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2001 - is a valid object ok 2002 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2003 - is a valid object ok 2004 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2005 - is a valid object ok 2006 - $x = Math::BigInt->new("-601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2007 - is a valid object ok 2008 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2009 - is a valid object ok 2010 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2011 - is a valid object ok 2012 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2013 - is a valid object ok 2014 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2015 - is a valid object ok 2016 - $x = Math::BigInt->new("0"); $x->is_zero(); ok 2017 - $x = Math::BigInt->new("NaNzero"); $x->is_zero(); ok 2018 - $x = Math::BigInt->new("+inf"); $x->is_zero(); ok 2019 - $x = Math::BigInt->new("-inf"); $x->is_zero(); ok 2020 - $x = Math::BigInt->new("123"); $x->is_zero(); ok 2021 - $x = Math::BigInt->new("-1"); $x->is_zero(); ok 2022 - $x = Math::BigInt->new("1"); $x->is_zero(); ok 2023 - $x = Math::BigInt->new("0"); $x->is_one(); ok 2024 - $x = Math::BigInt->new("NaNone"); $x->is_one(); ok 2025 - $x = Math::BigInt->new("+inf"); $x->is_one(); ok 2026 - $x = Math::BigInt->new("-inf"); $x->is_one(); ok 2027 - $x = Math::BigInt->new("1"); $x->is_one(); ok 2028 - $x = Math::BigInt->new("2"); $x->is_one(); ok 2029 - $x = Math::BigInt->new("-1"); $x->is_one(); ok 2030 - $x = Math::BigInt->new("-2"); $x->is_one(); ok 2031 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 2032 - is a valid object ok 2033 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 2034 - is a valid object ok 2035 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("0"); $x->bceil(); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("2"); $x->bceil(); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("3"); $x->bceil(); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("0"); $x->bint(); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("-1"); $x->bint(); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("-2"); $x->bint(); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("2"); $x->bint(); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("3"); $x->bint(); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("128"); $x->to_hex(); ok 2084 - $x = Math::BigInt->new("-128"); $x->to_hex(); ok 2085 - $x = Math::BigInt->new("0"); $x->to_hex(); ok 2086 - $x = Math::BigInt->new("-0"); $x->to_hex(); ok 2087 - $x = Math::BigInt->new("1"); $x->to_hex(); ok 2088 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_hex(); ok 2089 - $x = Math::BigInt->new("+inf"); $x->to_hex(); ok 2090 - $x = Math::BigInt->new("-inf"); $x->to_hex(); ok 2091 - $x = Math::BigInt->new("NaNto_hex"); $x->to_hex(); ok 2092 - $x = Math::BigInt->new("128"); $x->to_oct(); ok 2093 - $x = Math::BigInt->new("-128"); $x->to_oct(); ok 2094 - $x = Math::BigInt->new("0"); $x->to_oct(); ok 2095 - $x = Math::BigInt->new("-0"); $x->to_oct(); ok 2096 - $x = Math::BigInt->new("1"); $x->to_oct(); ok 2097 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 2098 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_oct(); ok 2099 - $x = Math::BigInt->new("+inf"); $x->to_oct(); ok 2100 - $x = Math::BigInt->new("-inf"); $x->to_oct(); ok 2101 - $x = Math::BigInt->new("NaNto_oct"); $x->to_oct(); ok 2102 - $x = Math::BigInt->new("128"); $x->to_bin(); ok 2103 - $x = Math::BigInt->new("-128"); $x->to_bin(); ok 2104 - $x = Math::BigInt->new("0"); $x->to_bin(); ok 2105 - $x = Math::BigInt->new("-0"); $x->to_bin(); ok 2106 - $x = Math::BigInt->new("1"); $x->to_bin(); ok 2107 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 2108 - $x = Math::BigInt->new("+inf"); $x->to_bin(); ok 2109 - $x = Math::BigInt->new("-inf"); $x->to_bin(); ok 2110 - $x = Math::BigInt->new("NaNto_bin"); $x->to_bin(); ok 2111 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 2112 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 2113 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 2114 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 2115 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 2116 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 2117 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 2118 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 2119 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 2120 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 2121 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 2122 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 2123 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 2124 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 2125 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 2126 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 2127 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 2128 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 2129 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 2130 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 2131 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 2132 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 2133 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 2134 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 2135 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 2136 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 2137 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 2138 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 2139 - $z = 3.17 <= $y ok 2140 - the code "$z = 3.17 <= $y" issued no warning ok 2141 - $z = $y >= 3.17 ok 2142 - the code "$z = $y >= 3.17" issued no warning ok t/upgrade2.t .................. 1..9 ok 1 - sqrt on a big int does not segv if there are 2 upgrade levels # Math::BigRat -> babs("2"); ok 2 - no 'Deep recursion on subroutine ...' # Math::BigRat -> bsgn("2"); ok 3 - no 'Deep recursion on subroutine ...' # Math::BigRat -> babs(Math::BigInt -> new("2")); ok 4 - no 'Deep recursion on subroutine ...' # Math::BigRat -> bsgn(Math::BigInt -> new("2")); ok 5 - no 'Deep recursion on subroutine ...' # Math::BigRat -> babs(Math::BigFloat -> new("2")); ok 6 - no 'Deep recursion on subroutine ...' # Math::BigRat -> bsgn(Math::BigFloat -> new("2")); ok 7 - no 'Deep recursion on subroutine ...' # Math::BigRat -> babs(Math::BigRat -> new("2")); ok 8 - no 'Deep recursion on subroutine ...' # Math::BigRat -> bsgn(Math::BigRat -> new("2")); ok 9 - no 'Deep recursion on subroutine ...' ok t/upgradef.t .................. 1..6 ok 1 - Math::BigFloat->upgrade() ok 2 - Math::BigFloat->downgrade() ok 3 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); ref($z) ok 4 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); $z ok 5 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); ref($z) ok 6 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); $z ok t/use.t ....................... 1..1 ok 1 - $x = Math::BigInt->new(1); ++$x; ok t/use_mbfw.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v2.003003 ok 1 - Math::BigFloat->config("with") ok 2 - Math::BigInt->config("lib") ok t/with_sub.t .................. 1..3071 ok 1 - Math::BigFloat->config("with") ok 2 - Math::BigFloat->config('lib') ok 3 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 4 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 5 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 6 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("12"); Math::BigFloat->bgcd($x, $y); ok 7 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 8 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 9 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 10 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 11 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 12 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); Math::BigFloat->bgcd($x, $y); ok 13 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 14 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 15 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 16 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); Math::BigFloat->bgcd($x, $y); ok 17 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 18 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 19 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 20 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 21 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 22 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->bgcd($x, $y); ok 23 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 24 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 25 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 26 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 27 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 28 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->bgcd($x, $y); ok 29 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 30 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); Math::BigFloat->bgcd($x, $y); ok 31 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 32 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); Math::BigFloat->bgcd($x, $y); ok 33 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 34 - $x = Math::BigFloat->new("+3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 35 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 36 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("+2"); Math::BigFloat->bgcd($x, $y); ok 37 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 38 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); Math::BigFloat->bgcd($x, $y); ok 39 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 40 - $x = Math::BigFloat->new("-144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 41 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 42 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("-60"); Math::BigFloat->bgcd($x, $y); ok 43 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 44 - $x = Math::BigFloat->new("144"); $y = Math::BigFloat->new("60"); Math::BigFloat->bgcd($x, $y); ok 45 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 46 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("625"); Math::BigFloat->bgcd($x, $y); ok 47 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 48 - $x = Math::BigFloat->new("4096"); $y = Math::BigFloat->new("81"); Math::BigFloat->bgcd($x, $y); ok 49 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 50 - $x = Math::BigFloat->new("1034"); $y = Math::BigFloat->new("804"); Math::BigFloat->bgcd($x, $y); ok 51 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 52 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("56"); Math::BigFloat->bgcd($x, $y, $z); ok 53 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 54 - $x = Math::BigFloat->new("27"); $y = Math::BigFloat->new("90"); $z = Math::BigFloat->new("54"); Math::BigFloat->bgcd($x, $y, $z); ok 55 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 56 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 57 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 58 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 59 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 60 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); Math::BigFloat->blcm($x, $y); ok 61 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 62 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 63 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 64 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); Math::BigFloat->blcm($x, $y); ok 65 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 66 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); Math::BigFloat->blcm($x, $y); ok 67 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 68 - $x = Math::BigFloat->new("+27"); $y = Math::BigFloat->new("+90"); Math::BigFloat->blcm($x, $y); ok 69 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 70 - $x = Math::BigFloat->new("+1034"); $y = Math::BigFloat->new("+804"); Math::BigFloat->blcm($x, $y); ok 71 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 72 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 73 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 74 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 75 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 76 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 77 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 78 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 79 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 80 - $x = Math::BigFloat->new("2.4"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 81 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 82 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 83 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 84 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bcos($y); ok 85 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 86 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bcos($y); ok 87 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 88 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("12"); $x->bcos($y); ok 89 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 90 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 91 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 92 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 93 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 94 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 95 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 96 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 97 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 98 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->bsin($y); ok 99 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 100 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("20"); $x->bsin($y); ok 101 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 102 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 103 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 104 - $x = Math::BigFloat->new("1.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 105 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 106 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->bsin($y); ok 107 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 108 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("12"); $x->bsin($y); ok 109 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 110 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 111 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 112 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 113 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 114 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 115 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 116 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 117 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 118 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("10"); $x->batan($y); ok 119 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 120 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 121 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 122 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("13"); $x->batan($y); ok 123 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 124 - $x = Math::BigFloat->new("0.2"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 125 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 126 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 127 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 128 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 129 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 130 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 131 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 132 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 133 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 134 - $x = Math::BigFloat->new("2.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 135 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 136 - $x = Math::BigFloat->new("2.5"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 137 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 138 - $x = Math::BigFloat->new("3.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 139 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 140 - $x = Math::BigFloat->new("6.0"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 141 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 142 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 143 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 144 - $x = Math::BigFloat->new("24"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 145 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 146 - $x = Math::BigFloat->new("48"); $y = Math::BigFloat->new("14"); $x->batan($y); ok 147 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 148 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 149 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 150 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 151 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $x->batan2($y, $z); ok 152 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $z = Math::BigFloat->new("10"); $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("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 156 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 157 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 158 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 159 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 160 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 161 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 162 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $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("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 166 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 167 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 168 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 169 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 170 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 171 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 172 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 173 - $x = Math::BigFloat->new("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("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 176 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 177 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 178 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 179 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 180 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 181 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 182 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("+inf"); $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("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 186 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 187 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 188 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 189 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 190 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 191 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 192 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+inf"); $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("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 196 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 197 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 198 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 199 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 200 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 201 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 202 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 203 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 204 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("13"); $x->batan2($y, $z); ok 205 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 206 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 207 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 208 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 209 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 210 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 211 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 212 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("11"); $x->batan2($y, $z); ok 213 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 214 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 215 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 216 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("77"); $x->batan2($y, $z); ok 217 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 218 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 219 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 220 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 221 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 222 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 223 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 224 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("8"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 225 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 226 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $z = Math::BigFloat->new("24"); $x->batan2($y, $z); ok 227 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 228 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 229 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 230 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $z = Math::BigFloat->new("14"); $x->batan2($y, $z); ok 231 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 232 - $x = Math::BigFloat->new("150"); Math::BigFloat->bpi($x); ok 233 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 234 - $x = Math::BigFloat->new("77"); Math::BigFloat->bpi($x); ok 235 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 236 - $x = Math::BigFloat->new("+0"); Math::BigFloat->bpi($x); ok 237 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 238 - $x = Math::BigFloat->new("11"); Math::BigFloat->bpi($x); ok 239 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 240 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("10"); $x->bnok($y); ok 241 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 242 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 243 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 244 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 245 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bnok($y); ok 247 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 248 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 249 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 250 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bnok($y); ok 251 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 252 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 253 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 254 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bnok($y); ok 255 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 256 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bnok($y); ok 257 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 258 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("6"); $x->bnok($y); ok 259 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 260 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("90"); $x->bnok($y); ok 261 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 262 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("95"); $x->bnok($y); ok 263 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 264 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 265 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 266 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bnok($y); ok 267 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 268 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bnok($y); ok 269 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 270 - $x = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 271 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 272 - $x = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 273 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 274 - $x = Math::BigFloat->new("-2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 275 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 276 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(-1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 277 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 278 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(0); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 279 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 280 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 281 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 282 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 283 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 284 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(1); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 285 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 286 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new(2); $Math::BigFloat::div_scale = 40; $x->blog($y); ok 287 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 288 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 289 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 290 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 291 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 292 - $x = Math::BigFloat->new("2.718281828"); $Math::BigFloat::div_scale = 20; $x->blog(); ok 293 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 294 - $x = Math::BigFloat->new("123"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 295 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 296 - $x = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 297 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 298 - $x = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 299 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 300 - $x = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 301 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 302 - $x = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 303 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 304 - $x = Math::BigFloat->new("3.1415"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 305 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 306 - $x = Math::BigFloat->new("12345"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 307 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 308 - $x = Math::BigFloat->new("0.001"); $Math::BigFloat::div_scale = 15; $x->blog(); ok 309 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 310 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new(10); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 311 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 312 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new(100); $Math::BigFloat::div_scale = 15; $x->blog($y); ok 313 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 314 - $x = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->blog(); ok 315 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 316 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 317 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 318 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->brsft($y); ok 319 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 320 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 321 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 322 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 323 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 324 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 325 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 326 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("1"); $x->brsft($y); ok 327 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 328 - $x = Math::BigFloat->new("32"); $y = Math::BigFloat->new("3"); $x->brsft($y); ok 329 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 330 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("0"); $x->blsft($y); ok 331 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 332 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->blsft($y); ok 333 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 334 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 335 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 336 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->blsft($y); ok 337 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 338 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->blsft($y); ok 339 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 340 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->blsft($y); ok 341 - $x = Math::BigFloat->new("1"); $x; ok 342 - $x = Math::BigFloat->new("1"); $x; ok 343 - $x = Math::BigFloat->new("-0"); $x; ok 344 - $x = Math::BigFloat->new("-0"); $x; ok 345 - $x = Math::BigFloat->new("invalid"); $x; ok 346 - $x = Math::BigFloat->new("invalid"); $x; ok 347 - $x = Math::BigFloat->new("+inf"); $x; ok 348 - $x = Math::BigFloat->new("+inf"); $x; ok 349 - $x = Math::BigFloat->new("-inf"); $x; ok 350 - $x = Math::BigFloat->new("-inf"); $x; ok 351 - $x = Math::BigFloat->new("123"); $x; ok 352 - $x = Math::BigFloat->new("123"); $x; ok 353 - $x = Math::BigFloat->new("-123.4567"); $x; ok 354 - $x = Math::BigFloat->new("-123.4567"); $x; ok 355 - $x = Math::BigFloat->new(".2E-3."); $x; ok 356 - $x = Math::BigFloat->new(".2E-3."); $x; ok 357 - $x = Math::BigFloat->new("1e3e4"); $x; ok 358 - $x = Math::BigFloat->new("1e3e4"); $x; ok 359 - $x = Math::BigFloat->new(".2E2"); $x; ok 360 - $x = Math::BigFloat->new(".2E2"); $x; ok 361 - $x = Math::BigFloat->new("1.E3"); $x; ok 362 - $x = Math::BigFloat->new("1.E3"); $x; ok 363 - $x = Math::BigFloat->new("0e0"); $x; ok 364 - $x = Math::BigFloat->new("0e0"); $x; ok 365 - $x = Math::BigFloat->new("+0e0"); $x; ok 366 - $x = Math::BigFloat->new("+0e0"); $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("+0e-0"); $x; ok 376 - $x = Math::BigFloat->new("+0e-0"); $x; ok 377 - $x = Math::BigFloat->new("000"); $x; ok 378 - $x = Math::BigFloat->new("000"); $x; ok 379 - $x = Math::BigFloat->new("00e2"); $x; ok 380 - $x = Math::BigFloat->new("00e2"); $x; ok 381 - $x = Math::BigFloat->new("00e02"); $x; ok 382 - $x = Math::BigFloat->new("00e02"); $x; ok 383 - $x = Math::BigFloat->new("000e002"); $x; ok 384 - $x = Math::BigFloat->new("000e002"); $x; ok 385 - $x = Math::BigFloat->new("000e1230"); $x; ok 386 - $x = Math::BigFloat->new("000e1230"); $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+3"); $x; ok 390 - $x = Math::BigFloat->new("00e+3"); $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("00e+03"); $x; ok 394 - $x = Math::BigFloat->new("00e+03"); $x; ok 395 - $x = Math::BigFloat->new("-000"); $x; ok 396 - $x = Math::BigFloat->new("-000"); $x; ok 397 - $x = Math::BigFloat->new("-00e2"); $x; ok 398 - $x = Math::BigFloat->new("-00e2"); $x; ok 399 - $x = Math::BigFloat->new("-00e02"); $x; ok 400 - $x = Math::BigFloat->new("-00e02"); $x; ok 401 - $x = Math::BigFloat->new("-000e002"); $x; ok 402 - $x = Math::BigFloat->new("-000e002"); $x; ok 403 - $x = Math::BigFloat->new("-000e1230"); $x; ok 404 - $x = Math::BigFloat->new("-000e1230"); $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+3"); $x; ok 408 - $x = Math::BigFloat->new("-00e+3"); $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("-00e+03"); $x; ok 412 - $x = Math::BigFloat->new("-00e+03"); $x; ok 413 - $x = Math::BigFloat->new("0"); $x->as_number(); ok 414 - $x = Math::BigFloat->new("1"); $x->as_number(); ok 415 - $x = Math::BigFloat->new("1.2"); $x->as_number(); ok 416 - $x = Math::BigFloat->new("2.345"); $x->as_number(); ok 417 - $x = Math::BigFloat->new("-2"); $x->as_number(); ok 418 - $x = Math::BigFloat->new("-123.456"); $x->as_number(); ok 419 - $x = Math::BigFloat->new("-200"); $x->as_number(); ok 420 - $x = Math::BigFloat->new("-inf"); $x->as_number(); ok 421 - $x = Math::BigFloat->new("inf"); $x->as_number(); ok 422 - $x = Math::BigFloat->new("NaN"); $x->as_number(); ok 423 - $x = Math::BigFloat->new("71243225429896467497217836789578596379"); $x->as_number(); ok 424 - $x = Math::BigFloat->new("0.000641"); $x->as_number(); ok 425 - $x = Math::BigFloat->new("0.0006412"); $x->as_number(); ok 426 - $x = Math::BigFloat->new("0.00064123"); $x->as_number(); ok 427 - $x = Math::BigFloat->new("0.000641234"); $x->as_number(); ok 428 - $x = Math::BigFloat->new("0.0006412345"); $x->as_number(); ok 429 - $x = Math::BigFloat->new("0.00064123456"); $x->as_number(); ok 430 - $x = Math::BigFloat->new("0.000641234567"); $x->as_number(); ok 431 - $x = Math::BigFloat->new("0.0006412345678"); $x->as_number(); ok 432 - $x = Math::BigFloat->new("0.00064123456789"); $x->as_number(); ok 433 - $x = Math::BigFloat->new("0.1"); $x->as_number(); ok 434 - $x = Math::BigFloat->new("0.01"); $x->as_number(); ok 435 - $x = Math::BigFloat->new("0.001"); $x->as_number(); ok 436 - $x = Math::BigFloat->new("0.0001"); $x->as_number(); ok 437 - $x = Math::BigFloat->new("0.00001"); $x->as_number(); ok 438 - $x = Math::BigFloat->new("0.000001"); $x->as_number(); ok 439 - $x = Math::BigFloat->new("0.0000001"); $x->as_number(); ok 440 - $x = Math::BigFloat->new("0.00000001"); $x->as_number(); ok 441 - $x = Math::BigFloat->new("0.000000001"); $x->as_number(); ok 442 - $x = Math::BigFloat->new("0.0000000001"); $x->as_number(); ok 443 - $x = Math::BigFloat->new("0.00000000001"); $x->as_number(); ok 444 - $x = Math::BigFloat->new("0.12345"); $x->as_number(); ok 445 - $x = Math::BigFloat->new("0.123456"); $x->as_number(); ok 446 - $x = Math::BigFloat->new("0.1234567"); $x->as_number(); ok 447 - $x = Math::BigFloat->new("0.12345678"); $x->as_number(); ok 448 - $x = Math::BigFloat->new("0.123456789"); $x->as_number(); ok 449 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 450 - $x = Math::BigFloat->new("1"); $x->binf("+"); ok 451 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 452 - $x = Math::BigFloat->new("2"); $x->binf("-"); ok 453 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 454 - $x = Math::BigFloat->new("3"); $x->binf("abc"); ok 455 - $x = Math::BigFloat->new("128"); $x->as_hex(); ok 456 - $x = Math::BigFloat->new("-128"); $x->as_hex(); ok 457 - $x = Math::BigFloat->new("0"); $x->as_hex(); ok 458 - $x = Math::BigFloat->new("-0"); $x->as_hex(); ok 459 - $x = Math::BigFloat->new("1"); $x->as_hex(); ok 460 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_hex(); ok 461 - $x = Math::BigFloat->new("+inf"); $x->as_hex(); ok 462 - $x = Math::BigFloat->new("-inf"); $x->as_hex(); ok 463 - $x = Math::BigFloat->new("invalid"); $x->as_hex(); ok 464 - $x = Math::BigFloat->new("128"); $x->as_bin(); ok 465 - $x = Math::BigFloat->new("-128"); $x->as_bin(); ok 466 - $x = Math::BigFloat->new("0"); $x->as_bin(); ok 467 - $x = Math::BigFloat->new("-0"); $x->as_bin(); ok 468 - $x = Math::BigFloat->new("1"); $x->as_bin(); ok 469 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 470 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_bin(); ok 471 - $x = Math::BigFloat->new("+inf"); $x->as_bin(); ok 472 - $x = Math::BigFloat->new("-inf"); $x->as_bin(); ok 473 - $x = Math::BigFloat->new("invalid"); $x->as_bin(); ok 474 - $x = Math::BigFloat->new("128"); $x->as_oct(); ok 475 - $x = Math::BigFloat->new("-128"); $x->as_oct(); ok 476 - $x = Math::BigFloat->new("0"); $x->as_oct(); ok 477 - $x = Math::BigFloat->new("-0"); $x->as_oct(); ok 478 - $x = Math::BigFloat->new("1"); $x->as_oct(); ok 479 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 480 - $x = Math::BigFloat->new("0x123456789123456789"); $x->as_oct(); ok 481 - $x = Math::BigFloat->new("+inf"); $x->as_oct(); ok 482 - $x = Math::BigFloat->new("-inf"); $x->as_oct(); ok 483 - $x = Math::BigFloat->new("invalid"); $x->as_oct(); ok 484 - $x = Math::BigFloat->new("128"); $x->to_hex(); ok 485 - $x = Math::BigFloat->new("-128"); $x->to_hex(); ok 486 - $x = Math::BigFloat->new("0"); $x->to_hex(); ok 487 - $x = Math::BigFloat->new("-0"); $x->to_hex(); ok 488 - $x = Math::BigFloat->new("1"); $x->to_hex(); ok 489 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_hex(); ok 490 - $x = Math::BigFloat->new("+inf"); $x->to_hex(); ok 491 - $x = Math::BigFloat->new("-inf"); $x->to_hex(); ok 492 - $x = Math::BigFloat->new("invalid"); $x->to_hex(); ok 493 - $x = Math::BigFloat->new("128"); $x->to_bin(); ok 494 - $x = Math::BigFloat->new("-128"); $x->to_bin(); ok 495 - $x = Math::BigFloat->new("0"); $x->to_bin(); ok 496 - $x = Math::BigFloat->new("-0"); $x->to_bin(); ok 497 - $x = Math::BigFloat->new("1"); $x->to_bin(); ok 498 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 499 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_bin(); ok 500 - $x = Math::BigFloat->new("+inf"); $x->to_bin(); ok 501 - $x = Math::BigFloat->new("-inf"); $x->to_bin(); ok 502 - $x = Math::BigFloat->new("invalid"); $x->to_bin(); ok 503 - $x = Math::BigFloat->new("128"); $x->to_oct(); ok 504 - $x = Math::BigFloat->new("-128"); $x->to_oct(); ok 505 - $x = Math::BigFloat->new("0"); $x->to_oct(); ok 506 - $x = Math::BigFloat->new("-0"); $x->to_oct(); ok 507 - $x = Math::BigFloat->new("1"); $x->to_oct(); ok 508 - $x = Math::BigFloat->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 509 - $x = Math::BigFloat->new("0x123456789123456789"); $x->to_oct(); ok 510 - $x = Math::BigFloat->new("+inf"); $x->to_oct(); ok 511 - $x = Math::BigFloat->new("-inf"); $x->to_oct(); ok 512 - $x = Math::BigFloat->new("invalid"); $x->to_oct(); ok 513 - $x = Math::BigFloat->new("0"); $x->numify(); ok 514 - $x = Math::BigFloat->new("+1"); $x->numify(); ok 515 - $x = Math::BigFloat->new("1234"); $x->numify(); ok 516 - $x = Math::BigFloat->new("-5"); $x->numify(); ok 517 - $x = Math::BigFloat->new("100"); $x->numify(); ok 518 - $x = Math::BigFloat->new("-100"); $x->numify(); ok 519 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 520 - $x = Math::BigFloat->new("abc"); $x->bnan(); ok 521 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 522 - $x = Math::BigFloat->new("2"); $x->bnan(); ok 523 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 524 - $x = Math::BigFloat->new("-2"); $x->bnan(); ok 525 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 526 - $x = Math::BigFloat->new("0"); $x->bnan(); ok 527 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 528 - $x = Math::BigFloat->new("2"); $x->bone("+"); ok 529 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 530 - $x = Math::BigFloat->new("-2"); $x->bone("-"); ok 531 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 532 - $x = Math::BigFloat->new("-2"); $x->bone("+"); ok 533 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 534 - $x = Math::BigFloat->new("2"); $x->bone("-"); ok 535 - $x = Math::BigFloat->new("0"); $x->bone(); ok 536 - $x = Math::BigFloat->new("0"); $x->bone(); ok 537 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 538 - $x = Math::BigFloat->new("-2"); $x->bone(); ok 539 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 540 - $x = Math::BigFloat->new("abc"); $x->bone(); ok 541 - $x = Math::BigFloat->new("2"); $x->bone(); ok 542 - $x = Math::BigFloat->new("2"); $x->bone(); ok 543 - $x = Math::BigFloat->new("+inf"); $x->bsstr(); ok 544 - $x = Math::BigFloat->new("-inf"); $x->bsstr(); ok 545 - $x = Math::BigFloat->new("abcfsstr"); $x->bsstr(); ok 546 - $x = Math::BigFloat->new("-abcfsstr"); $x->bsstr(); ok 547 - $x = Math::BigFloat->new("1234.567"); $x->bsstr(); ok 548 - $x = Math::BigFloat->new("123"); $x->bsstr(); ok 549 - $x = Math::BigFloat->new("-5"); $x->bsstr(); ok 550 - $x = Math::BigFloat->new("-100"); $x->bsstr(); ok 551 - $x = Math::BigFloat->new("+inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 552 - $x = Math::BigFloat->new("-inf"); $x->accuracy(); $x->precision(); $x->bstr(); ok 553 - $x = Math::BigFloat->new("abcfstr"); $x->accuracy(); $x->precision(); $x->bstr(); ok 554 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(9); $x->precision(); $x->bstr(); ok 555 - $x = Math::BigFloat->new("1234.567"); $x->accuracy(); $x->precision(-6); $x->bstr(); ok 556 - $x = Math::BigFloat->new("12345"); $x->accuracy(5); $x->precision(); $x->bstr(); ok 557 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(6); $x->precision(); $x->bstr(); ok 558 - $x = Math::BigFloat->new("0.001234"); $x->accuracy(); $x->precision(-8); $x->bstr(); ok 559 - $x = Math::BigFloat->new("0"); $x->accuracy(4); $x->precision(); $x->bstr(); ok 560 - $x = Math::BigFloat->new("0"); $x->accuracy(); $x->precision(-4); $x->bstr(); ok 561 - $x = Math::BigFloat->new("inf"); $x; ok 562 - $x = Math::BigFloat->new("inf"); $x; ok 563 - $x = Math::BigFloat->new("+inf"); $x; ok 564 - $x = Math::BigFloat->new("+inf"); $x; ok 565 - $x = Math::BigFloat->new("-inf"); $x; ok 566 - $x = Math::BigFloat->new("-inf"); $x; ok 567 - $x = Math::BigFloat->new("+infinity"); $x; ok 568 - $x = Math::BigFloat->new("+infinity"); $x; ok 569 - $x = Math::BigFloat->new("+-inf"); $x; ok 570 - $x = Math::BigFloat->new("+-inf"); $x; ok 571 - $x = Math::BigFloat->new("abc"); $x; ok 572 - $x = Math::BigFloat->new("abc"); $x; ok 573 - $x = Math::BigFloat->new(" 1 a"); $x; ok 574 - $x = Math::BigFloat->new(" 1 a"); $x; ok 575 - $x = Math::BigFloat->new("1bcd2"); $x; ok 576 - $x = Math::BigFloat->new("1bcd2"); $x; ok 577 - $x = Math::BigFloat->new("11111b"); $x; ok 578 - $x = Math::BigFloat->new("11111b"); $x; ok 579 - $x = Math::BigFloat->new("+1z"); $x; ok 580 - $x = Math::BigFloat->new("+1z"); $x; ok 581 - $x = Math::BigFloat->new("-1z"); $x; ok 582 - $x = Math::BigFloat->new("-1z"); $x; ok 583 - $x = Math::BigFloat->new("0e999"); $x; ok 584 - $x = Math::BigFloat->new("0e999"); $x; ok 585 - $x = Math::BigFloat->new("0e-999"); $x; ok 586 - $x = Math::BigFloat->new("0e-999"); $x; ok 587 - $x = Math::BigFloat->new("-0e999"); $x; ok 588 - $x = Math::BigFloat->new("-0e999"); $x; ok 589 - $x = Math::BigFloat->new("-0e-999"); $x; ok 590 - $x = Math::BigFloat->new("-0e-999"); $x; ok 591 - $x = Math::BigFloat->new("0"); $x; ok 592 - $x = Math::BigFloat->new("0"); $x; ok 593 - $x = Math::BigFloat->new("+0"); $x; ok 594 - $x = Math::BigFloat->new("+0"); $x; ok 595 - $x = Math::BigFloat->new("+00"); $x; ok 596 - $x = Math::BigFloat->new("+00"); $x; ok 597 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 598 - $x = Math::BigFloat->new("+0_0_0"); $x; ok 599 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 600 - $x = Math::BigFloat->new("000000_0000000_00000"); $x; ok 601 - $x = Math::BigFloat->new("-0"); $x; ok 602 - $x = Math::BigFloat->new("-0"); $x; ok 603 - $x = Math::BigFloat->new("-0000"); $x; ok 604 - $x = Math::BigFloat->new("-0000"); $x; ok 605 - $x = Math::BigFloat->new("+1"); $x; ok 606 - $x = Math::BigFloat->new("+1"); $x; ok 607 - $x = Math::BigFloat->new("+01"); $x; ok 608 - $x = Math::BigFloat->new("+01"); $x; ok 609 - $x = Math::BigFloat->new("+001"); $x; ok 610 - $x = Math::BigFloat->new("+001"); $x; ok 611 - $x = Math::BigFloat->new("+00000100000"); $x; ok 612 - $x = Math::BigFloat->new("+00000100000"); $x; ok 613 - $x = Math::BigFloat->new("123456789"); $x; ok 614 - $x = Math::BigFloat->new("123456789"); $x; ok 615 - $x = Math::BigFloat->new("-1"); $x; ok 616 - $x = Math::BigFloat->new("-1"); $x; ok 617 - $x = Math::BigFloat->new("-01"); $x; ok 618 - $x = Math::BigFloat->new("-01"); $x; ok 619 - $x = Math::BigFloat->new("-001"); $x; ok 620 - $x = Math::BigFloat->new("-001"); $x; ok 621 - $x = Math::BigFloat->new("-123456789"); $x; ok 622 - $x = Math::BigFloat->new("-123456789"); $x; ok 623 - $x = Math::BigFloat->new("-00000100000"); $x; ok 624 - $x = Math::BigFloat->new("-00000100000"); $x; ok 625 - $x = Math::BigFloat->new("123.456a"); $x; ok 626 - $x = Math::BigFloat->new("123.456a"); $x; ok 627 - $x = Math::BigFloat->new("123.456"); $x; ok 628 - $x = Math::BigFloat->new("123.456"); $x; ok 629 - $x = Math::BigFloat->new("0.01"); $x; ok 630 - $x = Math::BigFloat->new("0.01"); $x; ok 631 - $x = Math::BigFloat->new(".002"); $x; ok 632 - $x = Math::BigFloat->new(".002"); $x; ok 633 - $x = Math::BigFloat->new("+.2"); $x; ok 634 - $x = Math::BigFloat->new("+.2"); $x; ok 635 - $x = Math::BigFloat->new("-0.0003"); $x; ok 636 - $x = Math::BigFloat->new("-0.0003"); $x; ok 637 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 638 - $x = Math::BigFloat->new("-.0000000004"); $x; ok 639 - $x = Math::BigFloat->new("123456E2"); $x; ok 640 - $x = Math::BigFloat->new("123456E2"); $x; ok 641 - $x = Math::BigFloat->new("123456E-2"); $x; ok 642 - $x = Math::BigFloat->new("123456E-2"); $x; ok 643 - $x = Math::BigFloat->new("-123456E2"); $x; ok 644 - $x = Math::BigFloat->new("-123456E2"); $x; ok 645 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 646 - $x = Math::BigFloat->new("-123456E-2"); $x; ok 647 - $x = Math::BigFloat->new("1e1"); $x; ok 648 - $x = Math::BigFloat->new("1e1"); $x; ok 649 - $x = Math::BigFloat->new("2e-11"); $x; ok 650 - $x = Math::BigFloat->new("2e-11"); $x; ok 651 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 652 - $x = Math::BigFloat->new(" .02e-1"); $x; ok 653 - $x = Math::BigFloat->new(" 000001"); $x; ok 654 - $x = Math::BigFloat->new(" 000001"); $x; ok 655 - $x = Math::BigFloat->new(" -00001"); $x; ok 656 - $x = Math::BigFloat->new(" -00001"); $x; ok 657 - $x = Math::BigFloat->new(" -1"); $x; ok 658 - $x = Math::BigFloat->new(" -1"); $x; ok 659 - $x = Math::BigFloat->new(" 000.01"); $x; ok 660 - $x = Math::BigFloat->new(" 000.01"); $x; ok 661 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 662 - $x = Math::BigFloat->new(" -000.0023"); $x; ok 663 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 664 - $x = Math::BigFloat->new(" 1.1e1"); $x; ok 665 - $x = Math::BigFloat->new("-3e111"); $x; ok 666 - $x = Math::BigFloat->new("-3e111"); $x; ok 667 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 668 - $x = Math::BigFloat->new("-4e-1111"); $x; ok 669 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 670 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("123.456"); $x->bpow($y); ok 671 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 672 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("abc"); $x->bpow($y); ok 673 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 674 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 675 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 676 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 677 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 678 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 679 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 680 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 681 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 682 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 683 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 684 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 685 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 686 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 687 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 688 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 689 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 690 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 691 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 692 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 693 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 694 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 695 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 696 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 697 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 698 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 699 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 700 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 701 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 702 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 703 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 704 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 705 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 706 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 707 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 708 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 709 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 710 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 711 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 712 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 713 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 714 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 715 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 716 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 717 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 718 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 719 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 720 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 721 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 722 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 723 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 724 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 725 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 726 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 727 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 728 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 729 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 730 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 731 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 732 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 733 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 734 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 735 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 736 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 737 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 738 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 739 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 740 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 741 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 742 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 743 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 744 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 745 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 746 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 747 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 748 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 749 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 750 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 751 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 752 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 753 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 754 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 755 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 756 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 757 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 758 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 759 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 760 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 761 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 762 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 763 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 764 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 765 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 766 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 767 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 768 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 769 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 770 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 771 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 772 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 773 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 774 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 775 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 776 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 777 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 778 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 779 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 780 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 781 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 782 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 783 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 784 - $x = Math::BigFloat->new("-1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 785 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 786 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 787 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 788 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 789 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 790 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 791 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 792 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 793 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 794 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 795 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 796 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 797 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 798 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 799 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 800 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 801 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 802 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 803 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 804 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 805 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 806 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 807 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 808 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 809 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 810 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 811 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 812 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 813 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 814 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 815 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 816 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 817 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 818 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 819 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 820 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 821 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 822 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 823 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 824 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 825 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 826 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 827 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 828 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 829 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 830 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 831 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 832 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 833 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 834 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 835 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 836 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 837 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 838 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 839 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 840 - $x = Math::BigFloat->new("-0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 841 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 842 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 843 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 844 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 845 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 846 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 847 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 848 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 849 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 850 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 851 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 852 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 853 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 854 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 855 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 857 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 858 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 859 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 860 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 861 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 862 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 863 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 864 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 865 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 866 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 867 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 868 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 869 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 870 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 871 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 872 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 873 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 874 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 875 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 876 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 877 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 878 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 879 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 880 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 881 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 882 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 883 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 884 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 885 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 886 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 887 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 888 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 889 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 890 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 891 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 892 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 893 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 894 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 895 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 896 - $x = Math::BigFloat->new("0.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 897 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 898 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 899 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 900 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 901 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 902 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 903 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 904 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 905 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 906 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 907 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 908 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 909 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 910 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 911 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 912 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 913 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 914 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 915 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 916 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 917 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 918 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 919 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 920 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 921 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 922 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 923 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 924 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 925 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 926 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 927 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 928 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 929 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 930 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 931 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 932 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 933 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 934 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 935 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 936 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 937 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 938 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 939 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 940 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 941 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 942 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 943 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 944 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 945 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 946 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 947 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 948 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 949 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 950 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 951 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 952 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 953 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 954 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 955 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 956 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 957 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 958 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 959 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 960 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 961 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 962 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 963 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 964 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 965 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 966 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 967 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 968 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 969 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 970 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 971 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 972 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 973 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 974 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 975 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 976 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 977 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 978 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 979 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 980 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 981 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 982 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 983 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 984 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 985 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 986 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 987 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 988 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 989 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 990 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 991 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 992 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 993 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 994 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 995 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 996 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 997 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 998 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 999 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1000 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1001 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1002 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1003 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1004 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1005 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1006 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1007 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1008 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1009 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1010 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1011 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1012 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1013 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1014 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1015 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1016 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1017 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1018 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1019 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1020 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1021 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1022 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1023 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1024 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1025 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1026 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1027 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1028 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1029 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1030 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1031 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1032 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1033 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1034 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1035 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1036 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1037 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1038 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bpow($y); ok 1039 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1040 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-3"); $x->bpow($y); ok 1041 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1042 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1043 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1044 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1.5"); $x->bpow($y); ok 1045 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1046 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-1"); $x->bpow($y); ok 1047 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1048 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-0.5"); $x->bpow($y); ok 1049 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1050 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $x->bpow($y); ok 1051 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1052 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0.5"); $x->bpow($y); ok 1053 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1054 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bpow($y); ok 1055 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1056 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1.5"); $x->bpow($y); ok 1057 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1058 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1059 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1060 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bpow($y); ok 1061 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1062 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bpow($y); ok 1063 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1064 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("NaN"); $x->bpow($y); ok 1065 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1066 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $x->bpow($y); ok 1067 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1068 - $x = Math::BigFloat->new("128"); $y = Math::BigFloat->new("-2"); $x->bpow($y); ok 1069 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1070 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1071 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1072 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.45"); $x->bpow($y); ok 1073 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1074 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1075 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1076 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.45"); $x->bpow($y); ok 1077 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1078 - $x = Math::BigFloat->new("invalid"); $x->bneg(); ok 1079 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1080 - $x = Math::BigFloat->new("+inf"); $x->bneg(); ok 1081 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1082 - $x = Math::BigFloat->new("-inf"); $x->bneg(); ok 1083 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1084 - $x = Math::BigFloat->new("+0"); $x->bneg(); ok 1085 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1086 - $x = Math::BigFloat->new("+1"); $x->bneg(); ok 1087 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1088 - $x = Math::BigFloat->new("-1"); $x->bneg(); ok 1089 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1090 - $x = Math::BigFloat->new("+123456789"); $x->bneg(); ok 1091 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1092 - $x = Math::BigFloat->new("-123456789"); $x->bneg(); ok 1093 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1094 - $x = Math::BigFloat->new("+123.456789"); $x->bneg(); ok 1095 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1096 - $x = Math::BigFloat->new("-123456.789"); $x->bneg(); ok 1097 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1098 - $x = Math::BigFloat->new("invalid"); $x->babs(); ok 1099 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1100 - $x = Math::BigFloat->new("+inf"); $x->babs(); ok 1101 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1102 - $x = Math::BigFloat->new("-inf"); $x->babs(); ok 1103 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1104 - $x = Math::BigFloat->new("+0"); $x->babs(); ok 1105 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1106 - $x = Math::BigFloat->new("+1"); $x->babs(); ok 1107 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1108 - $x = Math::BigFloat->new("-1"); $x->babs(); ok 1109 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1110 - $x = Math::BigFloat->new("+123456789"); $x->babs(); ok 1111 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1112 - $x = Math::BigFloat->new("-123456789"); $x->babs(); ok 1113 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1114 - $x = Math::BigFloat->new("+123.456789"); $x->babs(); ok 1115 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1116 - $x = Math::BigFloat->new("-123456.789"); $x->babs(); ok 1117 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1118 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1119 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1120 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1121 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1122 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1123 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1124 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1125 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1126 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1127 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1128 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1129 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1130 - $x = Math::BigFloat->new("+10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1131 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1132 - $x = Math::BigFloat->new("-10123456789.123"); $Math::BigFloat::round_mode = "trunc"; $x->bround(5); ok 1133 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1134 - $x = Math::BigFloat->new("+10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1135 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1136 - $x = Math::BigFloat->new("-10123456789"); $Math::BigFloat::round_mode = "trunc"; $x->bround(9); ok 1137 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1138 - $x = Math::BigFloat->new("+101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1139 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1140 - $x = Math::BigFloat->new("-101234500"); $Math::BigFloat::round_mode = "trunc"; $x->bround(6); ok 1141 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1142 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1143 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1144 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1145 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1146 - $x = Math::BigFloat->new("+20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1147 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1148 - $x = Math::BigFloat->new("-20123456789.123"); $Math::BigFloat::round_mode = "zero"; $x->bround(5); ok 1149 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1150 - $x = Math::BigFloat->new("+20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1151 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1152 - $x = Math::BigFloat->new("-20123456789"); $Math::BigFloat::round_mode = "zero"; $x->bround(9); ok 1153 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1154 - $x = Math::BigFloat->new("+201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1155 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1156 - $x = Math::BigFloat->new("-201234500"); $Math::BigFloat::round_mode = "zero"; $x->bround(6); ok 1157 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1158 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1159 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1160 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1161 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1162 - $x = Math::BigFloat->new("+30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1163 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1164 - $x = Math::BigFloat->new("-30123456789.123"); $Math::BigFloat::round_mode = "+inf"; $x->bround(5); ok 1165 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1166 - $x = Math::BigFloat->new("+30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1167 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1168 - $x = Math::BigFloat->new("-30123456789"); $Math::BigFloat::round_mode = "+inf"; $x->bround(9); ok 1169 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1170 - $x = Math::BigFloat->new("+301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1171 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1172 - $x = Math::BigFloat->new("-301234500"); $Math::BigFloat::round_mode = "+inf"; $x->bround(6); ok 1173 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1174 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1175 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1176 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1177 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1178 - $x = Math::BigFloat->new("+40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1179 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1180 - $x = Math::BigFloat->new("-40123456789.123"); $Math::BigFloat::round_mode = "-inf"; $x->bround(5); ok 1181 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1182 - $x = Math::BigFloat->new("+40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1183 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1184 - $x = Math::BigFloat->new("-40123456789"); $Math::BigFloat::round_mode = "-inf"; $x->bround(9); ok 1185 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1186 - $x = Math::BigFloat->new("+401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1187 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1188 - $x = Math::BigFloat->new("-401234500"); $Math::BigFloat::round_mode = "-inf"; $x->bround(6); ok 1189 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1190 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1191 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1192 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1193 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1194 - $x = Math::BigFloat->new("+50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1195 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1196 - $x = Math::BigFloat->new("-50123456789.123"); $Math::BigFloat::round_mode = "odd"; $x->bround(5); ok 1197 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1198 - $x = Math::BigFloat->new("+50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1199 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1200 - $x = Math::BigFloat->new("-50123456789"); $Math::BigFloat::round_mode = "odd"; $x->bround(9); ok 1201 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1202 - $x = Math::BigFloat->new("+501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1203 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1204 - $x = Math::BigFloat->new("-501234500"); $Math::BigFloat::round_mode = "odd"; $x->bround(6); ok 1205 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1206 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1207 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1208 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1209 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1210 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1211 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1212 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "even"; $x->bround(9); ok 1213 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1214 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1215 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1216 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "even"; $x->bround(6); ok 1217 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1218 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1219 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1220 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "even"; $x->bround(5); ok 1221 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1222 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1223 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1224 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1225 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1226 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1227 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1228 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1229 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1230 - $x = Math::BigFloat->new("+60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1231 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1232 - $x = Math::BigFloat->new("-60123456789"); $Math::BigFloat::round_mode = "common"; $x->bround(9); ok 1233 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1234 - $x = Math::BigFloat->new("+601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1235 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1236 - $x = Math::BigFloat->new("-601234500"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1237 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1238 - $x = Math::BigFloat->new("+601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1239 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1240 - $x = Math::BigFloat->new("-601234400"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1241 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1242 - $x = Math::BigFloat->new("+601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1243 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1244 - $x = Math::BigFloat->new("-601234600"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1245 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1246 - $x = Math::BigFloat->new("+601234300"); $Math::BigFloat::round_mode = "common"; $x->bround(6); ok 1247 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1248 - $x = Math::BigFloat->new("+60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1249 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1250 - $x = Math::BigFloat->new("-60123456789.0123"); $Math::BigFloat::round_mode = "common"; $x->bround(5); ok 1251 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1252 - $x = Math::BigFloat->new("+inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1253 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1254 - $x = Math::BigFloat->new("-inf"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1255 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1256 - $x = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1257 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1258 - $x = Math::BigFloat->new("invalid"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(5); ok 1259 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1260 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1261 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1262 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1263 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1264 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1265 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1266 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1267 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1268 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1269 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1270 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1271 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1272 - $x = Math::BigFloat->new("+1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1273 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1274 - $x = Math::BigFloat->new("+1.234"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1275 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1276 - $x = Math::BigFloat->new("+1.2345"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1277 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1278 - $x = Math::BigFloat->new("-1.23"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1279 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1280 - $x = Math::BigFloat->new("+1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1281 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1282 - $x = Math::BigFloat->new("-1.27"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1283 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1284 - $x = Math::BigFloat->new("+1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1285 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1286 - $x = Math::BigFloat->new("-1.25"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1287 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1288 - $x = Math::BigFloat->new("+1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1289 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1290 - $x = Math::BigFloat->new("-1.35"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1291 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1292 - $x = Math::BigFloat->new("-0.0061234567890"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1293 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1294 - $x = Math::BigFloat->new("-0.0061"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1295 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1296 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1297 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1298 - $x = Math::BigFloat->new("-0.00612"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1299 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1300 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-1); ok 1301 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1302 - $x = Math::BigFloat->new("-0.006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1303 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1304 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-2); ok 1305 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1306 - $x = Math::BigFloat->new("-0.0006"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1307 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-3); ok 1308 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-4); ok 1309 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(-5); ok 1310 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1311 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1312 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1313 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1314 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1315 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1316 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1317 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "trunc"; $x->bfround(0); ok 1318 - $x = Math::BigFloat->new("+2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1319 - $x = Math::BigFloat->new("-2.23"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1320 - $x = Math::BigFloat->new("+2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1321 - $x = Math::BigFloat->new("-2.27"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1322 - $x = Math::BigFloat->new("+2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1323 - $x = Math::BigFloat->new("-2.25"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1324 - $x = Math::BigFloat->new("+2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1325 - $x = Math::BigFloat->new("-2.35"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1326 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1327 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-1); ok 1328 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-2); ok 1329 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-3); ok 1330 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-4); ok 1331 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "zero"; $x->bfround(-5); ok 1332 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1333 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1334 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1335 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1336 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1337 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1338 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1339 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "zero"; $x->bfround(0); ok 1340 - $x = Math::BigFloat->new("+3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1341 - $x = Math::BigFloat->new("-3.23"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1342 - $x = Math::BigFloat->new("+3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1343 - $x = Math::BigFloat->new("-3.27"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1344 - $x = Math::BigFloat->new("+3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1345 - $x = Math::BigFloat->new("-3.25"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1346 - $x = Math::BigFloat->new("+3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1347 - $x = Math::BigFloat->new("-3.35"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1348 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1349 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-1); ok 1350 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-2); ok 1351 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-3); ok 1352 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-4); ok 1353 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(-5); ok 1354 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1355 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1356 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1357 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1358 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1359 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1360 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1361 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "+inf"; $x->bfround(0); ok 1362 - $x = Math::BigFloat->new("+4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1363 - $x = Math::BigFloat->new("-4.23"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1364 - $x = Math::BigFloat->new("+4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1365 - $x = Math::BigFloat->new("-4.27"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1366 - $x = Math::BigFloat->new("+4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1367 - $x = Math::BigFloat->new("-4.25"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1368 - $x = Math::BigFloat->new("+4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1369 - $x = Math::BigFloat->new("-4.35"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1370 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1371 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-1); ok 1372 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-2); ok 1373 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-3); ok 1374 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-4); ok 1375 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(-5); ok 1376 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1377 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1378 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1379 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1380 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1381 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1382 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1383 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "-inf"; $x->bfround(0); ok 1384 - $x = Math::BigFloat->new("+5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1385 - $x = Math::BigFloat->new("-5.23"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1386 - $x = Math::BigFloat->new("+5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1387 - $x = Math::BigFloat->new("-5.27"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1388 - $x = Math::BigFloat->new("+5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1389 - $x = Math::BigFloat->new("-5.25"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1390 - $x = Math::BigFloat->new("+5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1391 - $x = Math::BigFloat->new("-5.35"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1392 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1393 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-1); ok 1394 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-2); ok 1395 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-3); ok 1396 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-4); ok 1397 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "odd"; $x->bfround(-5); ok 1398 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1399 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1400 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1401 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1402 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1403 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1404 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1405 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "odd"; $x->bfround(0); ok 1406 - $x = Math::BigFloat->new("+6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1407 - $x = Math::BigFloat->new("-6.23"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1408 - $x = Math::BigFloat->new("+6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1409 - $x = Math::BigFloat->new("-6.27"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1410 - $x = Math::BigFloat->new("+6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1411 - $x = Math::BigFloat->new("-6.25"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1412 - $x = Math::BigFloat->new("+6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1413 - $x = Math::BigFloat->new("-6.35"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1414 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1415 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-1); ok 1416 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-2); ok 1417 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1418 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1419 - $x = Math::BigFloat->new("-0.0065"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1420 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1421 - $x = Math::BigFloat->new("0.05"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1422 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1423 - $x = Math::BigFloat->new("0.5"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1424 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1425 - $x = Math::BigFloat->new("0.51"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1426 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1427 - $x = Math::BigFloat->new("0.41"); $Math::BigFloat::round_mode = "even"; $x->bfround(0); ok 1428 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1429 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-3); ok 1430 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1431 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-4); ok 1432 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1433 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-5); ok 1434 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1435 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-6); ok 1436 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1437 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-7); ok 1438 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1439 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-8); ok 1440 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1441 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-9); ok 1442 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1443 - $x = Math::BigFloat->new("0.01234567"); $Math::BigFloat::round_mode = "even"; $x->bfround(-12); ok 1444 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1445 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1446 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bcmp($y); ok 1447 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1448 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1449 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1450 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1451 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1452 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1453 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1454 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bcmp($y); ok 1455 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bcmp($y); ok 1456 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1457 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bcmp($y); ok 1458 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bcmp($y); ok 1459 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bcmp($y); ok 1460 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1461 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bcmp($y); ok 1462 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1463 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1464 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bcmp($y); ok 1465 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1466 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bcmp($y); ok 1467 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bcmp($y); ok 1468 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bcmp($y); ok 1469 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bcmp($y); ok 1470 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bcmp($y); ok 1471 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1472 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bcmp($y); ok 1473 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bcmp($y); ok 1474 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1475 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1476 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1477 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1478 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bcmp($y); ok 1479 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bcmp($y); ok 1480 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1481 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bcmp($y); ok 1482 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1483 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1484 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1485 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1486 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1487 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1488 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bcmp($y); ok 1489 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bcmp($y); ok 1490 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bcmp($y); ok 1491 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bcmp($y); ok 1492 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bcmp($y); ok 1493 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bcmp($y); ok 1494 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bcmp($y); ok 1495 - $x = Math::BigFloat->new("1e1234567890987654321"); $y = Math::BigFloat->new("1e1234567890987654320"); $x->bcmp($y); ok 1496 - $x = Math::BigFloat->new("1e-1234567890987654321"); $y = Math::BigFloat->new("1e-1234567890987654320"); $x->bcmp($y); ok 1497 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1498 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bcmp($y); ok 1499 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1500 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bcmp($y); ok 1501 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1502 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bcmp($y); ok 1503 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1504 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bcmp($y); ok 1505 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1506 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1507 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1508 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bcmp($y); ok 1509 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1510 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $x->bcmp($y); ok 1511 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $x->bcmp($y); ok 1512 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("-inf"); $x->bcmp($y); ok 1513 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1514 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1515 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1516 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1517 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1518 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1519 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1520 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1521 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1522 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1523 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bacmp($y); ok 1524 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bacmp($y); ok 1525 - $x = Math::BigFloat->new("-1.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1526 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1.1"); $x->bacmp($y); ok 1527 - $x = Math::BigFloat->new("+1.1"); $y = Math::BigFloat->new("+0"); $x->bacmp($y); ok 1528 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1.1"); $x->bacmp($y); ok 1529 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1530 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+12"); $x->bacmp($y); ok 1531 - $x = Math::BigFloat->new("+12"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1532 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1533 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-12"); $x->bacmp($y); ok 1534 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1535 - $x = Math::BigFloat->new("+123"); $y = Math::BigFloat->new("+124"); $x->bacmp($y); ok 1536 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+123"); $x->bacmp($y); ok 1537 - $x = Math::BigFloat->new("-123"); $y = Math::BigFloat->new("-124"); $x->bacmp($y); ok 1538 - $x = Math::BigFloat->new("-124"); $y = Math::BigFloat->new("-123"); $x->bacmp($y); ok 1539 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.01"); $x->bacmp($y); ok 1540 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1541 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001"); $x->bacmp($y); ok 1542 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.1"); $x->bacmp($y); ok 1543 - $x = Math::BigFloat->new("0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1544 - $x = Math::BigFloat->new("0.00001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1545 - $x = Math::BigFloat->new("-0.0001"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1546 - $x = Math::BigFloat->new("-0.1"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1547 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0.0001234"); $x->bacmp($y); ok 1548 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-0.0001234"); $x->bacmp($y); ok 1549 - $x = Math::BigFloat->new("0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1550 - $x = Math::BigFloat->new("-0.0001234"); $y = Math::BigFloat->new("0"); $x->bacmp($y); ok 1551 - $x = Math::BigFloat->new("0.0001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1552 - $x = Math::BigFloat->new("0.0005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1553 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1554 - $x = Math::BigFloat->new("0.001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1555 - $x = Math::BigFloat->new("0.000001"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1556 - $x = Math::BigFloat->new("0.00000123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1557 - $x = Math::BigFloat->new("0.00512"); $y = Math::BigFloat->new("0.0001"); $x->bacmp($y); ok 1558 - $x = Math::BigFloat->new("0.005"); $y = Math::BigFloat->new("0.000112"); $x->bacmp($y); ok 1559 - $x = Math::BigFloat->new("0.00123"); $y = Math::BigFloat->new("0.0005"); $x->bacmp($y); ok 1560 - $x = Math::BigFloat->new("1.5"); $y = Math::BigFloat->new("2"); $x->bacmp($y); ok 1561 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.5"); $x->bacmp($y); ok 1562 - $x = Math::BigFloat->new("1.54321"); $y = Math::BigFloat->new("234"); $x->bacmp($y); ok 1563 - $x = Math::BigFloat->new("234"); $y = Math::BigFloat->new("1.54321"); $x->bacmp($y); ok 1564 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1565 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5432112345"); $x->bacmp($y); ok 1566 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1567 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-5432112345"); $x->bacmp($y); ok 1568 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1569 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("54321.12345"); $x->bacmp($y); ok 1570 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1571 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-54321.12345"); $x->bacmp($y); ok 1572 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1573 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1574 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1575 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bacmp($y); ok 1576 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1577 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1578 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1579 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1580 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1581 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("inf"); $x->bacmp($y); ok 1582 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bacmp($y); ok 1583 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bacmp($y); ok 1584 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1585 - $x = Math::BigFloat->new("invalid"); $x->bdec(); ok 1586 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1587 - $x = Math::BigFloat->new("+inf"); $x->bdec(); ok 1588 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1589 - $x = Math::BigFloat->new("-inf"); $x->bdec(); ok 1590 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1591 - $x = Math::BigFloat->new("+0"); $x->bdec(); ok 1592 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1593 - $x = Math::BigFloat->new("+1"); $x->bdec(); ok 1594 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1595 - $x = Math::BigFloat->new("-1"); $x->bdec(); ok 1596 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1597 - $x = Math::BigFloat->new("1.23"); $x->bdec(); ok 1598 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1599 - $x = Math::BigFloat->new("-1.23"); $x->bdec(); ok 1600 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1601 - $x = Math::BigFloat->new("100"); $x->bdec(); ok 1602 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1603 - $x = Math::BigFloat->new("101"); $x->bdec(); ok 1604 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1605 - $x = Math::BigFloat->new("-100"); $x->bdec(); ok 1606 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1607 - $x = Math::BigFloat->new("-99"); $x->bdec(); ok 1608 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1609 - $x = Math::BigFloat->new("-98"); $x->bdec(); ok 1610 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1611 - $x = Math::BigFloat->new("99"); $x->bdec(); ok 1612 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1613 - $x = Math::BigFloat->new("invalid"); $x->binc(); ok 1614 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1615 - $x = Math::BigFloat->new("+inf"); $x->binc(); ok 1616 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1617 - $x = Math::BigFloat->new("-inf"); $x->binc(); ok 1618 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1619 - $x = Math::BigFloat->new("+0"); $x->binc(); ok 1620 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1621 - $x = Math::BigFloat->new("+1"); $x->binc(); ok 1622 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1623 - $x = Math::BigFloat->new("-1"); $x->binc(); ok 1624 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1625 - $x = Math::BigFloat->new("1.23"); $x->binc(); ok 1626 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1627 - $x = Math::BigFloat->new("-1.23"); $x->binc(); ok 1628 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1629 - $x = Math::BigFloat->new("100"); $x->binc(); ok 1630 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1631 - $x = Math::BigFloat->new("-100"); $x->binc(); ok 1632 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1633 - $x = Math::BigFloat->new("-99"); $x->binc(); ok 1634 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1635 - $x = Math::BigFloat->new("-101"); $x->binc(); ok 1636 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1637 - $x = Math::BigFloat->new("99"); $x->binc(); ok 1638 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1639 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1640 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1641 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1642 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1643 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->badd($y); ok 1644 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1645 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1646 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1647 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1648 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1649 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1650 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1651 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->badd($y); ok 1652 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1653 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1654 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1655 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->badd($y); ok 1656 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1657 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1658 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1659 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->badd($y); ok 1660 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1661 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1662 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1663 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1664 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1665 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1666 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1667 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1668 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1669 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->badd($y); ok 1670 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1671 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1672 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1673 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1674 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1675 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1676 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1677 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1678 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1679 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1680 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1681 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1682 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1683 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1684 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1685 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1686 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1687 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1688 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1689 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1690 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1691 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1692 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1693 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1694 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1695 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1696 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1697 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1698 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1699 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->badd($y); ok 1700 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1701 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1702 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1703 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1704 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1705 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1706 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1707 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1708 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1709 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1710 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1711 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1712 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1713 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1714 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1715 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1716 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1717 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1718 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1719 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->badd($y); ok 1720 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1721 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1722 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1723 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->badd($y); ok 1724 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1725 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1726 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1727 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->badd($y); ok 1728 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1729 - $x = Math::BigFloat->new("0.001234"); $y = Math::BigFloat->new("0.0001234"); $x->badd($y); ok 1730 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1731 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1732 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1733 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1734 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1735 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bsub($y); ok 1736 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1737 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1738 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1739 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1740 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1741 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1742 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1743 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bsub($y); ok 1744 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1745 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1746 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1747 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bsub($y); ok 1748 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1749 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1750 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1751 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $x->bsub($y); ok 1752 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1753 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1754 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1755 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1756 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1757 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1758 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1759 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1760 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1761 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bsub($y); ok 1762 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1763 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1764 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1765 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1766 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1767 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1768 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1769 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1770 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1771 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1772 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1773 - $x = Math::BigFloat->new("+99"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1774 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1775 - $x = Math::BigFloat->new("+999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1776 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1777 - $x = Math::BigFloat->new("+9999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1778 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1779 - $x = Math::BigFloat->new("+99999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1780 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1781 - $x = Math::BigFloat->new("+999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1782 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1783 - $x = Math::BigFloat->new("+9999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1784 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1785 - $x = Math::BigFloat->new("+99999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1786 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1787 - $x = Math::BigFloat->new("+999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1788 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1789 - $x = Math::BigFloat->new("+9999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1790 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1791 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+1"); $x->bsub($y); ok 1792 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1793 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1794 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1795 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1796 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1797 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1798 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1799 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1800 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1801 - $x = Math::BigFloat->new("+100000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1802 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1803 - $x = Math::BigFloat->new("+1000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1804 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1805 - $x = Math::BigFloat->new("+10000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1806 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1807 - $x = Math::BigFloat->new("+100000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1808 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1809 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1810 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1811 - $x = Math::BigFloat->new("+10000000000"); $y = Math::BigFloat->new("-1"); $x->bsub($y); ok 1812 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1813 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1814 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1815 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("+987654321"); $x->bsub($y); ok 1816 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1817 - $x = Math::BigFloat->new("-123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1818 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1819 - $x = Math::BigFloat->new("+123456789"); $y = Math::BigFloat->new("-987654321"); $x->bsub($y); ok 1820 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1821 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1822 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1823 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1824 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1825 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1826 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1827 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("abc"); $x->bmuladd($y, $z); ok 1828 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1829 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1830 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1831 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1832 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1833 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1834 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1835 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1836 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1837 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1838 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1839 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1840 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1841 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("+inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1842 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1843 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1844 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1845 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1846 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1847 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1848 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1849 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1850 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1851 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1852 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1853 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1854 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1855 - $x = Math::BigFloat->new("123456789123456789"); $y = Math::BigFloat->new("0"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1856 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1857 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("123456789123456789"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1858 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1859 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1860 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1861 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1862 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1863 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1864 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1865 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1866 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1867 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1868 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1869 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1870 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1871 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1872 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1873 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1874 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1875 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1876 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1877 - $x = Math::BigFloat->new("111"); $y = Math::BigFloat->new("111"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1878 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1879 - $x = Math::BigFloat->new("10101"); $y = Math::BigFloat->new("10101"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1880 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1881 - $x = Math::BigFloat->new("1001001"); $y = Math::BigFloat->new("1001001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1882 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1883 - $x = Math::BigFloat->new("100010001"); $y = Math::BigFloat->new("100010001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1884 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1885 - $x = Math::BigFloat->new("10000100001"); $y = Math::BigFloat->new("10000100001"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1886 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1887 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1888 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1889 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1890 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1891 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1892 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1893 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1894 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1895 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1896 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1897 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1898 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1899 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1900 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1901 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1902 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1903 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("0"); $x->bmuladd($y, $z); ok 1904 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1905 - $x = Math::BigFloat->new("11111111111"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1906 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1907 - $x = Math::BigFloat->new("22222222222"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1908 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1909 - $x = Math::BigFloat->new("33333333333"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1910 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1911 - $x = Math::BigFloat->new("44444444444"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1912 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1913 - $x = Math::BigFloat->new("55555555555"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1914 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1915 - $x = Math::BigFloat->new("66666666666"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1916 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1917 - $x = Math::BigFloat->new("77777777777"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1918 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1919 - $x = Math::BigFloat->new("88888888888"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1920 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1921 - $x = Math::BigFloat->new("99999999999"); $y = Math::BigFloat->new("9"); $z = Math::BigFloat->new("1"); $x->bmuladd($y, $z); ok 1922 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1923 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1924 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1925 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1926 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1927 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1928 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1929 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("-5"); $x->bmuladd($y, $z); ok 1930 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1931 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1932 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1933 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-4"); $z = Math::BigFloat->new("5"); $x->bmuladd($y, $z); ok 1934 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1935 - $x = Math::BigFloat->new("9999999999999999999"); $y = Math::BigFloat->new("10000000000000000000"); $z = Math::BigFloat->new("1234567890"); $x->bmuladd($y, $z); ok 1936 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1937 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("5.7"); $z = Math::BigFloat->new("8.9"); $x->bmuladd($y, $z); ok 1938 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1939 - $x = Math::BigFloat->new("-3.2"); $y = Math::BigFloat->new("5.197"); $z = Math::BigFloat->new("6.05"); $x->bmuladd($y, $z); ok 1940 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1941 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("8"); $x->bmodpow($y, $z); ok 1942 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1943 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1944 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1945 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $z = Math::BigFloat->new("7"); $x->bmodpow($y, $z); ok 1946 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1947 - $x = Math::BigFloat->new("77777"); $y = Math::BigFloat->new("777"); $z = Math::BigFloat->new("123456789"); $x->bmodpow($y, $z); ok 1948 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1949 - $x = Math::BigFloat->new("3.2"); $y = Math::BigFloat->new("6.2"); $z = Math::BigFloat->new("5.2"); $x->bmodpow($y, $z); ok 1950 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1951 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1952 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1953 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1954 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1955 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("abc"); $x->bmul($y); ok 1956 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1957 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1958 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1959 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("invalid"); $x->bmul($y); ok 1960 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1961 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1962 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1963 - $x = Math::BigFloat->new("invalid"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1964 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1965 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1966 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1967 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1968 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1969 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1970 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1971 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1972 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1973 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1974 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1975 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1976 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1977 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("123.34"); $x->bmul($y); ok 1978 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1979 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-123.34"); $x->bmul($y); ok 1980 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1981 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1982 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1983 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("+inf"); $x->bmul($y); ok 1984 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1985 - $x = Math::BigFloat->new("123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1986 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1987 - $x = Math::BigFloat->new("-123.34"); $y = Math::BigFloat->new("-inf"); $x->bmul($y); ok 1988 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1989 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1990 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 1991 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 1992 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1993 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1994 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 1995 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 1996 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1997 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1998 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 1999 - $x = Math::BigFloat->new("+123456789123456789"); $y = Math::BigFloat->new("+0"); $x->bmul($y); ok 2000 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2001 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+123456789123456789"); $x->bmul($y); ok 2002 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2003 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2004 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2005 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2006 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2007 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $x->bmul($y); ok 2008 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2009 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $x->bmul($y); ok 2010 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2011 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2012 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2013 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("+3"); $x->bmul($y); ok 2014 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2015 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2016 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2017 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmul($y); ok 2018 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2019 - $x = Math::BigFloat->new("+111"); $y = Math::BigFloat->new("+111"); $x->bmul($y); ok 2020 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2021 - $x = Math::BigFloat->new("+10101"); $y = Math::BigFloat->new("+10101"); $x->bmul($y); ok 2022 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2023 - $x = Math::BigFloat->new("+1001001"); $y = Math::BigFloat->new("+1001001"); $x->bmul($y); ok 2024 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2025 - $x = Math::BigFloat->new("+100010001"); $y = Math::BigFloat->new("+100010001"); $x->bmul($y); ok 2026 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2027 - $x = Math::BigFloat->new("+10000100001"); $y = Math::BigFloat->new("+10000100001"); $x->bmul($y); ok 2028 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2029 - $x = Math::BigFloat->new("+11111111111"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2030 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2031 - $x = Math::BigFloat->new("+22222222222"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2032 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2033 - $x = Math::BigFloat->new("+33333333333"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2034 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2035 - $x = Math::BigFloat->new("+44444444444"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2036 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2037 - $x = Math::BigFloat->new("+55555555555"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2038 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2039 - $x = Math::BigFloat->new("+66666666666"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2040 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2041 - $x = Math::BigFloat->new("+77777777777"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2042 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2043 - $x = Math::BigFloat->new("+88888888888"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2044 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2045 - $x = Math::BigFloat->new("+99999999999"); $y = Math::BigFloat->new("+9"); $x->bmul($y); ok 2046 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2047 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("120"); $x->bmul($y); ok 2048 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2049 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("10000"); $x->bmul($y); ok 2050 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2051 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2052 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2053 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2054 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2055 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2056 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2057 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $Math::BigFloat::round_mode = "even"; join(",", $x->bdiv($y)); ok 2058 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2059 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2060 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2061 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2062 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2063 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2064 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2065 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2066 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2067 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("abc"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2068 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2069 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2070 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2071 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2072 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2073 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2074 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2075 - $x = Math::BigFloat->new("+3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2076 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2077 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2078 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2079 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2080 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2081 - $x = Math::BigFloat->new("-3214"); $y = Math::BigFloat->new("+0"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2082 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2083 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2084 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2085 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2086 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2087 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2088 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2089 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2090 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2091 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("+2"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2092 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2093 - $x = Math::BigFloat->new("+2"); $y = Math::BigFloat->new("+1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2094 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2095 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("+inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2096 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2097 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2098 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2099 - $x = Math::BigFloat->new("+10"); $y = Math::BigFloat->new("+5"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2100 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2101 - $x = Math::BigFloat->new("+100"); $y = Math::BigFloat->new("+4"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2102 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2103 - $x = Math::BigFloat->new("+1000"); $y = Math::BigFloat->new("+8"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2104 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2105 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("+16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2106 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2107 - $x = Math::BigFloat->new("+10000"); $y = Math::BigFloat->new("-16"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2108 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2109 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2110 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2111 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+99"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2112 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2113 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2114 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2115 - $x = Math::BigFloat->new("+999999999999"); $y = Math::BigFloat->new("+9999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2116 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2117 - $x = Math::BigFloat->new("+999999999999999"); $y = Math::BigFloat->new("+99999"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2118 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2119 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2120 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2121 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2122 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2123 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2124 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2125 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2126 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2127 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2128 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2129 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2130 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2131 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2132 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2133 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2134 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2135 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2136 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2137 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2138 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2139 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2140 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2141 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2142 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2143 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2144 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2145 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("25.024996000799840031993601279744051189762"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2146 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2147 - $x = Math::BigFloat->new("123456"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $Math::BigFloat::round_mode = "even"; scalar $x->bdiv($y); ok 2148 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2149 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2150 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2151 - $x = Math::BigFloat->new("+2000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2152 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2153 - $x = Math::BigFloat->new("+3000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2154 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2155 - $x = Math::BigFloat->new("+4000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2156 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2157 - $x = Math::BigFloat->new("+5000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2158 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2159 - $x = Math::BigFloat->new("+6000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2160 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2161 - $x = Math::BigFloat->new("+7000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2162 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2163 - $x = Math::BigFloat->new("+8000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2164 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2165 - $x = Math::BigFloat->new("+9000000000"); $y = Math::BigFloat->new("+9"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2166 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2167 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2168 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2169 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("100"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2170 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2171 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2172 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2173 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("10000"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2174 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2175 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("504"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2176 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2177 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1.987654321"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2178 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2179 - $x = Math::BigFloat->new("123456789.123456789123456789123456789"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2180 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2181 - $x = Math::BigFloat->new("+35500000"); $y = Math::BigFloat->new("+113"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2182 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2183 - $x = Math::BigFloat->new("+71000000"); $y = Math::BigFloat->new("+226"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2184 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2185 - $x = Math::BigFloat->new("+106500000"); $y = Math::BigFloat->new("+339"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2186 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2187 - $x = Math::BigFloat->new("+1000000000"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 20; scalar $x->bdiv($y); ok 2188 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2189 - $x = Math::BigFloat->new("+124"); $y = Math::BigFloat->new("+3"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2190 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2191 - $x = Math::BigFloat->new("123456789.1234"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 1; scalar $x->bdiv($y); ok 2192 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2193 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2194 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2195 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2196 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2197 - $x = Math::BigFloat->new("+9000"); $y = Math::BigFloat->new("56"); $x->bmod($y); ok 2198 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2199 - $x = Math::BigFloat->new("+56"); $y = Math::BigFloat->new("9000"); $x->bmod($y); ok 2200 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2201 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2202 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2203 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2204 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2205 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2206 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2207 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2208 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2209 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2210 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2211 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2212 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2213 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2214 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2215 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2216 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2217 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2218 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2219 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2220 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2221 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2222 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2223 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2224 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2225 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2226 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2227 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2228 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2229 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("inf"); $x->bmod($y); ok 2230 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2231 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("-inf"); $x->bmod($y); ok 2232 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2233 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2234 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2235 - $x = Math::BigFloat->new("inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2236 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2237 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2238 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2239 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2240 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2241 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2242 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2243 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2244 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2245 - $x = Math::BigFloat->new("abc"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2246 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2247 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("abc"); $x->bmod($y); ok 2248 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2249 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2250 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2251 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2252 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2253 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2254 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2255 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $x->bmod($y); ok 2256 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2257 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2258 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2259 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2260 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2261 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2262 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2263 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2264 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2265 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmod($y); ok 2266 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2267 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2268 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2269 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2270 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2271 - $x = Math::BigFloat->new("2000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2272 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2273 - $x = Math::BigFloat->new("3000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2274 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2275 - $x = Math::BigFloat->new("4000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2276 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2277 - $x = Math::BigFloat->new("5000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2278 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2279 - $x = Math::BigFloat->new("6000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2280 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2281 - $x = Math::BigFloat->new("7000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2282 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2283 - $x = Math::BigFloat->new("8000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2284 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2285 - $x = Math::BigFloat->new("9000000000"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2286 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2287 - $x = Math::BigFloat->new("35500000"); $y = Math::BigFloat->new("113"); $x->bmod($y); ok 2288 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2289 - $x = Math::BigFloat->new("71000000"); $y = Math::BigFloat->new("226"); $x->bmod($y); ok 2290 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2291 - $x = Math::BigFloat->new("106500000"); $y = Math::BigFloat->new("339"); $x->bmod($y); ok 2292 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2293 - $x = Math::BigFloat->new("1000000000"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2294 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2295 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmod($y); ok 2296 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2297 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("4"); $x->bmod($y); ok 2298 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2299 - $x = Math::BigFloat->new("1000"); $y = Math::BigFloat->new("8"); $x->bmod($y); ok 2300 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2301 - $x = Math::BigFloat->new("10000"); $y = Math::BigFloat->new("16"); $x->bmod($y); ok 2302 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2303 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9"); $x->bmod($y); ok 2304 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2305 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("99"); $x->bmod($y); ok 2306 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2307 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("999"); $x->bmod($y); ok 2308 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2309 - $x = Math::BigFloat->new("999999999999"); $y = Math::BigFloat->new("9999"); $x->bmod($y); ok 2310 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2311 - $x = Math::BigFloat->new("999999999999999"); $y = Math::BigFloat->new("99999"); $x->bmod($y); ok 2312 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2313 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("+5"); $x->bmod($y); ok 2314 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2315 - $x = Math::BigFloat->new("+9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2316 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2317 - $x = Math::BigFloat->new("-9"); $y = Math::BigFloat->new("-5"); $x->bmod($y); ok 2318 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2319 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2320 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2321 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2322 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2323 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2324 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2325 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2326 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2327 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2328 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2329 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2330 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2331 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2332 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2333 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("-3"); $x->bmod($y); ok 2334 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2335 - $x = Math::BigFloat->new("4095"); $y = Math::BigFloat->new("4095"); $x->bmod($y); ok 2336 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2337 - $x = Math::BigFloat->new("100041000510123"); $y = Math::BigFloat->new("3"); $x->bmod($y); ok 2338 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2339 - $x = Math::BigFloat->new("152403346"); $y = Math::BigFloat->new("12345"); $x->bmod($y); ok 2340 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2341 - $x = Math::BigFloat->new("87654321"); $y = Math::BigFloat->new("87654321"); $x->bmod($y); ok 2342 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2343 - $x = Math::BigFloat->new("123"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2344 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2345 - $x = Math::BigFloat->new("1230"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2346 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2347 - $x = Math::BigFloat->new("123.4"); $y = Math::BigFloat->new("2.5"); $x->bmod($y); ok 2348 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2349 - $x = Math::BigFloat->new("123e1"); $y = Math::BigFloat->new("25"); $x->bmod($y); ok 2350 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2351 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2352 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2353 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2354 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2355 - $x = Math::BigFloat->new("-2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2356 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2357 - $x = Math::BigFloat->new("2.1"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2358 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2359 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2360 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2361 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmod($y); ok 2362 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2363 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2364 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2365 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("-1"); $x->bmod($y); ok 2366 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2367 - $x = Math::BigFloat->new("invalid"); $x->bfac(); ok 2368 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2369 - $x = Math::BigFloat->new("+inf"); $x->bfac(); ok 2370 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2371 - $x = Math::BigFloat->new("-inf"); $x->bfac(); ok 2372 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2373 - $x = Math::BigFloat->new("-1"); $x->bfac(); ok 2374 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2375 - $x = Math::BigFloat->new("0"); $x->bfac(); ok 2376 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2377 - $x = Math::BigFloat->new("1"); $x->bfac(); ok 2378 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2379 - $x = Math::BigFloat->new("2"); $x->bfac(); ok 2380 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2381 - $x = Math::BigFloat->new("3"); $x->bfac(); ok 2382 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2383 - $x = Math::BigFloat->new("4"); $x->bfac(); ok 2384 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2385 - $x = Math::BigFloat->new("5"); $x->bfac(); ok 2386 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2387 - $x = Math::BigFloat->new("6"); $x->bfac(); ok 2388 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2389 - $x = Math::BigFloat->new("7"); $x->bfac(); ok 2390 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2391 - $x = Math::BigFloat->new("8"); $x->bfac(); ok 2392 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2393 - $x = Math::BigFloat->new("9"); $x->bfac(); ok 2394 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2395 - $x = Math::BigFloat->new("10"); $x->bfac(); ok 2396 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2397 - $x = Math::BigFloat->new("11"); $x->bfac(); ok 2398 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2399 - $x = Math::BigFloat->new("12"); $x->bfac(); ok 2400 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2401 - $x = Math::BigFloat->new("20"); $x->bfac(); ok 2402 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2403 - $x = Math::BigFloat->new("22"); $x->bfac(); ok 2404 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2405 - $x = Math::BigFloat->new("69"); $x->bfac(); ok 2406 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2407 - $x = Math::BigFloat->new("NaN"); $x->bdfac(); ok 2408 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2409 - $x = Math::BigFloat->new("+inf"); $x->bdfac(); ok 2410 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2411 - $x = Math::BigFloat->new("-inf"); $x->bdfac(); ok 2412 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2413 - $x = Math::BigFloat->new("-2"); $x->bdfac(); ok 2414 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2415 - $x = Math::BigFloat->new("-1"); $x->bdfac(); ok 2416 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2417 - $x = Math::BigFloat->new("0"); $x->bdfac(); ok 2418 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2419 - $x = Math::BigFloat->new("1"); $x->bdfac(); ok 2420 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2421 - $x = Math::BigFloat->new("2"); $x->bdfac(); ok 2422 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2423 - $x = Math::BigFloat->new("3"); $x->bdfac(); ok 2424 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2425 - $x = Math::BigFloat->new("4"); $x->bdfac(); ok 2426 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2427 - $x = Math::BigFloat->new("5"); $x->bdfac(); ok 2428 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2429 - $x = Math::BigFloat->new("6"); $x->bdfac(); ok 2430 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2431 - $x = Math::BigFloat->new("7"); $x->bdfac(); ok 2432 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2433 - $x = Math::BigFloat->new("8"); $x->bdfac(); ok 2434 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2435 - $x = Math::BigFloat->new("9"); $x->bdfac(); ok 2436 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2437 - $x = Math::BigFloat->new("10"); $x->bdfac(); ok 2438 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2439 - $x = Math::BigFloat->new("11"); $x->bdfac(); ok 2440 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2441 - $x = Math::BigFloat->new("12"); $x->bdfac(); ok 2442 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2443 - $x = Math::BigFloat->new("NaN"); $x->btfac(); ok 2444 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2445 - $x = Math::BigFloat->new("+inf"); $x->btfac(); ok 2446 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2447 - $x = Math::BigFloat->new("-inf"); $x->btfac(); ok 2448 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2449 - $x = Math::BigFloat->new("-3"); $x->btfac(); ok 2450 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2451 - $x = Math::BigFloat->new("-2"); $x->btfac(); ok 2452 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2453 - $x = Math::BigFloat->new("-1"); $x->btfac(); ok 2454 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2455 - $x = Math::BigFloat->new("0"); $x->btfac(); ok 2456 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2457 - $x = Math::BigFloat->new("1"); $x->btfac(); ok 2458 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2459 - $x = Math::BigFloat->new("2"); $x->btfac(); ok 2460 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2461 - $x = Math::BigFloat->new("3"); $x->btfac(); ok 2462 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2463 - $x = Math::BigFloat->new("4"); $x->btfac(); ok 2464 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2465 - $x = Math::BigFloat->new("5"); $x->btfac(); ok 2466 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2467 - $x = Math::BigFloat->new("6"); $x->btfac(); ok 2468 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2469 - $x = Math::BigFloat->new("7"); $x->btfac(); ok 2470 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2471 - $x = Math::BigFloat->new("8"); $x->btfac(); ok 2472 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2473 - $x = Math::BigFloat->new("9"); $x->btfac(); ok 2474 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2475 - $x = Math::BigFloat->new("10"); $x->btfac(); ok 2476 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2477 - $x = Math::BigFloat->new("11"); $x->btfac(); ok 2478 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2479 - $x = Math::BigFloat->new("12"); $x->btfac(); ok 2480 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2481 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-inf"); $x->bmfac($y); ok 2482 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2483 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("-1"); $x->bmfac($y); ok 2484 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2485 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("0"); $x->bmfac($y); ok 2486 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2487 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2.5"); $x->bmfac($y); ok 2488 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2489 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("inf"); $x->bmfac($y); ok 2490 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2491 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("NaN"); $x->bmfac($y); ok 2492 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2493 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2494 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2495 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2496 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2497 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2498 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2499 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2500 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2501 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2502 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2503 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2504 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2505 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2506 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2507 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2508 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2509 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2510 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2511 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2512 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2513 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2514 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2515 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2516 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2517 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2518 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2519 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2520 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2521 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("1"); $x->bmfac($y); ok 2522 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2523 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2524 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2525 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2526 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2527 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2528 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2529 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2530 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2531 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2532 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2533 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2534 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2535 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2536 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2537 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2538 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2539 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2540 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2541 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2542 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2543 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2544 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2545 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2546 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2547 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2548 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2549 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2550 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2551 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2552 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2553 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("2"); $x->bmfac($y); ok 2554 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2555 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2556 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2557 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2558 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2559 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2560 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2561 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2562 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2563 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2564 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2565 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2566 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2567 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2568 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2569 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2570 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2571 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2572 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2573 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2574 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2575 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2576 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2577 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2578 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2579 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2580 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2581 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2582 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2583 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2584 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2585 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2586 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2587 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("3"); $x->bmfac($y); ok 2588 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2589 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2590 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2591 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2592 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2593 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2594 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2595 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2596 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2597 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2598 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2599 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2600 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2601 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2602 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2603 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2604 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2605 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2606 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2607 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2608 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2609 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2610 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2611 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2612 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2613 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2614 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2615 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2616 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2617 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2618 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2619 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2620 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2621 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2622 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2623 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("4"); $x->bmfac($y); ok 2624 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2625 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2626 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2627 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2628 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2629 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2630 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2631 - $x = Math::BigFloat->new("-5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2632 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2633 - $x = Math::BigFloat->new("-4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2634 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2635 - $x = Math::BigFloat->new("-3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2636 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2637 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2638 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2639 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2640 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2641 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2642 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2643 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2644 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2645 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2646 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2647 - $x = Math::BigFloat->new("3"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2648 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2649 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2650 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2651 - $x = Math::BigFloat->new("5"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2652 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2653 - $x = Math::BigFloat->new("6"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2654 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2655 - $x = Math::BigFloat->new("7"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2656 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2657 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2658 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2659 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2660 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2661 - $x = Math::BigFloat->new("10"); $y = Math::BigFloat->new("5"); $x->bmfac($y); ok 2662 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2663 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2664 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2665 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2666 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2667 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2668 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2669 - $x = Math::BigFloat->new("-123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2670 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2671 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2672 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2673 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2674 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2675 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2676 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2677 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2678 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2679 - $x = Math::BigFloat->new("4"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2680 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2681 - $x = Math::BigFloat->new("9"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2682 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2683 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2684 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2685 - $x = Math::BigFloat->new("100"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2686 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2687 - $x = Math::BigFloat->new("123.456"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2688 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2689 - $x = Math::BigFloat->new("15241.38393"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2690 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2691 - $x = Math::BigFloat->new("1.44"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2692 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2693 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2694 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2695 - $x = Math::BigFloat->new("0.49"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2696 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2697 - $x = Math::BigFloat->new("0.0049"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2698 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2699 - $x = Math::BigFloat->new("1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2700 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2701 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2702 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2703 - $x = Math::BigFloat->new("0"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2704 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2705 - $x = Math::BigFloat->new("-inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2706 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2707 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("NaN"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2708 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2709 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2710 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2711 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("2"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2712 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2713 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2714 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2715 - $x = Math::BigFloat->new("NaN"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2716 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2717 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("-inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2718 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2719 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("inf"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2720 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2721 - $x = Math::BigFloat->new("+0"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2722 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2723 - $x = Math::BigFloat->new("+1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2724 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2725 - $x = Math::BigFloat->new("-1"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2726 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2727 - $x = Math::BigFloat->new("-2"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2728 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2729 - $x = Math::BigFloat->new("-123.45"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2730 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2731 - $x = Math::BigFloat->new("+inf"); $y = Math::BigFloat->new("0"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2732 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2733 - $x = Math::BigFloat->new("12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2734 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2735 - $x = Math::BigFloat->new("-12"); $y = Math::BigFloat->new("1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2736 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2737 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2738 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2739 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("-1"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2740 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2741 - $x = Math::BigFloat->new("8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2742 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2743 - $x = Math::BigFloat->new("-8"); $y = Math::BigFloat->new("3"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2744 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2745 - $x = Math::BigFloat->new("16"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2746 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2747 - $x = Math::BigFloat->new("81"); $y = Math::BigFloat->new("4"); $Math::BigFloat::div_scale = 40; $x->broot($y); ok 2748 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2749 - $x = Math::BigFloat->new("+0"); $x->bsqrt(); ok 2750 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2751 - $x = Math::BigFloat->new("-1"); $x->bsqrt(); ok 2752 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2753 - $x = Math::BigFloat->new("-2"); $x->bsqrt(); ok 2754 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2755 - $x = Math::BigFloat->new("-16"); $x->bsqrt(); ok 2756 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2757 - $x = Math::BigFloat->new("-123.45"); $x->bsqrt(); ok 2758 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2759 - $x = Math::BigFloat->new("nanbsqrt"); $x->bsqrt(); ok 2760 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2761 - $x = Math::BigFloat->new("+inf"); $x->bsqrt(); ok 2762 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2763 - $x = Math::BigFloat->new("-inf"); $x->bsqrt(); ok 2764 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2765 - $x = Math::BigFloat->new("1"); $x->bsqrt(); ok 2766 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2767 - $x = Math::BigFloat->new("2"); $x->bsqrt(); ok 2768 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2769 - $x = Math::BigFloat->new("4"); $x->bsqrt(); ok 2770 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2771 - $x = Math::BigFloat->new("9"); $x->bsqrt(); ok 2772 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2773 - $x = Math::BigFloat->new("16"); $x->bsqrt(); ok 2774 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2775 - $x = Math::BigFloat->new("100"); $x->bsqrt(); ok 2776 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2777 - $x = Math::BigFloat->new("123.456"); $x->bsqrt(); ok 2778 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2779 - $x = Math::BigFloat->new("15241.38393"); $x->bsqrt(); ok 2780 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2781 - $x = Math::BigFloat->new("1.44"); $x->bsqrt(); ok 2782 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2783 - $x = Math::BigFloat->new("1.44E10"); $x->bsqrt(); ok 2784 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2785 - $x = Math::BigFloat->new("2e10"); $x->bsqrt(); ok 2786 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2787 - $x = Math::BigFloat->new("144e20"); $x->bsqrt(); ok 2788 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2789 - $x = Math::BigFloat->new("12"); $x->bsqrt(); ok 2790 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2791 - $x = Math::BigFloat->new("0.49"); $x->bsqrt(); ok 2792 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2793 - $x = Math::BigFloat->new("0.0049"); $x->bsqrt(); ok 2794 - $x = Math::BigFloat->new("123"); $x->is_nan(); ok 2795 - $x = Math::BigFloat->new("abc"); $x->is_nan(); ok 2796 - $x = Math::BigFloat->new("NaN"); $x->is_nan(); ok 2797 - $x = Math::BigFloat->new("-123"); $x->is_nan(); ok 2798 - $x = Math::BigFloat->new("+inf"); $x->is_inf(""); ok 2799 - $x = Math::BigFloat->new("-inf"); $x->is_inf(""); ok 2800 - $x = Math::BigFloat->new("abc"); $x->is_inf(""); ok 2801 - $x = Math::BigFloat->new("1"); $x->is_inf(""); ok 2802 - $x = Math::BigFloat->new("NaN"); $x->is_inf(""); ok 2803 - $x = Math::BigFloat->new("-1"); $x->is_inf(""); ok 2804 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-"); ok 2805 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+"); ok 2806 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-"); ok 2807 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+"); ok 2808 - $x = Math::BigFloat->new("-inf"); $x->is_inf("-inf"); ok 2809 - $x = Math::BigFloat->new("-inf"); $x->is_inf("+inf"); ok 2810 - $x = Math::BigFloat->new("+inf"); $x->is_inf("-inf"); ok 2811 - $x = Math::BigFloat->new("+inf"); $x->is_inf("+inf"); ok 2812 - $x = Math::BigFloat->new("+iNfInItY"); $x->is_inf(""); ok 2813 - $x = Math::BigFloat->new("-InFiNiTy"); $x->is_inf(""); ok 2814 - $x = Math::BigFloat->new("abc"); $x->is_odd(); ok 2815 - $x = Math::BigFloat->new("0"); $x->is_odd(); ok 2816 - $x = Math::BigFloat->new("-1"); $x->is_odd(); ok 2817 - $x = Math::BigFloat->new("-3"); $x->is_odd(); ok 2818 - $x = Math::BigFloat->new("1"); $x->is_odd(); ok 2819 - $x = Math::BigFloat->new("3"); $x->is_odd(); ok 2820 - $x = Math::BigFloat->new("1000001"); $x->is_odd(); ok 2821 - $x = Math::BigFloat->new("1000002"); $x->is_odd(); ok 2822 - $x = Math::BigFloat->new("+inf"); $x->is_odd(); ok 2823 - $x = Math::BigFloat->new("-inf"); $x->is_odd(); ok 2824 - $x = Math::BigFloat->new("123.45"); $x->is_odd(); ok 2825 - $x = Math::BigFloat->new("-123.45"); $x->is_odd(); ok 2826 - $x = Math::BigFloat->new("2"); $x->is_odd(); ok 2827 - $x = Math::BigFloat->new("invalid"); $x->is_int(); ok 2828 - $x = Math::BigFloat->new("0"); $x->is_int(); ok 2829 - $x = Math::BigFloat->new("1"); $x->is_int(); ok 2830 - $x = Math::BigFloat->new("2"); $x->is_int(); ok 2831 - $x = Math::BigFloat->new("-2"); $x->is_int(); ok 2832 - $x = Math::BigFloat->new("-1"); $x->is_int(); ok 2833 - $x = Math::BigFloat->new("-inf"); $x->is_int(); ok 2834 - $x = Math::BigFloat->new("+inf"); $x->is_int(); ok 2835 - $x = Math::BigFloat->new("123.4567"); $x->is_int(); ok 2836 - $x = Math::BigFloat->new("-0.1"); $x->is_int(); ok 2837 - $x = Math::BigFloat->new("-0.002"); $x->is_int(); ok 2838 - $x = Math::BigFloat->new("abc"); $x->is_even(); ok 2839 - $x = Math::BigFloat->new("0"); $x->is_even(); ok 2840 - $x = Math::BigFloat->new("-1"); $x->is_even(); ok 2841 - $x = Math::BigFloat->new("-3"); $x->is_even(); ok 2842 - $x = Math::BigFloat->new("1"); $x->is_even(); ok 2843 - $x = Math::BigFloat->new("3"); $x->is_even(); ok 2844 - $x = Math::BigFloat->new("1000001"); $x->is_even(); ok 2845 - $x = Math::BigFloat->new("1000002"); $x->is_even(); ok 2846 - $x = Math::BigFloat->new("2"); $x->is_even(); ok 2847 - $x = Math::BigFloat->new("+inf"); $x->is_even(); ok 2848 - $x = Math::BigFloat->new("-inf"); $x->is_even(); ok 2849 - $x = Math::BigFloat->new("123.456"); $x->is_even(); ok 2850 - $x = Math::BigFloat->new("-123.456"); $x->is_even(); ok 2851 - $x = Math::BigFloat->new("0.01"); $x->is_even(); ok 2852 - $x = Math::BigFloat->new("-0.01"); $x->is_even(); ok 2853 - $x = Math::BigFloat->new("120"); $x->is_even(); ok 2854 - $x = Math::BigFloat->new("1200"); $x->is_even(); ok 2855 - $x = Math::BigFloat->new("-1200"); $x->is_even(); ok 2856 - $x = Math::BigFloat->new("0"); $x->is_positive(); ok 2857 - $x = Math::BigFloat->new("1"); $x->is_positive(); ok 2858 - $x = Math::BigFloat->new("-1"); $x->is_positive(); ok 2859 - $x = Math::BigFloat->new("-123"); $x->is_positive(); ok 2860 - $x = Math::BigFloat->new("NaN"); $x->is_positive(); ok 2861 - $x = Math::BigFloat->new("-inf"); $x->is_positive(); ok 2862 - $x = Math::BigFloat->new("+inf"); $x->is_positive(); ok 2863 - $x = Math::BigFloat->new("0"); $x->is_negative(); ok 2864 - $x = Math::BigFloat->new("1"); $x->is_negative(); ok 2865 - $x = Math::BigFloat->new("-1"); $x->is_negative(); ok 2866 - $x = Math::BigFloat->new("-123"); $x->is_negative(); ok 2867 - $x = Math::BigFloat->new("NaN"); $x->is_negative(); ok 2868 - $x = Math::BigFloat->new("-inf"); $x->is_negative(); ok 2869 - $x = Math::BigFloat->new("+inf"); $x->is_negative(); ok 2870 - $x = Math::BigFloat->new("0"); $x->is_non_positive(); ok 2871 - $x = Math::BigFloat->new("1"); $x->is_non_positive(); ok 2872 - $x = Math::BigFloat->new("-1"); $x->is_non_positive(); ok 2873 - $x = Math::BigFloat->new("NaN"); $x->is_non_positive(); ok 2874 - $x = Math::BigFloat->new("-inf"); $x->is_non_positive(); ok 2875 - $x = Math::BigFloat->new("+inf"); $x->is_non_positive(); ok 2876 - $x = Math::BigFloat->new("0"); $x->is_non_negative(); ok 2877 - $x = Math::BigFloat->new("1"); $x->is_non_negative(); ok 2878 - $x = Math::BigFloat->new("-1"); $x->is_non_negative(); ok 2879 - $x = Math::BigFloat->new("NaN"); $x->is_non_negative(); ok 2880 - $x = Math::BigFloat->new("-inf"); $x->is_non_negative(); ok 2881 - $x = Math::BigFloat->new("+inf"); $x->is_non_negative(); ok 2882 - $x = Math::BigFloat->new("0"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2883 - $x = Math::BigFloat->new("1"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2884 - $x = Math::BigFloat->new("123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2885 - $x = Math::BigFloat->new("-123"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2886 - $x = Math::BigFloat->new("-1200"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2887 - $x = Math::BigFloat->new("invalid"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2888 - $x = Math::BigFloat->new("+inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2889 - $x = Math::BigFloat->new("-inf"); ($a, $b) = $x->parts(); $a = $a->bstr(); $b = $b->bstr(); "$a $b"; ok 2890 - $x = Math::BigFloat->new("0"); $x->exponent()->bstr(); ok 2891 - $x = Math::BigFloat->new("1"); $x->exponent()->bstr(); ok 2892 - $x = Math::BigFloat->new("123"); $x->exponent()->bstr(); ok 2893 - $x = Math::BigFloat->new("-123"); $x->exponent()->bstr(); ok 2894 - $x = Math::BigFloat->new("-1200"); $x->exponent()->bstr(); ok 2895 - $x = Math::BigFloat->new("+inf"); $x->exponent()->bstr(); ok 2896 - $x = Math::BigFloat->new("-inf"); $x->exponent()->bstr(); ok 2897 - $x = Math::BigFloat->new("invalid"); $x->exponent()->bstr(); ok 2898 - $x = Math::BigFloat->new("0"); $x->mantissa()->bstr(); ok 2899 - $x = Math::BigFloat->new("1"); $x->mantissa()->bstr(); ok 2900 - $x = Math::BigFloat->new("123"); $x->mantissa()->bstr(); ok 2901 - $x = Math::BigFloat->new("-123"); $x->mantissa()->bstr(); ok 2902 - $x = Math::BigFloat->new("-1200"); $x->mantissa()->bstr(); ok 2903 - $x = Math::BigFloat->new("+inf"); $x->mantissa()->bstr(); ok 2904 - $x = Math::BigFloat->new("-inf"); $x->mantissa()->bstr(); ok 2905 - $x = Math::BigFloat->new("invalid"); $x->mantissa()->bstr(); ok 2906 - $x = Math::BigFloat->new("123"); $x->length(); ok 2907 - $x = Math::BigFloat->new("-123"); $x->length(); ok 2908 - $x = Math::BigFloat->new("0"); $x->length(); ok 2909 - $x = Math::BigFloat->new("1"); $x->length(); ok 2910 - $x = Math::BigFloat->new("12345678901234567890"); $x->length(); ok 2911 - $x = Math::BigFloat->new("invalid"); $x->is_zero(); ok 2912 - $x = Math::BigFloat->new("+inf"); $x->is_zero(); ok 2913 - $x = Math::BigFloat->new("-inf"); $x->is_zero(); ok 2914 - $x = Math::BigFloat->new("0"); $x->is_zero(); ok 2915 - $x = Math::BigFloat->new("-1"); $x->is_zero(); ok 2916 - $x = Math::BigFloat->new("1"); $x->is_zero(); ok 2917 - $x = Math::BigFloat->new("invalid"); $x->is_one(); ok 2918 - $x = Math::BigFloat->new("+inf"); $x->is_one(); ok 2919 - $x = Math::BigFloat->new("-inf"); $x->is_one(); ok 2920 - $x = Math::BigFloat->new("0"); $x->is_one(); ok 2921 - $x = Math::BigFloat->new("2"); $x->is_one(); ok 2922 - $x = Math::BigFloat->new("1"); $x->is_one(); ok 2923 - $x = Math::BigFloat->new("-1"); $x->is_one(); ok 2924 - $x = Math::BigFloat->new("-2"); $x->is_one(); ok 2925 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2926 - $x = Math::BigFloat->new("0"); $x->bfloor(); ok 2927 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2928 - $x = Math::BigFloat->new("abc"); $x->bfloor(); ok 2929 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2930 - $x = Math::BigFloat->new("+inf"); $x->bfloor(); ok 2931 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2932 - $x = Math::BigFloat->new("-inf"); $x->bfloor(); ok 2933 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2934 - $x = Math::BigFloat->new("1"); $x->bfloor(); ok 2935 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2936 - $x = Math::BigFloat->new("-51"); $x->bfloor(); ok 2937 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2938 - $x = Math::BigFloat->new("-51.2"); $x->bfloor(); ok 2939 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2940 - $x = Math::BigFloat->new("12.2"); $x->bfloor(); ok 2941 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2942 - $x = Math::BigFloat->new("0.12345"); $x->bfloor(); ok 2943 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2944 - $x = Math::BigFloat->new("0.123456"); $x->bfloor(); ok 2945 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2946 - $x = Math::BigFloat->new("0.1234567"); $x->bfloor(); ok 2947 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2948 - $x = Math::BigFloat->new("0.12345678"); $x->bfloor(); ok 2949 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2950 - $x = Math::BigFloat->new("0.123456789"); $x->bfloor(); ok 2951 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2952 - $x = Math::BigFloat->new("0"); $x->bceil(); ok 2953 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2954 - $x = Math::BigFloat->new("abc"); $x->bceil(); ok 2955 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2956 - $x = Math::BigFloat->new("+inf"); $x->bceil(); ok 2957 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2958 - $x = Math::BigFloat->new("-inf"); $x->bceil(); ok 2959 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2960 - $x = Math::BigFloat->new("1"); $x->bceil(); ok 2961 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2962 - $x = Math::BigFloat->new("-51"); $x->bceil(); ok 2963 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2964 - $x = Math::BigFloat->new("-51.2"); $x->bceil(); ok 2965 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2966 - $x = Math::BigFloat->new("12.2"); $x->bceil(); ok 2967 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2968 - $x = Math::BigFloat->new("-0.4"); $x->bceil(); ok 2969 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2970 - $x = Math::BigFloat->new("0"); $x->bint(); ok 2971 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2972 - $x = Math::BigFloat->new("NaN"); $x->bint(); ok 2973 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2974 - $x = Math::BigFloat->new("+inf"); $x->bint(); ok 2975 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2976 - $x = Math::BigFloat->new("-inf"); $x->bint(); ok 2977 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2978 - $x = Math::BigFloat->new("1"); $x->bint(); ok 2979 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2980 - $x = Math::BigFloat->new("-51"); $x->bint(); ok 2981 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2982 - $x = Math::BigFloat->new("-51.2"); $x->bint(); ok 2983 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2984 - $x = Math::BigFloat->new("12.2"); $x->bint(); ok 2985 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2986 - $x = Math::BigFloat->new("-0.4"); $x->bint(); ok 2987 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2988 - $x = Math::BigFloat->new("-1"); $x = log($x); ok 2989 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2990 - $x = Math::BigFloat->new("0"); $x = log($x); ok 2991 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2992 - $x = Math::BigFloat->new("1"); $x = log($x); ok 2993 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2994 - $x = Math::BigFloat->new("2"); $x = log($x); ok 2995 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2996 - $x = Math::BigFloat->new("3"); $x = log($x); ok 2997 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2998 - $x = Math::BigFloat->new("123456789"); $x = log($x); ok 2999 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 3000 - $x = Math::BigFloat->new("1234567890987654321"); $x = log($x); ok 3001 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3002 - $x = Math::BigFloat->new("-inf"); $x = log($x); ok 3003 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3004 - $x = Math::BigFloat->new("inf"); $x = log($x); ok 3005 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3006 - $x = Math::BigFloat->new("NaN"); $x = log($x); ok 3007 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $y ok 3008 - $x = Math::BigInt->new(1200); $y = Math::BigFloat->new($x); \# check $x ok 3009 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsstr() ok 3010 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->exponent() ok 3011 - Math::BigFloat->new("1e1234567890123456789012345678901234567890") > 0 ok 3012 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bsub("1e1234567890123456789012345678901234567890") ok 3013 - Math::BigFloat->new("1e1234567890123456789012345678901234567890")->bmul(2)->bsstr() ok 3014 - Math::BigFloat->new("1234567890123456789012345678901234567890e2")->mantissa() ok 3015 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{accuracy} ok 3016 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{precision} ok 3017 - $x = Math::BigFloat->new(2); $x->binf(); $x->{accuracy} ok 3018 - $x = Math::BigFloat->new(2); $x->binf(); $x->{precision} ok 3019 - $x = Math::BigFloat->new(2); $x->bone(); $x->{accuracy} ok 3020 - $x = Math::BigFloat->new(2); $x->bone(); $x->{precision} ok 3021 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{accuracy} ok 3022 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{precision} ok 3023 - Math::BigFloat->bzero() ok 3024 - Math::BigFloat->bone() ok 3025 - Math::BigFloat->bone("+") ok 3026 - Math::BigFloat->bone("-") ok 3027 - Math::BigFloat->bnan() ok 3028 - Math::BigFloat->binf() ok 3029 - Math::BigFloat->binf("+") ok 3030 - Math::BigFloat->binf("-") ok 3031 - Math::BigFloat->binf("-inf") ok 3032 - $x = Math::BigFloat->new(12); Math::BigFloat->precision(-2); $x->bsqrt(); ok 3033 - Math::BigFloat->precision(undef); $x = Math::BigFloat->new(12); Math::BigFloat->precision(0); $x->bsqrt(); ok 3034 - Math::BigFloat->precision(-3); $x = Math::BigFloat->new(12); $x->bsqrt(); ok 3035 - A and P set => NaN ok 3036 - supplied arg overrides set global ok 3037 - @args = Math::BigFloat::objectify(2, Math::BigFloat, 4, 5); join(" ", @args); ok 3038 - Math::BigFloat->new(-1)->is_one() ok 3039 - Math::BigFloat->new(-1)->is_one("-") ok 3040 - Math::BigFloat->new(1)->bdiv("0.5")->bsstr() ok 3041 - $x = Math::BigFloat->new(3); $x -= $x; ok 3042 - $x = Math::BigFloat->new(-3); $x -= $x; ok 3043 - $x = Math::BigFloat->new(3); $x += $x; ok 3044 - $x = Math::BigFloat->new(-3); $x += $x; ok 3045 - $x = Math::BigFloat->new("NaN"); $x -= $x; ok 3046 - $x = Math::BigFloat->new("inf"); $x -= $x; ok 3047 - $x = Math::BigFloat->new("-inf"); $x -= $x; ok 3048 - $x = Math::BigFloat->new("NaN"); $x += $x; ok 3049 - $x = Math::BigFloat->new("inf"); $x += $x; ok 3050 - $x = Math::BigFloat->new("-inf"); $x += $x; ok 3051 - $x = Math::BigFloat->new("3.14"); $x -= $x; ok 3052 - $x = Math::BigFloat->new("-3.14"); $x -= $x; ok 3053 - 6.28 = Math::BigFloat->new("3.14"); 6.28 += 6.28; ok 3054 - -6.28 = Math::BigFloat->new("-3.14"); -6.28 += -6.28; ok 3055 - 9.8596 = Math::BigFloat->new("3.14"); 9.8596 *= 9.8596; ok 3056 - 9.8596 = Math::BigFloat->new("-3.14"); 9.8596 *= 9.8596; ok 3057 - 1 = Math::BigFloat->new("3.14"); 1 /= 1; ok 3058 - 1 = Math::BigFloat->new("-3.14"); 1 /= 1; ok 3059 - 0 = Math::BigFloat->new("3.14"); 0 %= 0; ok 3060 - 0 = Math::BigFloat->new("-3.14"); 0 %= 0; ok 3061 - $x = Math::BigFloat->new(0); $y = Math::BigFloat->new("0.1"); $x ** $y ok 3062 - 1 = Math::BigFloat->new(".222222222222222222222222222222222222222222"); 1->bceil(); ok 3063 - value of ((2**148)+1)/17 ok 3064 - number of digits in ((2**148)+1)/17 ok 3065 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y ok 3066 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x ok 3067 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y ok 3068 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18"); $x <<= $y; $x >>= $y; $x ok 3069 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y ok 3070 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y ok 3071 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x >>= $y; $x ok All tests successful. Files=54, Tests=39131, 18 wallclock secs ( 2.04 usr 0.32 sys + 14.75 cusr 2.11 csys = 19.22 CPU) Result: PASS make[1]: Leaving directory '/<>' create-stamp debian/debhelper-build-stamp dh_prep dh_auto_install --destdir=debian/libmath-bigint-perl/ make -j2 install DESTDIR=/<>/debian/libmath-bigint-perl AM_UPDATE_INFO_DIR=no PREFIX=/usr make[1]: Entering directory '/<>' Manifying 5 pod documents Installing /<>/debian/libmath-bigint-perl/usr/share/perl5/Math/BigFloat.pm Installing /<>/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt.pm Installing /<>/debian/libmath-bigint-perl/usr/share/perl5/Math/BigRat.pm Installing /<>/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt/Lib.pm Installing /<>/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt/Calc.pm Installing /<>/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt.3pm Installing /<>/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt::Calc.3pm Installing /<>/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt::Lib.3pm Installing /<>/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigFloat.3pm Installing /<>/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigRat.3pm make[1]: Leaving directory '/<>' dh_installdocs dh_installchangelogs dh_installexamples dh_installman dh_perl dh_link dh_strip_nondeterminism dh_compress dh_fixperms dh_missing dh_installdeb dh_gencontrol dh_md5sums dh_builddeb dpkg-deb: building package 'libmath-bigint-perl' in '../libmath-bigint-perl_2.003003-1_all.deb'. dpkg-genbuildinfo -O../libmath-bigint-perl_2.003003-1_amd64.buildinfo dpkg-genchanges -O../libmath-bigint-perl_2.003003-1_amd64.changes dpkg-genchanges: info: including full source code in upload dpkg-source -Zxz --after-build . dpkg-buildpackage: info: full upload (original source is included) -------------------------------------------------------------------------------- Build finished at 2024-09-15T20:31:00Z Finished -------- I: Built successfully +------------------------------------------------------------------------------+ | Changes | +------------------------------------------------------------------------------+ libmath-bigint-perl_2.003003-1_amd64.changes: --------------------------------------------- Format: 1.8 Date: Thu, 30 May 2024 18:37:43 +0200 Source: libmath-bigint-perl Binary: libmath-bigint-perl Architecture: source all Version: 2.003003-1 Distribution: perl-5.40-throwaway Urgency: medium Maintainer: Debian Perl Group Changed-By: gregor herrmann Description: libmath-bigint-perl - arbitrary size integer/floating/rational number math package Changes: libmath-bigint-perl (2.003003-1) unstable; urgency=medium . * Import upstream version 2.003003. * Declare compliance with Debian Policy 4.7.0. Checksums-Sha1: f7e3e8a17b3574d52555647145ede5cab8036cb4 1341 libmath-bigint-perl_2.003003-1.dsc ad80f5c45719d6857e807fe103ffffc42d12f231 2978556 libmath-bigint-perl_2.003003.orig.tar.gz 777007187e406e09e24b55d58f56a38a9adec048 4408 libmath-bigint-perl_2.003003-1.debian.tar.xz ee812ae3beb1f26e0d1650568d02c1e4f4f47307 185464 libmath-bigint-perl_2.003003-1_all.deb 6f80afeff5bff0e808e7082c28fd9a9be05ea4cf 5100 libmath-bigint-perl_2.003003-1_amd64.buildinfo Checksums-Sha256: 0d44b0f0605be741b8437198ad67ae67b59dc0c9c56704902b822c4169ac76c2 1341 libmath-bigint-perl_2.003003-1.dsc f24804a58265b7b3d00dc3f71dc575aebcf9e0230a291028b65e7a2c41abcb1c 2978556 libmath-bigint-perl_2.003003.orig.tar.gz ba73e9dda4fa8266083928da647161a17d295943a830b1ba3be216f2bb62cedd 4408 libmath-bigint-perl_2.003003-1.debian.tar.xz f1cc386c65d74ee0ef0633165e99cf967bbb76a4a0a3d03db22426e5800dc28e 185464 libmath-bigint-perl_2.003003-1_all.deb 4991dede8dfb5f739d3d7147eea1d85250e48b4bbe6ab3026559d330ae1f32d9 5100 libmath-bigint-perl_2.003003-1_amd64.buildinfo Files: 5fcfc958312ad7da55560436a28c25f4 1341 perl optional libmath-bigint-perl_2.003003-1.dsc a32af6bad7718f4ae84f25cf981f0b25 2978556 perl optional libmath-bigint-perl_2.003003.orig.tar.gz d63d46ba8a2b14874e71f203bf97fcc8 4408 perl optional libmath-bigint-perl_2.003003-1.debian.tar.xz 84580e355bff4790ed33c1b9fca8e4d8 185464 perl optional libmath-bigint-perl_2.003003-1_all.deb 4dabece8a812de94ebc8d32d76fd5376 5100 perl optional libmath-bigint-perl_2.003003-1_amd64.buildinfo +------------------------------------------------------------------------------+ | Buildinfo | +------------------------------------------------------------------------------+ Format: 1.0 Source: libmath-bigint-perl Binary: libmath-bigint-perl Architecture: all source Version: 2.003003-1 Checksums-Md5: 5fcfc958312ad7da55560436a28c25f4 1341 libmath-bigint-perl_2.003003-1.dsc 84580e355bff4790ed33c1b9fca8e4d8 185464 libmath-bigint-perl_2.003003-1_all.deb Checksums-Sha1: f7e3e8a17b3574d52555647145ede5cab8036cb4 1341 libmath-bigint-perl_2.003003-1.dsc ee812ae3beb1f26e0d1650568d02c1e4f4f47307 185464 libmath-bigint-perl_2.003003-1_all.deb Checksums-Sha256: 0d44b0f0605be741b8437198ad67ae67b59dc0c9c56704902b822c4169ac76c2 1341 libmath-bigint-perl_2.003003-1.dsc f1cc386c65d74ee0ef0633165e99cf967bbb76a4a0a3d03db22426e5800dc28e 185464 libmath-bigint-perl_2.003003-1_all.deb Build-Origin: Debian Build-Architecture: amd64 Build-Date: Sun, 15 Sep 2024 20:31:00 +0000 Build-Path: /<> Build-Tainted-By: merged-usr-via-aliased-dirs usr-local-has-programs Installed-Build-Depends: autoconf (= 2.72-3), automake (= 1:1.16.5-1.3), autopoint (= 0.22.5-2), autotools-dev (= 20220109.1), base-files (= 13.5), base-passwd (= 3.6.4), bash (= 5.2.32-1+b1), binutils (= 2.43.1-4), binutils-common (= 2.43.1-4), binutils-x86-64-linux-gnu (= 2.43.1-4), bsdextrautils (= 2.40.2-8), bsdutils (= 1:2.40.2-8), build-essential (= 12.10), bzip2 (= 1.0.8-6), coreutils (= 9.4-3.1), cpp (= 4:14.1.0-2), cpp-13 (= 13.3.0-6), cpp-13-x86-64-linux-gnu (= 13.3.0-6), cpp-14 (= 14.2.0-4), cpp-14-x86-64-linux-gnu (= 14.2.0-4), cpp-x86-64-linux-gnu (= 4:14.1.0-2), dash (= 0.5.12-9), debconf (= 1.5.87), debhelper (= 13.20), debianutils (= 5.20), dh-autoreconf (= 20), dh-strip-nondeterminism (= 1.14.0-1), diffutils (= 1:3.10-1), dpkg (= 1.22.11), dpkg-dev (= 1.22.11), dwz (= 0.15-1+b1), file (= 1:5.45-3), findutils (= 4.10.0-3), g++ (= 4:14.1.0-2), g++-14 (= 14.2.0-4), g++-14-x86-64-linux-gnu (= 14.2.0-4), g++-x86-64-linux-gnu (= 4:14.1.0-2), gcc (= 4:14.1.0-2), gcc-13 (= 13.3.0-6), gcc-13-base (= 13.3.0-6), gcc-13-x86-64-linux-gnu (= 13.3.0-6), gcc-14 (= 14.2.0-4), gcc-14-base (= 14.2.0-4), gcc-14-x86-64-linux-gnu (= 14.2.0-4), gcc-x86-64-linux-gnu (= 4:14.1.0-2), gettext (= 0.22.5-2), gettext-base (= 0.22.5-2), grep (= 3.11-4), groff-base (= 1.23.0-5), gzip (= 1.12-1.1), hostname (= 3.23+nmu2), init-system-helpers (= 1.66), intltool-debian (= 0.35.0+20060710.6), libacl1 (= 2.3.2-2), libarchive-zip-perl (= 1.68-1), libasan8 (= 14.2.0-4), libatomic1 (= 14.2.0-4), libattr1 (= 1:2.5.2-1), libaudit-common (= 1:4.0.1-1), libaudit1 (= 1:4.0.1-1), libbinutils (= 2.43.1-4), libblkid1 (= 2.40.2-8), libbz2-1.0 (= 1.0.8-6), libc-bin (= 2.40-2), libc-dev-bin (= 2.40-2), libc6 (= 2.40-2), libc6-dev (= 2.40-2), libcap-ng0 (= 0.8.5-2), libcap2 (= 1:2.66-5), libcc1-0 (= 14.2.0-4), libcrypt-dev (= 1:4.4.36-5), libcrypt1 (= 1:4.4.36-5), libctf-nobfd0 (= 2.43.1-4), libctf0 (= 2.43.1-4), libdb5.3t64 (= 5.3.28+dfsg2-7), libdebconfclient0 (= 0.272), libdebhelper-perl (= 13.20), libdpkg-perl (= 1.22.11), libelf1t64 (= 0.191-2), libfile-stripnondeterminism-perl (= 1.14.0-1), libgcc-13-dev (= 13.3.0-6), libgcc-14-dev (= 14.2.0-4), libgcc-s1 (= 14.2.0-4), libgdbm-compat4t64 (= 1.24-2), libgdbm6t64 (= 1.24-2), libgmp10 (= 2:6.3.0+dfsg-2+b1), libgomp1 (= 14.2.0-4), libgprofng0 (= 2.43.1-4), libhwasan0 (= 14.2.0-4), libicu72 (= 72.1-5), libisl23 (= 0.27-1), libitm1 (= 14.2.0-4), libjansson4 (= 2.14-2+b2), liblsan0 (= 14.2.0-4), liblzma5 (= 5.6.2-2), libmagic-mgc (= 1:5.45-3), libmagic1t64 (= 1:5.45-3), libmd0 (= 1.1.0-2), libmount1 (= 2.40.2-8), libmpc3 (= 1.3.1-1+b2), libmpfr6 (= 4.2.1-1+b1), libpam-modules (= 1.5.3-7), libpam-modules-bin (= 1.5.3-7), libpam-runtime (= 1.5.3-7), libpam0g (= 1.5.3-7), libpcre2-8-0 (= 10.42-4+b1), libperl5.40 (= 5.40.0-5), libpipeline1 (= 1.5.8-1), libquadmath0 (= 14.2.0-4), libseccomp2 (= 2.5.5-1+b1), libselinux1 (= 3.7-3), libsframe1 (= 2.43.1-4), libsmartcols1 (= 2.40.2-8), libssl3t64 (= 3.3.2-1), libstdc++-14-dev (= 14.2.0-4), libstdc++6 (= 14.2.0-4), libsystemd0 (= 256.6-1), libtinfo6 (= 6.5-2), libtool (= 2.4.7-7), libtsan2 (= 14.2.0-4), libubsan1 (= 14.2.0-4), libuchardet0 (= 0.0.8-1+b1), libudev1 (= 256.6-1), libunistring5 (= 1.2-1), libuuid1 (= 2.40.2-8), libxml2 (= 2.12.7+dfsg-3+b1), libzstd1 (= 1.5.6+dfsg-1), linux-libc-dev (= 6.10.9-1), m4 (= 1.4.19-4), make (= 4.3-4.1), man-db (= 2.13.0-1), mawk (= 1.3.4.20240905-1), ncurses-base (= 6.5-2), ncurses-bin (= 6.5-2), openssl-provider-legacy (= 3.3.2-1), patch (= 2.7.6-7), perl (= 5.40.0-5), perl-base (= 5.40.0-5), perl-modules-5.40 (= 5.40.0-5), po-debconf (= 1.0.21+nmu1), rpcsvc-proto (= 1.4.3-1), sed (= 4.9-2), sensible-utils (= 0.0.24), sysvinit-utils (= 3.10-2), tar (= 1.35+dfsg-3), usr-is-merged (= 39), util-linux (= 2.40.2-8), xz-utils (= 5.6.2-2), zlib1g (= 1:1.3.dfsg+really1.3.1-1) Environment: DEB_BUILD_OPTIONS="parallel=2" LANG="C.UTF-8" LC_COLLATE="C.UTF-8" LC_CTYPE="C.UTF-8" LD_LIBRARY_PATH="/usr/lib/libeatmydata" SOURCE_DATE_EPOCH="1717087063" +------------------------------------------------------------------------------+ | Package contents | +------------------------------------------------------------------------------+ libmath-bigint-perl_2.003003-1_all.deb -------------------------------------- new Debian package, version 2.0. size 185464 bytes: control archive=1268 bytes. 728 bytes, 18 lines control 1591 bytes, 21 lines md5sums Package: libmath-bigint-perl Version: 2.003003-1 Architecture: all Maintainer: Debian Perl Group Installed-Size: 860 Depends: perl:any, libscalar-list-utils-perl Section: perl Priority: optional Homepage: https://metacpan.org/release/Math-BigInt Description: arbitrary size integer/floating/rational number math package Math::BigInt, Math::BigFloat, and Math::BigRat are modules for arbitrary precision integers, floating point numbers, and rational numbers. . All operators are overloaded; operations with overloaded operators preserve the arguments. . Math::BigInt, Math::BigFloat, and Math::BigRat are also in perl core, this package provides newer versions separately. drwxr-xr-x root/root 0 2024-05-30 16:37 ./ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/doc/ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/doc/libmath-bigint-perl/ -rw-r--r-- root/root 2230 2024-01-07 16:52 ./usr/share/doc/libmath-bigint-perl/BUGS -rw-r--r-- root/root 1821 2023-10-11 06:08 ./usr/share/doc/libmath-bigint-perl/CREDITS -rw-r--r-- root/root 1369 2023-10-11 06:08 ./usr/share/doc/libmath-bigint-perl/GOALS -rw-r--r-- root/root 64 2023-10-11 06:08 ./usr/share/doc/libmath-bigint-perl/NEW -rw-r--r-- root/root 3356 2024-01-07 16:52 ./usr/share/doc/libmath-bigint-perl/TODO -rw-r--r-- root/root 1352 2024-05-30 16:37 ./usr/share/doc/libmath-bigint-perl/changelog.Debian.gz -rw-r--r-- root/root 2398 2023-10-11 06:08 ./usr/share/doc/libmath-bigint-perl/changelog.gz -rw-r--r-- root/root 1438 2024-05-30 16:37 ./usr/share/doc/libmath-bigint-perl/copyright drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/doc/libmath-bigint-perl/examples/ -rw-r--r-- root/root 7274 2023-09-27 17:54 ./usr/share/doc/libmath-bigint-perl/examples/1000.txt -rwxr-xr-x root/root 4217 2023-09-27 17:54 ./usr/share/doc/libmath-bigint-perl/examples/bigprimes.pl -rwxr-xr-x root/root 1969 2023-09-27 17:54 ./usr/share/doc/libmath-bigint-perl/examples/prime.pl drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/man/ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/man/man3/ -rw-r--r-- root/root 10943 2024-05-30 16:37 ./usr/share/man/man3/Math::BigFloat.3pm.gz -rw-r--r-- root/root 29414 2024-05-30 16:37 ./usr/share/man/man3/Math::BigInt.3pm.gz -rw-r--r-- root/root 1921 2024-05-30 16:37 ./usr/share/man/man3/Math::BigInt::Calc.3pm.gz -rw-r--r-- root/root 7133 2024-05-30 16:37 ./usr/share/man/man3/Math::BigInt::Lib.3pm.gz -rw-r--r-- root/root 7031 2024-05-30 16:37 ./usr/share/man/man3/Math::BigRat.3pm.gz drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/perl5/ drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/perl5/Math/ -rw-r--r-- root/root 229373 2024-05-27 13:33 ./usr/share/perl5/Math/BigFloat.pm -rw-r--r-- root/root 291572 2024-05-27 13:33 ./usr/share/perl5/Math/BigInt.pm drwxr-xr-x root/root 0 2024-05-30 16:37 ./usr/share/perl5/Math/BigInt/ -rw-r--r-- root/root 75948 2024-05-27 13:33 ./usr/share/perl5/Math/BigInt/Calc.pm -rw-r--r-- root/root 80062 2024-05-27 13:33 ./usr/share/perl5/Math/BigInt/Lib.pm -rw-r--r-- root/root 97082 2024-05-27 13:33 ./usr/share/perl5/Math/BigRat.pm +------------------------------------------------------------------------------+ | Post Build | +------------------------------------------------------------------------------+ +------------------------------------------------------------------------------+ | Cleanup | +------------------------------------------------------------------------------+ Purging /<> Not cleaning session: cloned chroot in use +------------------------------------------------------------------------------+ | Summary | +------------------------------------------------------------------------------+ Build Architecture: amd64 Build Type: full Build-Space: 15644 Build-Time: 21 Distribution: perl-5.40-throwaway Host Architecture: amd64 Install-Time: 4 Job: /srv/debomatic/incoming/libmath-bigint-perl_2.003003-1.dsc Machine Architecture: amd64 Package: libmath-bigint-perl Package-Time: 28 Source-Version: 2.003003-1 Space: 15644 Status: successful Version: 2.003003-1 -------------------------------------------------------------------------------- Finished at 2024-09-15T20:31:00Z Build needed 00:00:28, 15644k disk space