I: pbuilder: network access will be disabled during build I: Current time: Fri Jun 21 21:04:33 -12 2024 I: pbuilder-time-stamp: 1719047073 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bookworm-reproducible-base.tgz] I: copying local configuration W: --override-config is not set; not updating apt.conf Read the manpage for details. I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: Copying source file I: copying [libmath-bigint-perl_1.999838-1.dsc] I: copying [./libmath-bigint-perl_1.999838.orig.tar.gz] I: copying [./libmath-bigint-perl_1.999838-1.debian.tar.xz] I: Extracting source gpgv: Signature made Fri Mar 31 03:22:29 2023 -12 gpgv: using RSA key AC2FBDB104943D8A44A0211D02713BCFCA5410B2 gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./libmath-bigint-perl_1.999838-1.dsc: no acceptable signature found dpkg-source: info: extracting libmath-bigint-perl in libmath-bigint-perl-1.999838 dpkg-source: info: unpacking libmath-bigint-perl_1.999838.orig.tar.gz dpkg-source: info: unpacking libmath-bigint-perl_1.999838-1.debian.tar.xz I: Not using root during the build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/3929730/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build' BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' BUILDUSERNAME='pbuilder1' BUILD_ARCH='amd64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=16 ' DISTRIBUTION='bookworm' HOME='/root' HOST_ARCH='amd64' IFS=' ' INVOCATION_ID='faddb81b4c534c8e9c75a9523105987c' LANG='C' LANGUAGE='en_US:en' LC_ALL='C' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='3929730' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.8VU0DoWC/pbuilderrc_8blv --distribution bookworm --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bookworm-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.8VU0DoWC/b1 --logfile b1/build.log libmath-bigint-perl_1.999838-1.dsc' SUDO_GID='111' SUDO_UID='106' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://85.184.249.68:3128' I: uname -a Linux ionos15-amd64 6.1.0-0.deb11.6-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.15-1~bpo11+1 (2023-03-16) x86_64 GNU/Linux I: ls -l /bin total 5632 -rwxr-xr-x 1 root root 1265648 Apr 23 2023 bash -rwxr-xr-x 3 root root 39224 Sep 18 2022 bunzip2 -rwxr-xr-x 3 root root 39224 Sep 18 2022 bzcat lrwxrwxrwx 1 root root 6 Sep 18 2022 bzcmp -> bzdiff -rwxr-xr-x 1 root root 2225 Sep 18 2022 bzdiff lrwxrwxrwx 1 root root 6 Sep 18 2022 bzegrep -> bzgrep -rwxr-xr-x 1 root root 4893 Nov 27 2021 bzexe lrwxrwxrwx 1 root root 6 Sep 18 2022 bzfgrep -> bzgrep -rwxr-xr-x 1 root root 3775 Sep 18 2022 bzgrep -rwxr-xr-x 3 root root 39224 Sep 18 2022 bzip2 -rwxr-xr-x 1 root root 14568 Sep 18 2022 bzip2recover lrwxrwxrwx 1 root root 6 Sep 18 2022 bzless -> bzmore -rwxr-xr-x 1 root root 1297 Sep 18 2022 bzmore -rwxr-xr-x 1 root root 44016 Sep 20 2022 cat -rwxr-xr-x 1 root root 68656 Sep 20 2022 chgrp -rwxr-xr-x 1 root root 64496 Sep 20 2022 chmod -rwxr-xr-x 1 root root 72752 Sep 20 2022 chown -rwxr-xr-x 1 root root 151152 Sep 20 2022 cp -rwxr-xr-x 1 root root 125640 Jan 5 2023 dash -rwxr-xr-x 1 root root 121904 Sep 20 2022 date -rwxr-xr-x 1 root root 89240 Sep 20 2022 dd -rwxr-xr-x 1 root root 102200 Sep 20 2022 df -rwxr-xr-x 1 root root 151344 Sep 20 2022 dir -rwxr-xr-x 1 root root 88656 Mar 22 2023 dmesg lrwxrwxrwx 1 root root 8 Dec 19 2022 dnsdomainname -> hostname lrwxrwxrwx 1 root root 8 Dec 19 2022 domainname -> hostname -rwxr-xr-x 1 root root 43856 Sep 20 2022 echo -rwxr-xr-x 1 root root 41 Jan 24 2023 egrep -rwxr-xr-x 1 root root 35664 Sep 20 2022 false -rwxr-xr-x 1 root root 41 Jan 24 2023 fgrep -rwxr-xr-x 1 root root 85600 Mar 22 2023 findmnt -rwsr-xr-x 1 root root 35128 Mar 22 2023 fusermount -rwxr-xr-x 1 root root 203152 Jan 24 2023 grep -rwxr-xr-x 2 root root 2346 Apr 9 2022 gunzip -rwxr-xr-x 1 root root 6447 Apr 9 2022 gzexe -rwxr-xr-x 1 root root 98136 Apr 9 2022 gzip -rwxr-xr-x 1 root root 22680 Dec 19 2022 hostname -rwxr-xr-x 1 root root 72824 Sep 20 2022 ln -rwxr-xr-x 1 root root 53024 Mar 23 2023 login -rwxr-xr-x 1 root root 151344 Sep 20 2022 ls -rwxr-xr-x 1 root root 207168 Mar 22 2023 lsblk -rwxr-xr-x 1 root root 97552 Sep 20 2022 mkdir -rwxr-xr-x 1 root root 72912 Sep 20 2022 mknod -rwxr-xr-x 1 root root 43952 Sep 20 2022 mktemp -rwxr-xr-x 1 root root 59712 Mar 22 2023 more -rwsr-xr-x 1 root root 59704 Mar 22 2023 mount -rwxr-xr-x 1 root root 18744 Mar 22 2023 mountpoint -rwxr-xr-x 1 root root 142968 Sep 20 2022 mv lrwxrwxrwx 1 root root 8 Dec 19 2022 nisdomainname -> hostname lrwxrwxrwx 1 root root 14 Apr 2 2023 pidof -> /sbin/killall5 -rwxr-xr-x 1 root root 43952 Sep 20 2022 pwd lrwxrwxrwx 1 root root 4 Apr 23 2023 rbash -> bash -rwxr-xr-x 1 root root 52112 Sep 20 2022 readlink -rwxr-xr-x 1 root root 72752 Sep 20 2022 rm -rwxr-xr-x 1 root root 56240 Sep 20 2022 rmdir -rwxr-xr-x 1 root root 27560 Nov 2 2022 run-parts -rwxr-xr-x 1 root root 126424 Jan 5 2023 sed lrwxrwxrwx 1 root root 4 Jan 5 2023 sh -> dash -rwxr-xr-x 1 root root 43888 Sep 20 2022 sleep -rwxr-xr-x 1 root root 85008 Sep 20 2022 stty -rwsr-xr-x 1 root root 72000 Mar 22 2023 su -rwxr-xr-x 1 root root 39824 Sep 20 2022 sync -rwxr-xr-x 1 root root 531984 Apr 6 2023 tar -rwxr-xr-x 1 root root 14520 Nov 2 2022 tempfile -rwxr-xr-x 1 root root 109616 Sep 20 2022 touch -rwxr-xr-x 1 root root 35664 Sep 20 2022 true -rwxr-xr-x 1 root root 14568 Mar 22 2023 ulockmgr_server -rwsr-xr-x 1 root root 35128 Mar 22 2023 umount -rwxr-xr-x 1 root root 43888 Sep 20 2022 uname -rwxr-xr-x 2 root root 2346 Apr 9 2022 uncompress -rwxr-xr-x 1 root root 151344 Sep 20 2022 vdir -rwxr-xr-x 1 root root 72024 Mar 22 2023 wdctl lrwxrwxrwx 1 root root 8 Dec 19 2022 ypdomainname -> hostname -rwxr-xr-x 1 root root 1984 Apr 9 2022 zcat -rwxr-xr-x 1 root root 1678 Apr 9 2022 zcmp -rwxr-xr-x 1 root root 6460 Apr 9 2022 zdiff -rwxr-xr-x 1 root root 29 Apr 9 2022 zegrep -rwxr-xr-x 1 root root 29 Apr 9 2022 zfgrep -rwxr-xr-x 1 root root 2081 Apr 9 2022 zforce -rwxr-xr-x 1 root root 8103 Apr 9 2022 zgrep -rwxr-xr-x 1 root root 2206 Apr 9 2022 zless -rwxr-xr-x 1 root root 1842 Apr 9 2022 zmore -rwxr-xr-x 1 root root 4577 Apr 9 2022 znew I: user script /srv/workspace/pbuilder/3929730/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: amd64 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: debhelper-compat (= 13), libscalar-list-utils-perl, perl dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 19596 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on debhelper-compat (= 13); however: Package debhelper-compat is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} debhelper{a} dh-autoreconf{a} dh-strip-nondeterminism{a} dwz{a} file{a} gettext{a} gettext-base{a} groff-base{a} intltool-debian{a} libarchive-zip-perl{a} libdebhelper-perl{a} libelf1{a} libfile-stripnondeterminism-perl{a} libicu72{a} libmagic-mgc{a} libmagic1{a} libpipeline1{a} libsub-override-perl{a} libtool{a} libuchardet0{a} libxml2{a} m4{a} man-db{a} po-debconf{a} sensible-utils{a} The following packages are RECOMMENDED but will NOT be installed: curl libarchive-cpio-perl libltdl-dev libmail-sendmail-perl lynx wget 0 packages upgraded, 30 newly installed, 0 to remove and 0 not upgraded. Need to get 18.7 MB of archives. After unpacking 72.4 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian bookworm/main amd64 sensible-utils all 0.0.17+nmu1 [19.0 kB] Get: 2 http://deb.debian.org/debian bookworm/main amd64 libmagic-mgc amd64 1:5.44-3 [305 kB] Get: 3 http://deb.debian.org/debian bookworm/main amd64 libmagic1 amd64 1:5.44-3 [104 kB] Get: 4 http://deb.debian.org/debian bookworm/main amd64 file amd64 1:5.44-3 [42.5 kB] Get: 5 http://deb.debian.org/debian bookworm/main amd64 gettext-base amd64 0.21-12 [160 kB] Get: 6 http://deb.debian.org/debian bookworm/main amd64 libuchardet0 amd64 0.0.7-1 [67.8 kB] Get: 7 http://deb.debian.org/debian bookworm/main amd64 groff-base amd64 1.22.4-10 [916 kB] Get: 8 http://deb.debian.org/debian bookworm/main amd64 bsdextrautils amd64 2.38.1-5+b1 [86.6 kB] Get: 9 http://deb.debian.org/debian bookworm/main amd64 libpipeline1 amd64 1.5.7-1 [38.5 kB] Get: 10 http://deb.debian.org/debian bookworm/main amd64 man-db amd64 2.11.2-2 [1386 kB] Get: 11 http://deb.debian.org/debian bookworm/main amd64 m4 amd64 1.4.19-3 [287 kB] Get: 12 http://deb.debian.org/debian bookworm/main amd64 autoconf all 2.71-3 [332 kB] Get: 13 http://deb.debian.org/debian bookworm/main amd64 autotools-dev all 20220109.1 [51.6 kB] Get: 14 http://deb.debian.org/debian bookworm/main amd64 automake all 1:1.16.5-1.3 [823 kB] Get: 15 http://deb.debian.org/debian bookworm/main amd64 autopoint all 0.21-12 [495 kB] Get: 16 http://deb.debian.org/debian bookworm/main amd64 libdebhelper-perl all 13.11.4 [81.2 kB] Get: 17 http://deb.debian.org/debian bookworm/main amd64 libtool all 2.4.7-5 [517 kB] Get: 18 http://deb.debian.org/debian bookworm/main amd64 dh-autoreconf all 20 [17.1 kB] Get: 19 http://deb.debian.org/debian bookworm/main amd64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 20 http://deb.debian.org/debian bookworm/main amd64 libsub-override-perl all 0.09-4 [9304 B] Get: 21 http://deb.debian.org/debian bookworm/main amd64 libfile-stripnondeterminism-perl all 1.13.1-1 [19.4 kB] Get: 22 http://deb.debian.org/debian bookworm/main amd64 dh-strip-nondeterminism all 1.13.1-1 [8620 B] Get: 23 http://deb.debian.org/debian bookworm/main amd64 libelf1 amd64 0.188-2.1 [174 kB] Get: 24 http://deb.debian.org/debian bookworm/main amd64 dwz amd64 0.15-1 [109 kB] Get: 25 http://deb.debian.org/debian bookworm/main amd64 libicu72 amd64 72.1-3 [9376 kB] Get: 26 http://deb.debian.org/debian bookworm/main amd64 libxml2 amd64 2.9.14+dfsg-1.2 [687 kB] Get: 27 http://deb.debian.org/debian bookworm/main amd64 gettext amd64 0.21-12 [1300 kB] Get: 28 http://deb.debian.org/debian bookworm/main amd64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get: 29 http://deb.debian.org/debian bookworm/main amd64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 30 http://deb.debian.org/debian bookworm/main amd64 debhelper all 13.11.4 [942 kB] Fetched 18.7 MB in 0s (76.5 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package sensible-utils. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 19596 files and directories currently installed.) Preparing to unpack .../00-sensible-utils_0.0.17+nmu1_all.deb ... Unpacking sensible-utils (0.0.17+nmu1) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../01-libmagic-mgc_1%3a5.44-3_amd64.deb ... Unpacking libmagic-mgc (1:5.44-3) ... Selecting previously unselected package libmagic1:amd64. Preparing to unpack .../02-libmagic1_1%3a5.44-3_amd64.deb ... Unpacking libmagic1:amd64 (1:5.44-3) ... Selecting previously unselected package file. Preparing to unpack .../03-file_1%3a5.44-3_amd64.deb ... Unpacking file (1:5.44-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../04-gettext-base_0.21-12_amd64.deb ... Unpacking gettext-base (0.21-12) ... Selecting previously unselected package libuchardet0:amd64. Preparing to unpack .../05-libuchardet0_0.0.7-1_amd64.deb ... Unpacking libuchardet0:amd64 (0.0.7-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../06-groff-base_1.22.4-10_amd64.deb ... Unpacking groff-base (1.22.4-10) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../07-bsdextrautils_2.38.1-5+b1_amd64.deb ... Unpacking bsdextrautils (2.38.1-5+b1) ... Selecting previously unselected package libpipeline1:amd64. Preparing to unpack .../08-libpipeline1_1.5.7-1_amd64.deb ... Unpacking libpipeline1:amd64 (1.5.7-1) ... Selecting previously unselected package man-db. Preparing to unpack .../09-man-db_2.11.2-2_amd64.deb ... Unpacking man-db (2.11.2-2) ... Selecting previously unselected package m4. Preparing to unpack .../10-m4_1.4.19-3_amd64.deb ... Unpacking m4 (1.4.19-3) ... Selecting previously unselected package autoconf. Preparing to unpack .../11-autoconf_2.71-3_all.deb ... Unpacking autoconf (2.71-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.21-12_all.deb ... Unpacking autopoint (0.21-12) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../15-libdebhelper-perl_13.11.4_all.deb ... Unpacking libdebhelper-perl (13.11.4) ... Selecting previously unselected package libtool. Preparing to unpack .../16-libtool_2.4.7-5_all.deb ... Unpacking libtool (2.4.7-5) ... 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 libsub-override-perl. Preparing to unpack .../19-libsub-override-perl_0.09-4_all.deb ... Unpacking libsub-override-perl (0.09-4) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../20-libfile-stripnondeterminism-perl_1.13.1-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.13.1-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../21-dh-strip-nondeterminism_1.13.1-1_all.deb ... Unpacking dh-strip-nondeterminism (1.13.1-1) ... Selecting previously unselected package libelf1:amd64. Preparing to unpack .../22-libelf1_0.188-2.1_amd64.deb ... Unpacking libelf1:amd64 (0.188-2.1) ... Selecting previously unselected package dwz. Preparing to unpack .../23-dwz_0.15-1_amd64.deb ... Unpacking dwz (0.15-1) ... Selecting previously unselected package libicu72:amd64. Preparing to unpack .../24-libicu72_72.1-3_amd64.deb ... Unpacking libicu72:amd64 (72.1-3) ... Selecting previously unselected package libxml2:amd64. Preparing to unpack .../25-libxml2_2.9.14+dfsg-1.2_amd64.deb ... Unpacking libxml2:amd64 (2.9.14+dfsg-1.2) ... Selecting previously unselected package gettext. Preparing to unpack .../26-gettext_0.21-12_amd64.deb ... Unpacking gettext (0.21-12) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../27-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 .../28-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../29-debhelper_13.11.4_all.deb ... Unpacking debhelper (13.11.4) ... Setting up libpipeline1:amd64 (1.5.7-1) ... Setting up libicu72:amd64 (72.1-3) ... Setting up bsdextrautils (2.38.1-5+b1) ... Setting up libmagic-mgc (1:5.44-3) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.11.4) ... Setting up libmagic1:amd64 (1:5.44-3) ... Setting up gettext-base (0.21-12) ... Setting up m4 (1.4.19-3) ... Setting up file (1:5.44-3) ... Setting up autotools-dev (20220109.1) ... Setting up autopoint (0.21-12) ... Setting up autoconf (2.71-3) ... Setting up sensible-utils (0.0.17+nmu1) ... Setting up libuchardet0:amd64 (0.0.7-1) ... Setting up libsub-override-perl (0.09-4) ... Setting up libelf1:amd64 (0.188-2.1) ... Setting up libxml2:amd64 (2.9.14+dfsg-1.2) ... 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.13.1-1) ... Setting up gettext (0.21-12) ... Setting up libtool (2.4.7-5) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up dh-autoreconf (20) ... Setting up dh-strip-nondeterminism (1.13.1-1) ... Setting up dwz (0.15-1) ... Setting up groff-base (1.22.4-10) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up man-db (2.11.2-2) ... Not building database; man-db/auto-update is not 'true'. Setting up debhelper (13.11.4) ... Processing triggers for libc-bin (2.36-9) ... Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps I: Building the package I: Running cd /build/libmath-bigint-perl-1.999838/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../libmath-bigint-perl_1.999838-1_source.changes dpkg-buildpackage: info: source package libmath-bigint-perl dpkg-buildpackage: info: source version 1.999838-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Roland Rosenfeld dpkg-source --before-build . dpkg-buildpackage: info: host architecture amd64 debian/rules clean dh clean dh_clean debian/rules binary dh binary dh_update_autotools_config dh_autoreconf dh_auto_configure /usr/bin/perl Makefile.PL INSTALLDIRS=vendor "OPTIMIZE=-g -O2 -ffile-prefix-map=/build/libmath-bigint-perl-1.999838=. -fstack-protector-strong -Wformat -Werror=format-security -Wdate-time -D_FORTIFY_SOURCE=2" "LD=x86_64-linux-gnu-gcc -g -O2 -ffile-prefix-map=/build/libmath-bigint-perl-1.999838=. -fstack-protector-strong -Wformat -Werror=format-security -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 -j16 make[1]: Entering directory '/build/libmath-bigint-perl-1.999838' cp lib/Math/BigFloat.pm blib/lib/Math/BigFloat.pm cp lib/Math/BigInt/Calc.pm blib/lib/Math/BigInt/Calc.pm cp lib/Math/BigInt.pm blib/lib/Math/BigInt.pm cp lib/Math/BigInt/Lib.pm blib/lib/Math/BigInt/Lib.pm Manifying 4 pod documents make[1]: Leaving directory '/build/libmath-bigint-perl-1.999838' dh_auto_test make -j16 test TEST_VERBOSE=1 make[1]: Entering directory '/build/libmath-bigint-perl-1.999838' 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.036000, /usr/bin/perl # # Version Module # ------- ------ # 1.999838 Math::BigInt # 1.999838 Math::BigFloat # 1.999838 Math::BigInt::Lib # 1.999838 Math::BigInt::Calc # t/01load.t .................... 1..2 ok 1 - use Math::BigInt; ok 2 - use Math::BigFloat; ok t/bare_mbf.t .................. 1..3070 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 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->{_a} ok 3015 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 3016 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 3017 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 3018 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 3019 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 3020 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 3021 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} 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; $x->copy()->bfround(-9); ok 3069 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 3070 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok t/bare_mbi.t .................. 1..4278 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 # 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_mif.t .................. 1..713 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok 2 - ${"Math::BigInt::accuracy"} ok 3 - ${"Math::BigInt::precision"} ok 4 - Math::BigInt->accuracy() ok 5 - Math::BigInt->precision() ok 6 - ${"Math::BigInt::div_scale"} ok 7 - ${"Math::BigInt::round_mode"} ok 8 - Math::BigInt->round_mode() ok 9 - ${"Math::BigFloat::accuracy"} ok 10 - ${"Math::BigFloat::precision"} ok 11 - Math::BigFloat->precision() ok 12 - Math::BigFloat->precision() ok 13 - ${"Math::BigFloat::div_scale"} ok 14 - ${"Math::BigFloat::round_mode"} ok 15 - Math::BigFloat->round_mode() ok 16 - Math::BigInt->accuracy() ok 17 - Math::BigInt->precision() ok 18 - Math::BigInt->round_mode() ok 19 - Math::BigInt->div_scale() ok 20 - Math::BigInt->div_scale(20) ok 21 - Math::BigInt->div_scale() ok 22 - Math::BigInt->round_mode("odd") ok 23 - Math::BigInt->round_mode() ok 24 - Math::BigInt->accuracy(2) ok 25 - Math::BigInt->accuracy() ok 26 - Math::BigInt->accuracy(undef) ok 27 - Math::BigInt->precision(2) ok 28 - Math::BigInt->precision(-2) ok 29 - Math::BigInt->precision() ok 30 - Math::BigInt->precision(undef) ok 31 - Math::BigFloat->accuracy() ok 32 - Math::BigFloat->precision() ok 33 - Math::BigFloat->round_mode() ok 34 - Math::BigFloat->div_scale() ok 35 - Math::BigFloat->div_scale(20) ok 36 - Math::BigFloat->div_scale() ok 37 - Math::BigFloat->round_mode("odd") ok 38 - Math::BigFloat->round_mode() ok 39 - Math::BigFloat->accuracy(2) ok 40 - Math::BigFloat->accuracy() ok 41 - Math::BigFloat->accuracy(undef) ok 42 - Math::BigFloat->precision(2) ok 43 - Math::BigFloat->precision(-2) ok 44 - Math::BigFloat->precision() ok 45 - Math::BigFloat->precision(undef) ok 46 - ${"Math::BigFloat::accuracy"} = 5 ok 47 - ${"Math::BigInt::accuracy"} = 5 ok 48 - ${"Math::BigFloat::accuracy"} = 42 ok 49 - ${"Math::BigInt::accuracy"} = 42 ok 50 - ${"Math::BigFloat::accuracy"} = -1 ok 51 - ${"Math::BigInt::accuracy"} = -1 ok 52 - ${"Math::BigFloat::accuracy"} = 0 ok 53 - ${"Math::BigInt::accuracy"} = 0 ok 54 - ${"Math::BigFloat::accuracy"} = undef ok 55 - ${"Math::BigInt::accuracy"} = undef ok 56 - ${"Math::BigFloat::precision"} = 5 ok 57 - ${"Math::BigInt::precision"} = 5 ok 58 - ${"Math::BigFloat::precision"} = 42 ok 59 - ${"Math::BigInt::precision"} = 42 ok 60 - ${"Math::BigFloat::precision"} = -1 ok 61 - ${"Math::BigInt::precision"} = -1 ok 62 - ${"Math::BigFloat::precision"} = 0 ok 63 - ${"Math::BigInt::precision"} = 0 ok 64 - ${"Math::BigFloat::precision"} = undef ok 65 - ${"Math::BigInt::precision"} = undef ok 66 - ${"Math::BigFloat::div_scale"} = 5 ok 67 - ${"Math::BigInt::div_scale"} = 5 ok 68 - ${"Math::BigFloat::div_scale"} = 42 ok 69 - ${"Math::BigInt::div_scale"} = 42 ok 70 - ${"Math::BigFloat::div_scale"} = 1 ok 71 - ${"Math::BigInt::div_scale"} = 1 ok 72 - ${"Math::BigFloat::round_mode"} = "odd" ok 73 - ${"Math::BigInt::round_mode"} = "odd" ok 74 - ${"Math::BigFloat::round_mode"} = "even" ok 75 - ${"Math::BigInt::round_mode"} = "even" ok 76 - ${"Math::BigFloat::round_mode"} = "zero" ok 77 - ${"Math::BigInt::round_mode"} = "zero" ok 78 - ${"Math::BigFloat::round_mode"} = "trunc" ok 79 - ${"Math::BigInt::round_mode"} = "trunc" ok 80 - ${"Math::BigFloat::round_mode"} = "+inf" ok 81 - ${"Math::BigInt::round_mode"} = "+inf" ok 82 - ${"Math::BigFloat::round_mode"} = "-inf" ok 83 - ${"Math::BigInt::round_mode"} = "-inf" ok 84 - ${"Math::BigFloat::round_mode"} ok 85 - ${"Math::BigInt::round_mode"} ok 86 - $x->accuracy() ok 87 - $x->accuracy(5) ok 88 - $x->accuracy(undef) ok 89 - $x->precision() ok 90 - $x->precision(5) ok 91 - $x->precision(undef) ok 92 - ${"Math::BigInt::accuracy"} = 42 ok 93 - ${"Math::BigFloat::accuracy"} = 64 ok 94 - ${"Math::BigInt::accuracy"} = 42 ok 95 - ${"Math::BigFloat::accuracy"} = 64 ok 96 - Math::BigInt->new(123456) = 123500 ok 97 - Math::BigInt->new(123456) = 123000 ok 98 - Math::BigFloat->new("123.456") = 123.5 ok 99 - Math::BigFloat->new("123.456") = 123.5 ok 100 - Math::BigFloat->new("123.456") = 123.456 ok 101 - $x = Math::BigFloat->new("123.456"); $x->accuracy(4) ok 102 - $x = Math::BigFloat->new("123.456"); $x->precision(-2) ok 103 - $x = Math::BigInt->new(123456); $x->accuracy(4) ok 104 - $x = Math::BigInt->new(123456); $x->precision(2) ok 105 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5) ok 106 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(4) ok 107 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(5, 2) ok 108 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, -2) ok 109 - $x = Math::BigFloat->new("123.456"); $x->copy()->round(undef, 2) ok 110 - $x = Math::BigInt->new("123"); $x->round(5, 2) ok 111 - $x = Math::BigFloat->new("123.45000"); $x->copy()->round(undef, -1, "odd") ok 112 - $x = Math::BigFloat->new("123.4567"); $y = $x->copy()->bround() ok 113 - $y = $x->copy()->round(5); $y->accuracy() ok 114 - $y = $x->copy()->round(5); $y->precision() ok 115 - $y = $x->copy()->round(undef, 2); $y->precision() ok 116 - $y = $x->copy()->round(undef, 2); $y->accuracy() ok 117 - $x = $mbf->new("123.4567") ok 118 - $x->accuracy(4) ok 119 - $x->precision(-2) ok 120 - $x->accuracy() ok 121 - $x = $mbf->new("123.4567") ok 122 - $x->precision(-2) ok 123 - $x->accuracy(4) ok 124 - $x->precision() ok 125 - $z = $x->copy(); $z->accuracy() ok 126 - $z = $x->copy(); $z->precision() ok 127 - $x->copy()->bdiv(3, 4) ok 128 - $x->copy()->bdiv(3, 8) ok 129 - $x->copy()->bdiv(3, 16) ok 130 - $x->copy()->bdiv(3, 32) ok 131 - $x = Math::BigInt->bzero(); $x->accuracy(5); $x->{_a} ok 132 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{_p} ok 133 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{_a} ok 134 - $x = Math::BigInt->new(0); $x->precision(5); $x->{_p} ok 135 - $x = Math::BigInt->bzero(); $x->round(5); $x->{_a} ok 136 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{_p} ok 137 - $x = Math::BigInt->new(0); $x->round(5); $x->{_a} ok 138 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{_p} ok 139 - $x = Math::BigInt->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 140 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{_a} ok 141 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{_p} ok 142 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{_a} ok 143 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{_p} ok 144 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{_a} ok 145 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{_p} ok 146 - $x = Math::BigFloat->new(0); $x->round(5); $x->{_a} ok 147 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{_p} ok 148 - $x = Math::BigFloat->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 149 - Math::BigInt->new(123)->badd(123) ok 150 - Math::BigInt->badd(123, 321) ok 151 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 152 - Math::BigInt->new(123)->bsub(122) ok 153 - Math::BigInt->bsub(321, 123) ok 154 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 155 - Math::BigInt->new(123)->bmul(123) ok 156 - Math::BigInt->bmul(123, 123) ok 157 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 158 - Math::BigInt->new(15131)->bmod(123) ok 159 - Math::BigInt->bmod(15131, 123) ok 160 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 161 - Math::BigInt->new(2)->bpow(16) ok 162 - Math::BigInt->bpow(2, 16) ok 163 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 164 - Math::BigInt->new(2**15)->brsft(1) ok 165 - Math::BigInt->brsft(2**15, 1) ok 166 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 167 - Math::BigInt->new(2**13)->blsft(1) ok 168 - Math::BigInt->blsft(2**13, 1) ok 169 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 170 - Math::BigFloat->new(123)->badd(123) ok 171 - Math::BigFloat->badd(123, 321) ok 172 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 173 - Math::BigFloat->new(123)->bsub(122) ok 174 - Math::BigFloat->bsub(321, 123) ok 175 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 176 - Math::BigFloat->new(123)->bmul(123) ok 177 - Math::BigFloat->bmul(123, 123) ok 178 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 179 - Math::BigFloat->new(15131)->bmod(123) ok 180 - Math::BigFloat->bmod(15131, 123) ok 181 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 182 - Math::BigFloat->new(2)->bpow(16) ok 183 - Math::BigFloat->bpow(2, 16) ok 184 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 185 - Math::BigFloat->new(2**15)->brsft(1) ok 186 - Math::BigFloat->brsft(2**15, 1) ok 187 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 188 - Math::BigFloat->new(2**13)->blsft(1) ok 189 - Math::BigFloat->blsft(2**13, 1) ok 190 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 191 - $z = $x + $y ok 192 - $z = $y - $x ok 193 - $z = $y * $x ok 194 - $z = $x ** 2 ok 195 - $z = $x * $x ok 196 - $z = $z / 2 ok 197 - $z++ ok 198 - $z = $x + $y ok 199 - $z = $y - $x ok 200 - $z = $y * $x ok 201 - $z = $x ** 2 ok 202 - $z++ ok 203 - $z = $z / 2 ok 204 - $x->bnot() ok 205 - $x->babs() ok 206 - $x->bneg() ok 207 - $x ok 208 - $x->bdiv($y) ok 209 - $x->{_a} ok 210 - $x->bdiv($y) ok 211 - $x->{_a} ok 212 - $x->bdiv($y) ok 213 - $x->{_a} ok 214 - $x->bdiv($y) ok 215 - $x->{_a} ok 216 - $x->copy()->bsqrt(...) ok 217 - $x->copy->bsqrt(...) ok 218 - $x->{_a} ok 219 - $z = $x->bsqrt(); $z ok 220 - $z = $x->bsqrt(); $x ok 221 - $x->copy()->bpow(...) ok 222 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 223 - $x->copy()->bpow('2', 0) ok 224 - $mbi->new(12)->bfac() ok 225 - $mbi->new(12)->bfac(2) ok 226 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 229 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 230 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 231 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 232 - $x->accuracy() ok 233 - $x = 360 ok 234 - $x = 400 ok 235 - $z = $x + $y; ok 236 - $z is a "Math::BigFloat" object ok 237 - $z = $x / $y; ok 238 - $z is a "Math::BigFloat" object ok 239 - $z = $u * $y; ok 240 - $z is a "Math::BigFloat" object ok 241 - $z = 31000 ok 242 - $z = 30900 ok 243 - $z = 30863 ok 244 - $z = 30863 ok 245 - $z = 30860 ok 246 - $z = 30900 ok 247 - $z = 30862.5 ok 248 - $z = "" ok 249 - "$z = $y >= 3.17" gives warning as expected ok 250 - $z = "" ok 251 - "$z = $y >= 3.17" gives warning as expected ok 252 - $x->bdiv(3) ok 253 - $x->{_a} ok 254 - $x->bdiv($y) ok 255 - $x->{_a} ok 256 - $x->bdiv(3) ok 257 - $x->bdiv(3, undef, -2) ok 258 - $x->bdiv(3, undef, -8) = "3.33333333" ok 259 - $x->bdiv($y) = '3.333' ok 260 - $x->{_a} = 4 ok 261 - $y->{_a} = 4 ok 262 - $x->{_p} = undef ok 263 - $y->{_p} = undef ok 264 - $x->bdiv($y) = '3.33' ok 265 - $x->{_p} = -2 ok 266 - $y->{_p} = -2 ok 267 - $x->{_a} = undef ok 268 - $y->{_a} = undef ok 269 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 270 - $x = "1.000" ok 271 - $x->{_a} = 4 ok 272 - $x = "1.000" ok 273 - $x = "1230" ok 274 - $x->{_a} = 3 ok 275 - $x = "1230" # bround(n) should set _a ok 276 - $x = "1200" ok 277 - $x->{_a} = 2 # bround(-n) should set _a ok 278 - $x = "12300" ok 279 - $x->{_a} = 4 # bround(-n) should set _a ok 280 - $x = "12000" ok 281 - $x->{_a} = 3 # bround(-n) should set _a ok 282 - $x = "10000" ok 283 - $x->{_a} = 2 # bround(-n) should set _a ok 284 - $x = "0" ok 285 - $x->{_a} = 1 # bround(-n) should be no-op if n too big ok 286 - $x = "0" ok 287 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 288 - $x = "100000" ok 289 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 290 - $x = "100000" ok 291 - $x->{_a} = 0 # bround(n) should set _a ok 292 - $x = "12345" ok 293 - $x->{_a} = 5 # bround(n) should set _a 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->{_a} = 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->{_p} = -2 ok 307 - $x->bround(2) = "12000" ok 308 - $x->{_a} = 2 ok 309 - $x->bround(2) = "1.2" ok 310 - $x->{_a} = 2 # mantissa/exponent format and A/P ok 311 - $x = "12350" ok 312 - $x->{_a} = 4 ok 313 - $x->{_p} = undef # check for no A/P in case of fallback result ok 314 - $x->{_a} = undef ok 315 - $x->{_p} = undef # result & remainder ok 316 - $x->{_a} = undef ok 317 - $x->{_p} = undef ok 318 - $y->{_a} = undef ok 319 - $y->{_p} = undef ok 320 - $x+$y = 24000 ok 321 - $x-$y = 42000 ok 322 - $x+$y = "2.46" ok 323 - scalar(@params) = 1 ok 324 - scalar(@params) = 4 ok 325 - $params[0] = $x ok 326 - $params[1] = 1 ok 327 - $params[2] = undef ok 328 - $params[3] = "odd" ok 329 - scalar(@params) = 4 ok 330 - $params[0] = $x ok 331 - $params[1] = undef ok 332 - $params[2] = 2 ok 333 - $params[3] = "odd" ok 334 - round mode "foo" gives a warning as expected ok 335 - scalar(@params) = 4 ok 336 - $params[0] = $x ok 337 - $params[1] = undef ok 338 - $params[2] = 2 ok 339 - $params[3] = "+inf" ok 340 - scalar(@params) = 1 ok 341 - $params[0] = $x ok 342 - scalar(@params) = 1 ok 343 - $params[0] = $x ok 344 - $x->is_nan() = 1 ok 345 - scalar(@params) = 1 ok 346 - $params[0] = $x ok 347 - $x->is_nan() = 1 ok 348 - $x = Math::BigInt->new(2)->bzero(); $x->{_a} ok 349 - $x = Math::BigInt->new(2)->bzero(); $x->{_p} ok 350 - $x = Math::BigInt->new(2)->bone(); $x->{_a} ok 351 - $x = Math::BigInt->new(2)->bone(); $x->{_p} ok 352 - $x = Math::BigInt->new(2)->binf(); $x->{_a} ok 353 - $x = Math::BigInt->new(2)->binf(); $x->{_p} ok 354 - $x = Math::BigInt->new(2)->bnan(); $x->{_a} ok 355 - $x = Math::BigInt->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 356 - $x = Math::BigInt->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 357 - $x = Math::BigInt->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 358 - $x = Math::BigInt->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 359 - $x = Math::BigInt->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 360 - $x = Math::BigInt->new(2, 1); $x->{_a} ok 361 - $x = Math::BigInt->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 362 - $x = Math::BigInt->new(2, undef, 1); $x->{_a} ok 363 - $x = Math::BigInt->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 364 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{_a} ok 365 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 366 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{_a} ok 367 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 368 - $x = Math::BigInt->new(2, 1)->bone(); $x->{_a} ok 369 - $x = Math::BigInt->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 370 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{_a} ok 371 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 372 - $x = Math::BigInt->new(2); $x->{_a} ok 373 - $x = Math::BigInt->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 374 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{_a} ok 375 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 376 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{_a} ok 377 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 378 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{_a} ok 379 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 380 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{_a} ok 381 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 382 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{_a} ok 383 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{_p} ok 384 - $x = Math::BigFloat->new(2)->bzero(); $x->{_a} ok 385 - $x = Math::BigFloat->new(2)->bzero(); $x->{_p} ok 386 - $x = Math::BigFloat->new(2)->bone(); $x->{_a} ok 387 - $x = Math::BigFloat->new(2)->bone(); $x->{_p} ok 388 - $x = Math::BigFloat->new(2)->binf(); $x->{_a} ok 389 - $x = Math::BigFloat->new(2)->binf(); $x->{_p} ok 390 - $x = Math::BigFloat->new(2)->bnan(); $x->{_a} ok 391 - $x = Math::BigFloat->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 392 - $x = Math::BigFloat->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 393 - $x = Math::BigFloat->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 394 - $x = Math::BigFloat->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 395 - $x = Math::BigFloat->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 396 - $x = Math::BigFloat->new(2, 1); $x->{_a} ok 397 - $x = Math::BigFloat->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 398 - $x = Math::BigFloat->new(2, undef, 1); $x->{_a} ok 399 - $x = Math::BigFloat->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 400 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{_a} ok 401 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 402 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{_a} ok 403 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 404 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{_a} ok 405 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 406 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{_a} ok 407 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 408 - $x = Math::BigFloat->new(2); $x->{_a} ok 409 - $x = Math::BigFloat->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 410 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{_a} ok 411 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 412 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{_a} ok 413 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 414 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{_a} ok 415 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 416 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{_a} ok 417 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 418 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{_a} ok 419 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{_p} # 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->{_a} == 3 ok 481 - $x->{_p} 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->{_p} == -3 ok 485 - $x->{_a} 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->{_a} == 3 ok 489 - $x->{_p} 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->{_p} == -3 ok 493 - $x->{_a} 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->{_a} == 3 ok 499 - $x->{_p} 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->{_p} == -3 ok 503 - $x->{_a} 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->{_a} == 3 ok 507 - $x->{_p} 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->{_p} == -3 ok 511 - $x->{_a} 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->{_a} == 3 ok 515 - $x->{_p} 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->{_p} == -3 ok 519 - $x->{_a} 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->{_a} == 3 ok 523 - $x->{_p} 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->{_p} == -3 ok 527 - $x->{_a} 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->{_a} == 3 ok 531 - $x->{_p} 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->{_p} == -3 ok 535 - $x->{_a} 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->{_a} == 3 ok 539 - $x->{_p} 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->{_p} == -3 ok 543 - $x->{_a} 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->{_a} == 4 ok 549 - $x->{_p} 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->{_a} == 4 ok 553 - $x->{_p} 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->{_p} == -4 ok 557 - $x->{_a} 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->{_p} == -4 ok 561 - $x->{_a} 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->{_a} == 4 ok 565 - $x->{_p} 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->{_a} == 4 ok 569 - $x->{_p} 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->{_p} == -4 ok 573 - $x->{_a} 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->{_p} == -4 ok 577 - $x->{_a} 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->{_a} == 1 ok 583 - $x->{_p} 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->{_a} == 1 ok 587 - $x->{_p} 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->{_p} == -1 ok 591 - $x->{_a} 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->{_p} == -1 ok 595 - $x->{_a} 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->{_a} == 2 ok 601 - $x->{_p} 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->{_a} == 2 ok 605 - $x->{_p} 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->{_p} == 1 ok 609 - $x->{_a} 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->{_p} == 1 ok 613 - $x->{_a} 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->{_a} == 1 ok 619 - $x->{_p} 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->{_a} == 1 ok 623 - $x->{_p} 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->{_p} == 3 ok 627 - $x->{_a} 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->{_p} == 3 ok 631 - $x->{_a} 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->{_a} == 2 ok 637 - $x->{_p} 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->{_a} == 2 ok 641 - $x->{_p} 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->{_p} == 1 ok 645 - $x->{_a} 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->{_p} == 1 ok 649 - $x->{_a} 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->{_a} == 2 ok 653 - $x->{_p} 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->{_a} == 2 ok 657 - $x->{_p} 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->{_p} == 2 ok 661 - $x->{_a} 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->{_p} == 2 ok 665 - $x->{_a} 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->{_a} == 1 ok 671 - $x->{_p} 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->{_a} == 1 ok 675 - $x->{_p} 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->{_p} == 3 ok 679 - $x->{_a} 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->{_p} == 3 ok 683 - $x->{_a} 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->{_a} == 2 ok 689 - $x->{_p} 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->{_a} == 2 ok 693 - $x->{_p} 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->{_p} == 1 ok 697 - $x->{_a} 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->{_p} == 1 ok 701 - $x->{_a} 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->{_a} == 2 ok 709 - $x->{_p} 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->{_a} == 2 ok 713 - $x->{_p} is undef 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->{_a} ok 3034 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 3035 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 3036 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 3037 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 3038 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 3039 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 3040 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} 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; $x->copy()->bfround(-9); ok 3088 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 3089 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x 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(0x5620c67d2db8)) ok 14 - Math::BigInt::Scalar->_is_one(SCALAR(0x5620c67d2db8)) 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(0x5620c682b188), SCALAR(0x5620c682ad50))) ok 44 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_xor(SCALAR(0x5620c682b3c8), SCALAR(0x5620c682b098))) ok 45 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_and(SCALAR(0x5620c682b188), SCALAR(0x5620c682ad50))) ok 46 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x5620c682b3c8), SCALAR(0x5620c682b098))) ok 47 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x5620c682b188), SCALAR(0x5620c682ad50))) ok 48 - Math::BigInt::Scalar->_str(Math::BigInt::Scalar->_pow(SCALAR(0x5620c682b3c8), SCALAR(0x5620c682b098))) 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/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/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..72 ok 1 - Math::BigInt->can('config') ok 2 - Math::BigInt->config("class") ok 3 - Math::BigInt->config("lib") ok 4 - Math::BigInt->config("lib_version") ok 5 - Math::BigInt->config("upgrade") ok 6 - Math::BigInt->config("div_scale") ok 7 - Math::BigInt->config("precision") ok 8 - Math::BigInt->config("accuracy") ok 9 - Math::BigInt->config("round_mode") ok 10 - Math::BigInt->config("trap_nan") ok 11 - Math::BigInt->config("trap_inf") ok 12 - ref() of output from $mbi->config() ok 13 - Math::BigInt->config()->{class} ok 14 - Math::BigInt->config()->{lib} ok 15 - Math::BigInt->config()->{lib_version} ok 16 - Math::BigInt->config()->{upgrade} ok 17 - Math::BigInt->config()->{div_scale} ok 18 - Math::BigInt->config()->{precision} ok 19 - Math::BigInt->config()->{accuracy} ok 20 - Math::BigInt->config()->{round_mode} ok 21 - Math::BigInt->config()->{trap_nan} ok 22 - Math::BigInt->config()->{trap_inf} ok 23 - can set "trap_nan" via hash ref ok 24 - Math::BigFloat->can('config') ok 25 - Math::BigFloat->config("class") ok 26 - Math::BigFloat->config("lib") ok 27 - Math::BigFloat->config("lib_version") ok 28 - Math::BigFloat->config("upgrade") ok 29 - Math::BigFloat->config("div_scale") ok 30 - Math::BigFloat->config("precision") ok 31 - Math::BigFloat->config("accuracy") ok 32 - Math::BigFloat->config("round_mode") ok 33 - Math::BigFloat->config("trap_nan") ok 34 - Math::BigFloat->config("trap_inf") ok 35 - ref() of output from $mbf->config() ok 36 - Math::BigFloat->config()->{class} ok 37 - Math::BigFloat->config()->{lib} ok 38 - Math::BigFloat->config()->{lib_version} ok 39 - Math::BigFloat->config()->{upgrade} ok 40 - Math::BigFloat->config()->{div_scale} ok 41 - Math::BigFloat->config()->{precision} ok 42 - Math::BigFloat->config()->{accuracy} ok 43 - Math::BigFloat->config()->{round_mode} ok 44 - Math::BigFloat->config()->{trap_nan} ok 45 - Math::BigFloat->config()->{trap_inf} ok 46 - can set "trap_nan" via hash ref ok 47 - accuracy = 2 ok 48 - accuracy ne $cfg->{accuracy} ok 49 - accuracy = 2 ok 50 - trap_nan = 1 ok 51 - trap_nan ne $cfg->{trap_nan} ok 52 - trap_nan = 1 ok 53 - upgrade = Math::BigInt::SomeClass ok 54 - upgrade ne $cfg->{upgrade} ok 55 - upgrade = Math::BigInt::SomeClass ok 56 - trap_inf = 1 ok 57 - trap_inf ne $cfg->{trap_inf} ok 58 - trap_inf = 1 ok 59 - downgrade = Math::BigInt::SomeClass ok 60 - downgrade ne $cfg->{downgrade} ok 61 - downgrade = Math::BigInt::SomeClass ok 62 - div_scale = 100 ok 63 - div_scale ne $cfg->{div_scale} ok 64 - div_scale = 100 ok 65 - precision = 3 ok 66 - precision ne $cfg->{precision} ok 67 - precision = 3 ok 68 - round_mode = zero ok 69 - round_mode ne $cfg->{round_mode} ok 70 - round_mode = zero ok 71 - Passing invalid key to Math::BigInt->config() causes an error. ok 72 - Passing invalid key to Math::BigFloat->config() causes an error. ok t/downgrade.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.t 1..2 ok 1 - bdec(NaN) ok 2 - bdec(NaN) => Math::BigInt ok 47 - Child of t/downgrade.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.t 1..2 ok 1 - bmul(4, 0.5) = 2 ok 2 - bmul(4, 0.5) => Math::BigInt ok 68 - Child of t/downgrade.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/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..11 ok 1 - An object of class 'Math::BigInt::Subclass' isa 'Math::BigInt' ok 2 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 3 - A Math::BigFloat isn't a Math::BigInt ok 4 - ref($x) = "Math::BigInt" ok 5 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 6 - ref($x) = "Math::BigInt" ok 7 - An object of class 'Math::BigInt' isa 'Math::BigInt' ok 8 - ref($x) = "Math::BigFloat" ok 9 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok 10 - ref($x) = "Math::BigFloat" ok 11 - An object of class 'Math::BigFloat' isa 'Math::BigFloat' ok t/mbf_ali.t ................... 1..6 ok 1 - Math::BigFloat -> new(123) -> is_pos() ok 2 - Math::BigFloat -> new(123) -> is_neg() ok 3 - Math::BigFloat -> new(123) -> as_int() ok 4 - ref(Math::BigFloat -> new(123) -> as_int()) ok 5 - Math::BigFloat -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigFloat -> new(123) -> bneg() -> is_neg() ok t/mbi_ali.t ................... 1..6 ok 1 - Math::BigInt -> new(123) -> is_pos() ok 2 - Math::BigInt -> new(123) -> is_neg() ok 3 - Math::BigInt -> new(123) -> as_int() ok 4 - ref(Math::BigInt -> new(123) -> as_int()) ok 5 - Math::BigInt -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt -> new(123) -> bneg() -> is_neg() ok t/mbi_rand.t .................. 1..512 ok 1 - AdivB * B + 2 * AmodB - AmodB == A ok 2 - AdivB * B / B == AdivB ok 3 - AdivB * A + 2 * AmodB - AmodB == B ok 4 - AdivB * A / A == AdivB ok 5 - AdivB * B + 2 * AmodB - AmodB == A ok 6 - AdivB * B / B == AdivB ok 7 - AdivB * A + 2 * AmodB - AmodB == B ok 8 - AdivB * A / A == AdivB ok 9 - AdivB * B + 2 * AmodB - AmodB == A ok 10 - AdivB * B / B == AdivB ok 11 - AdivB * A + 2 * AmodB - AmodB == B ok 12 - AdivB * A / A == AdivB ok 13 - AdivB * B + 2 * AmodB - AmodB == A ok 14 - AdivB * B / B == AdivB ok 15 - AdivB * A + 2 * AmodB - AmodB == B ok 16 - AdivB * A / A == AdivB ok 17 - AdivB * B + 2 * AmodB - AmodB == A ok 18 - AdivB * B / B == AdivB ok 19 - AdivB * A + 2 * AmodB - AmodB == B ok 20 - AdivB * A / A == AdivB ok 21 - AdivB * B + 2 * AmodB - AmodB == A ok 22 - AdivB * B / B == AdivB ok 23 - AdivB * A + 2 * AmodB - AmodB == B ok 24 - AdivB * A / A == AdivB ok 25 - AdivB * B + 2 * AmodB - AmodB == A ok 26 - AdivB * B / B == AdivB ok 27 - AdivB * A + 2 * AmodB - AmodB == B ok 28 - AdivB * A / A == AdivB ok 29 - AdivB * B + 2 * AmodB - AmodB == A ok 30 - AdivB * B / B == AdivB ok 31 - AdivB * A + 2 * AmodB - AmodB == B ok 32 - AdivB * A / A == AdivB ok 33 - AdivB * B + 2 * AmodB - AmodB == A ok 34 - AdivB * B / B == AdivB ok 35 - AdivB * A + 2 * AmodB - AmodB == B ok 36 - AdivB * A / A == AdivB ok 37 - AdivB * B + 2 * AmodB - AmodB == A ok 38 - AdivB * B / B == AdivB ok 39 - AdivB * A + 2 * AmodB - AmodB == B ok 40 - AdivB * A / A == AdivB ok 41 - AdivB * B + 2 * AmodB - AmodB == A ok 42 - AdivB * B / B == AdivB ok 43 - AdivB * A + 2 * AmodB - AmodB == B ok 44 - AdivB * A / A == AdivB ok 45 - AdivB * B + 2 * AmodB - AmodB == A ok 46 - AdivB * B / B == AdivB ok 47 - AdivB * A + 2 * AmodB - AmodB == B ok 48 - AdivB * A / A == AdivB ok 49 - AdivB * B + 2 * AmodB - AmodB == A ok 50 - AdivB * B / B == AdivB ok 51 - AdivB * A + 2 * AmodB - AmodB == B ok 52 - AdivB * A / A == AdivB ok 53 - AdivB * B + 2 * AmodB - AmodB == A ok 54 - AdivB * B / B == AdivB ok 55 - AdivB * A + 2 * AmodB - AmodB == B ok 56 - AdivB * A / A == AdivB ok 57 - AdivB * B + 2 * AmodB - AmodB == A ok 58 - AdivB * B / B == AdivB ok 59 - AdivB * A + 2 * AmodB - AmodB == B ok 60 - AdivB * A / A == AdivB ok 61 - AdivB * B + 2 * AmodB - AmodB == A ok 62 - AdivB * B / B == AdivB ok 63 - AdivB * A + 2 * AmodB - AmodB == B ok 64 - AdivB * A / A == AdivB ok 65 - AdivB * B + 2 * AmodB - AmodB == A ok 66 - AdivB * B / B == AdivB ok 67 - AdivB * A + 2 * AmodB - AmodB == B ok 68 - AdivB * A / A == AdivB ok 69 - AdivB * B + 2 * AmodB - AmodB == A ok 70 - AdivB * B / B == AdivB ok 71 - AdivB * A + 2 * AmodB - AmodB == B ok 72 - AdivB * A / A == AdivB ok 73 - AdivB * B + 2 * AmodB - AmodB == A ok 74 - AdivB * B / B == AdivB ok 75 - AdivB * A + 2 * AmodB - AmodB == B ok 76 - AdivB * A / A == AdivB ok 77 - AdivB * B + 2 * AmodB - AmodB == A ok 78 - AdivB * B / B == AdivB ok 79 - AdivB * A + 2 * AmodB - AmodB == B ok 80 - AdivB * A / A == AdivB ok 81 - AdivB * B + 2 * AmodB - AmodB == A ok 82 - AdivB * B / B == AdivB ok 83 - AdivB * A + 2 * AmodB - AmodB == B ok 84 - AdivB * A / A == AdivB ok 85 - AdivB * B + 2 * AmodB - AmodB == A ok 86 - AdivB * B / B == AdivB ok 87 - AdivB * A + 2 * AmodB - AmodB == B ok 88 - AdivB * A / A == AdivB ok 89 - AdivB * B + 2 * AmodB - AmodB == A ok 90 - AdivB * B / B == AdivB ok 91 - AdivB * A + 2 * AmodB - AmodB == B ok 92 - AdivB * A / A == AdivB ok 93 - AdivB * B + 2 * AmodB - AmodB == A ok 94 - AdivB * B / B == AdivB ok 95 - AdivB * A + 2 * AmodB - AmodB == B ok 96 - AdivB * A / A == AdivB ok 97 - AdivB * B + 2 * AmodB - AmodB == A ok 98 - AdivB * B / B == AdivB ok 99 - AdivB * A + 2 * AmodB - AmodB == B ok 100 - AdivB * A / A == AdivB ok 101 - AdivB * B + 2 * AmodB - AmodB == A ok 102 - AdivB * B / B == AdivB ok 103 - AdivB * A + 2 * AmodB - AmodB == B ok 104 - AdivB * A / A == AdivB ok 105 - AdivB * B + 2 * AmodB - AmodB == A ok 106 - AdivB * B / B == AdivB ok 107 - AdivB * A + 2 * AmodB - AmodB == B ok 108 - AdivB * A / A == AdivB ok 109 - AdivB * B + 2 * AmodB - AmodB == A ok 110 - AdivB * B / B == AdivB ok 111 - AdivB * A + 2 * AmodB - AmodB == B ok 112 - AdivB * A / A == AdivB ok 113 - AdivB * B + 2 * AmodB - AmodB == A ok 114 - AdivB * B / B == AdivB ok 115 - AdivB * A + 2 * AmodB - AmodB == B ok 116 - AdivB * A / A == AdivB ok 117 - AdivB * B + 2 * AmodB - AmodB == A ok 118 - AdivB * B / B == AdivB ok 119 - AdivB * A + 2 * AmodB - AmodB == B ok 120 - AdivB * A / A == AdivB ok 121 - AdivB * B + 2 * AmodB - AmodB == A ok 122 - AdivB * B / B == AdivB ok 123 - AdivB * A + 2 * AmodB - AmodB == B ok 124 - AdivB * A / A == AdivB ok 125 - AdivB * B + 2 * AmodB - AmodB == A ok 126 - AdivB * B / B == AdivB ok 127 - AdivB * A + 2 * AmodB - AmodB == B ok 128 - AdivB * A / A == AdivB ok 129 - AdivB * B + 2 * AmodB - AmodB == A ok 130 - AdivB * B / B == AdivB ok 131 - AdivB * A + 2 * AmodB - AmodB == B ok 132 - AdivB * A / A == AdivB ok 133 - AdivB * B + 2 * AmodB - AmodB == A ok 134 - AdivB * B / B == AdivB ok 135 - AdivB * A + 2 * AmodB - AmodB == B ok 136 - AdivB * A / A == AdivB ok 137 - AdivB * B + 2 * AmodB - AmodB == A ok 138 - AdivB * B / B == AdivB ok 139 - AdivB * A + 2 * AmodB - AmodB == B ok 140 - AdivB * A / A == AdivB ok 141 - AdivB * B + 2 * AmodB - AmodB == A ok 142 - AdivB * B / B == AdivB ok 143 - AdivB * A + 2 * AmodB - AmodB == B ok 144 - AdivB * A / A == AdivB ok 145 - AdivB * B + 2 * AmodB - AmodB == A ok 146 - AdivB * B / B == AdivB ok 147 - AdivB * A + 2 * AmodB - AmodB == B ok 148 - AdivB * A / A == AdivB ok 149 - AdivB * B + 2 * AmodB - AmodB == A ok 150 - AdivB * B / B == AdivB ok 151 - AdivB * A + 2 * AmodB - AmodB == B ok 152 - AdivB * A / A == AdivB ok 153 - AdivB * B + 2 * AmodB - AmodB == A ok 154 - AdivB * B / B == AdivB ok 155 - AdivB * A + 2 * AmodB - AmodB == B ok 156 - AdivB * A / A == AdivB ok 157 - AdivB * B + 2 * AmodB - AmodB == A ok 158 - AdivB * B / B == AdivB ok 159 - AdivB * A + 2 * AmodB - AmodB == B ok 160 - AdivB * A / A == AdivB ok 161 - AdivB * B + 2 * AmodB - AmodB == A ok 162 - AdivB * B / B == AdivB ok 163 - AdivB * A + 2 * AmodB - AmodB == B ok 164 - AdivB * A / A == AdivB ok 165 - AdivB * B + 2 * AmodB - AmodB == A ok 166 - AdivB * B / B == AdivB ok 167 - AdivB * A + 2 * AmodB - AmodB == B ok 168 - AdivB * A / A == AdivB ok 169 - AdivB * B + 2 * AmodB - AmodB == A ok 170 - AdivB * B / B == AdivB ok 171 - AdivB * A + 2 * AmodB - AmodB == B ok 172 - AdivB * A / A == AdivB ok 173 - AdivB * B + 2 * AmodB - AmodB == A ok 174 - AdivB * B / B == AdivB ok 175 - AdivB * A + 2 * AmodB - AmodB == B ok 176 - AdivB * A / A == AdivB ok 177 - AdivB * B + 2 * AmodB - AmodB == A ok 178 - AdivB * B / B == AdivB ok 179 - AdivB * A + 2 * AmodB - AmodB == B ok 180 - AdivB * A / A == AdivB ok 181 - AdivB * B + 2 * AmodB - AmodB == A ok 182 - AdivB * B / B == AdivB ok 183 - AdivB * A + 2 * AmodB - AmodB == B ok 184 - AdivB * A / A == AdivB ok 185 - AdivB * B + 2 * AmodB - AmodB == A ok 186 - AdivB * B / B == AdivB ok 187 - AdivB * A + 2 * AmodB - AmodB == B ok 188 - AdivB * A / A == AdivB ok 189 - AdivB * B + 2 * AmodB - AmodB == A ok 190 - AdivB * B / B == AdivB ok 191 - AdivB * A + 2 * AmodB - AmodB == B ok 192 - AdivB * A / A == AdivB ok 193 - AdivB * B + 2 * AmodB - AmodB == A ok 194 - AdivB * B / B == AdivB ok 195 - AdivB * A + 2 * AmodB - AmodB == B ok 196 - AdivB * A / A == AdivB ok 197 - AdivB * B + 2 * AmodB - AmodB == A ok 198 - AdivB * B / B == AdivB ok 199 - AdivB * A + 2 * AmodB - AmodB == B ok 200 - AdivB * A / A == AdivB ok 201 - AdivB * B + 2 * AmodB - AmodB == A ok 202 - AdivB * B / B == AdivB ok 203 - AdivB * A + 2 * AmodB - AmodB == B ok 204 - AdivB * A / A == AdivB ok 205 - AdivB * B + 2 * AmodB - AmodB == A ok 206 - AdivB * B / B == AdivB ok 207 - AdivB * A + 2 * AmodB - AmodB == B ok 208 - AdivB * A / A == AdivB ok 209 - AdivB * B + 2 * AmodB - AmodB == A ok 210 - AdivB * B / B == AdivB ok 211 - AdivB * A + 2 * AmodB - AmodB == B ok 212 - AdivB * A / A == AdivB ok 213 - AdivB * B + 2 * AmodB - AmodB == A ok 214 - AdivB * B / B == AdivB ok 215 - AdivB * A + 2 * AmodB - AmodB == B ok 216 - AdivB * A / A == AdivB ok 217 - AdivB * B + 2 * AmodB - AmodB == A ok 218 - AdivB * B / B == AdivB ok 219 - AdivB * A + 2 * AmodB - AmodB == B ok 220 - AdivB * A / A == AdivB ok 221 - AdivB * B + 2 * AmodB - AmodB == A ok 222 - AdivB * B / B == AdivB ok 223 - AdivB * A + 2 * AmodB - AmodB == B ok 224 - AdivB * A / A == AdivB ok 225 - AdivB * B + 2 * AmodB - AmodB == A ok 226 - AdivB * B / B == AdivB ok 227 - AdivB * A + 2 * AmodB - AmodB == B ok 228 - AdivB * A / A == AdivB ok 229 - AdivB * B + 2 * AmodB - AmodB == A ok 230 - AdivB * B / B == AdivB ok 231 - AdivB * A + 2 * AmodB - AmodB == B ok 232 - AdivB * A / A == AdivB ok 233 - AdivB * B + 2 * AmodB - AmodB == A ok 234 - AdivB * B / B == AdivB ok 235 - AdivB * A + 2 * AmodB - AmodB == B ok 236 - AdivB * A / A == AdivB ok 237 - AdivB * B + 2 * AmodB - AmodB == A ok 238 - AdivB * B / B == AdivB ok 239 - AdivB * A + 2 * AmodB - AmodB == B ok 240 - AdivB * A / A == AdivB ok 241 - AdivB * B + 2 * AmodB - AmodB == A ok 242 - AdivB * B / B == AdivB ok 243 - AdivB * A + 2 * AmodB - AmodB == B ok 244 - AdivB * A / A == AdivB ok 245 - AdivB * B + 2 * AmodB - AmodB == A ok 246 - AdivB * B / B == AdivB ok 247 - AdivB * A + 2 * AmodB - AmodB == B ok 248 - AdivB * A / A == AdivB ok 249 - AdivB * B + 2 * AmodB - AmodB == A ok 250 - AdivB * B / B == AdivB ok 251 - AdivB * A + 2 * AmodB - AmodB == B ok 252 - AdivB * A / A == AdivB ok 253 - AdivB * B + 2 * AmodB - AmodB == A ok 254 - AdivB * B / B == AdivB ok 255 - AdivB * A + 2 * AmodB - AmodB == B ok 256 - AdivB * A / A == AdivB ok 257 - AdivB * B + 2 * AmodB - AmodB == A ok 258 - AdivB * B / B == AdivB ok 259 - AdivB * A + 2 * AmodB - AmodB == B ok 260 - AdivB * A / A == AdivB ok 261 - AdivB * B + 2 * AmodB - AmodB == A ok 262 - AdivB * B / B == AdivB ok 263 - AdivB * A + 2 * AmodB - AmodB == B ok 264 - AdivB * A / A == AdivB ok 265 - AdivB * B + 2 * AmodB - AmodB == A ok 266 - AdivB * B / B == AdivB ok 267 - AdivB * A + 2 * AmodB - AmodB == B ok 268 - AdivB * A / A == AdivB ok 269 - AdivB * B + 2 * AmodB - AmodB == A ok 270 - AdivB * B / B == AdivB ok 271 - AdivB * A + 2 * AmodB - AmodB == B ok 272 - AdivB * A / A == AdivB ok 273 - AdivB * B + 2 * AmodB - AmodB == A ok 274 - AdivB * B / B == AdivB ok 275 - AdivB * A + 2 * AmodB - AmodB == B ok 276 - AdivB * A / A == AdivB ok 277 - AdivB * B + 2 * AmodB - AmodB == A ok 278 - AdivB * B / B == AdivB ok 279 - AdivB * A + 2 * AmodB - AmodB == B ok 280 - AdivB * A / A == AdivB ok 281 - AdivB * B + 2 * AmodB - AmodB == A ok 282 - AdivB * B / B == AdivB ok 283 - AdivB * A + 2 * AmodB - AmodB == B ok 284 - AdivB * A / A == AdivB ok 285 - AdivB * B + 2 * AmodB - AmodB == A ok 286 - AdivB * B / B == AdivB ok 287 - AdivB * A + 2 * AmodB - AmodB == B ok 288 - AdivB * A / A == AdivB ok 289 - AdivB * B + 2 * AmodB - AmodB == A ok 290 - AdivB * B / B == AdivB ok 291 - AdivB * A + 2 * AmodB - AmodB == B ok 292 - AdivB * A / A == AdivB ok 293 - AdivB * B + 2 * AmodB - AmodB == A ok 294 - AdivB * B / B == AdivB ok 295 - AdivB * A + 2 * AmodB - AmodB == B ok 296 - AdivB * A / A == AdivB ok 297 - AdivB * B + 2 * AmodB - AmodB == A ok 298 - AdivB * B / B == AdivB ok 299 - AdivB * A + 2 * AmodB - AmodB == B ok 300 - AdivB * A / A == AdivB ok 301 - AdivB * B + 2 * AmodB - AmodB == A ok 302 - AdivB * B / B == AdivB ok 303 - AdivB * A + 2 * AmodB - AmodB == B ok 304 - AdivB * A / A == AdivB ok 305 - AdivB * B + 2 * AmodB - AmodB == A ok 306 - AdivB * B / B == AdivB ok 307 - AdivB * A + 2 * AmodB - AmodB == B ok 308 - AdivB * A / A == AdivB ok 309 - AdivB * B + 2 * AmodB - AmodB == A ok 310 - AdivB * B / B == AdivB ok 311 - AdivB * A + 2 * AmodB - AmodB == B ok 312 - AdivB * A / A == AdivB ok 313 - AdivB * B + 2 * AmodB - AmodB == A ok 314 - AdivB * B / B == AdivB ok 315 - AdivB * A + 2 * AmodB - AmodB == B ok 316 - AdivB * A / A == AdivB ok 317 - AdivB * B + 2 * AmodB - AmodB == A ok 318 - AdivB * B / B == AdivB ok 319 - AdivB * A + 2 * AmodB - AmodB == B ok 320 - AdivB * A / A == AdivB ok 321 - AdivB * B + 2 * AmodB - AmodB == A ok 322 - AdivB * B / B == AdivB ok 323 - AdivB * A + 2 * AmodB - AmodB == B ok 324 - AdivB * A / A == AdivB ok 325 - AdivB * B + 2 * AmodB - AmodB == A ok 326 - AdivB * B / B == AdivB ok 327 - AdivB * A + 2 * AmodB - AmodB == B ok 328 - AdivB * A / A == AdivB ok 329 - AdivB * B + 2 * AmodB - AmodB == A ok 330 - AdivB * B / B == AdivB ok 331 - AdivB * A + 2 * AmodB - AmodB == B ok 332 - AdivB * A / A == AdivB ok 333 - AdivB * B + 2 * AmodB - AmodB == A ok 334 - AdivB * B / B == AdivB ok 335 - AdivB * A + 2 * AmodB - AmodB == B ok 336 - AdivB * A / A == AdivB ok 337 - AdivB * B + 2 * AmodB - AmodB == A ok 338 - AdivB * B / B == AdivB ok 339 - AdivB * A + 2 * AmodB - AmodB == B ok 340 - AdivB * A / A == AdivB ok 341 - AdivB * B + 2 * AmodB - AmodB == A ok 342 - AdivB * B / B == AdivB ok 343 - AdivB * A + 2 * AmodB - AmodB == B ok 344 - AdivB * A / A == AdivB ok 345 - AdivB * B + 2 * AmodB - AmodB == A ok 346 - AdivB * B / B == AdivB ok 347 - AdivB * A + 2 * AmodB - AmodB == B ok 348 - AdivB * A / A == AdivB ok 349 - AdivB * B + 2 * AmodB - AmodB == A ok 350 - AdivB * B / B == AdivB ok 351 - AdivB * A + 2 * AmodB - AmodB == B ok 352 - AdivB * A / A == AdivB ok 353 - AdivB * B + 2 * AmodB - AmodB == A ok 354 - AdivB * B / B == AdivB ok 355 - AdivB * A + 2 * AmodB - AmodB == B ok 356 - AdivB * A / A == AdivB ok 357 - AdivB * B + 2 * AmodB - AmodB == A ok 358 - AdivB * B / B == AdivB ok 359 - AdivB * A + 2 * AmodB - AmodB == B ok 360 - AdivB * A / A == AdivB ok 361 - AdivB * B + 2 * AmodB - AmodB == A ok 362 - AdivB * B / B == AdivB ok 363 - AdivB * A + 2 * AmodB - AmodB == B ok 364 - AdivB * A / A == AdivB ok 365 - AdivB * B + 2 * AmodB - AmodB == A ok 366 - AdivB * B / B == AdivB ok 367 - AdivB * A + 2 * AmodB - AmodB == B ok 368 - AdivB * A / A == AdivB ok 369 - AdivB * B + 2 * AmodB - AmodB == A ok 370 - AdivB * B / B == AdivB ok 371 - AdivB * A + 2 * AmodB - AmodB == B ok 372 - AdivB * A / A == AdivB ok 373 - AdivB * B + 2 * AmodB - AmodB == A ok 374 - AdivB * B / B == AdivB ok 375 - AdivB * A + 2 * AmodB - AmodB == B ok 376 - AdivB * A / A == AdivB ok 377 - AdivB * B + 2 * AmodB - AmodB == A ok 378 - AdivB * B / B == AdivB ok 379 - AdivB * A + 2 * AmodB - AmodB == B ok 380 - AdivB * A / A == AdivB ok 381 - AdivB * B + 2 * AmodB - AmodB == A ok 382 - AdivB * B / B == AdivB ok 383 - AdivB * A + 2 * AmodB - AmodB == B ok 384 - AdivB * A / A == AdivB ok 385 - AdivB * B + 2 * AmodB - AmodB == A ok 386 - AdivB * B / B == AdivB ok 387 - AdivB * A + 2 * AmodB - AmodB == B ok 388 - AdivB * A / A == AdivB ok 389 - AdivB * B + 2 * AmodB - AmodB == A ok 390 - AdivB * B / B == AdivB ok 391 - AdivB * A + 2 * AmodB - AmodB == B ok 392 - AdivB * A / A == AdivB ok 393 - AdivB * B + 2 * AmodB - AmodB == A ok 394 - AdivB * B / B == AdivB ok 395 - AdivB * A + 2 * AmodB - AmodB == B ok 396 - AdivB * A / A == AdivB ok 397 - AdivB * B + 2 * AmodB - AmodB == A ok 398 - AdivB * B / B == AdivB ok 399 - AdivB * A + 2 * AmodB - AmodB == B ok 400 - AdivB * A / A == AdivB ok 401 - AdivB * B + 2 * AmodB - AmodB == A ok 402 - AdivB * B / B == AdivB ok 403 - AdivB * A + 2 * AmodB - AmodB == B ok 404 - AdivB * A / A == AdivB ok 405 - AdivB * B + 2 * AmodB - AmodB == A ok 406 - AdivB * B / B == AdivB ok 407 - AdivB * A + 2 * AmodB - AmodB == B ok 408 - AdivB * A / A == AdivB ok 409 - AdivB * B + 2 * AmodB - AmodB == A ok 410 - AdivB * B / B == AdivB ok 411 - AdivB * A + 2 * AmodB - AmodB == B ok 412 - AdivB * A / A == AdivB ok 413 - AdivB * B + 2 * AmodB - AmodB == A ok 414 - AdivB * B / B == AdivB ok 415 - AdivB * A + 2 * AmodB - AmodB == B ok 416 - AdivB * A / A == AdivB ok 417 - AdivB * B + 2 * AmodB - AmodB == A ok 418 - AdivB * B / B == AdivB ok 419 - AdivB * A + 2 * AmodB - AmodB == B ok 420 - AdivB * A / A == AdivB ok 421 - AdivB * B + 2 * AmodB - AmodB == A ok 422 - AdivB * B / B == AdivB ok 423 - AdivB * A + 2 * AmodB - AmodB == B ok 424 - AdivB * A / A == AdivB ok 425 - AdivB * B + 2 * AmodB - AmodB == A ok 426 - AdivB * B / B == AdivB ok 427 - AdivB * A + 2 * AmodB - AmodB == B ok 428 - AdivB * A / A == AdivB ok 429 - AdivB * B + 2 * AmodB - AmodB == A ok 430 - AdivB * B / B == AdivB ok 431 - AdivB * A + 2 * AmodB - AmodB == B ok 432 - AdivB * A / A == AdivB ok 433 - AdivB * B + 2 * AmodB - AmodB == A ok 434 - AdivB * B / B == AdivB ok 435 - AdivB * A + 2 * AmodB - AmodB == B ok 436 - AdivB * A / A == AdivB ok 437 - AdivB * B + 2 * AmodB - AmodB == A ok 438 - AdivB * B / B == AdivB ok 439 - AdivB * A + 2 * AmodB - AmodB == B ok 440 - AdivB * A / A == AdivB ok 441 - AdivB * B + 2 * AmodB - AmodB == A ok 442 - AdivB * B / B == AdivB ok 443 - AdivB * A + 2 * AmodB - AmodB == B ok 444 - AdivB * A / A == AdivB ok 445 - AdivB * B + 2 * AmodB - AmodB == A ok 446 - AdivB * B / B == AdivB ok 447 - AdivB * A + 2 * AmodB - AmodB == B ok 448 - AdivB * A / A == AdivB ok 449 - AdivB * B + 2 * AmodB - AmodB == A ok 450 - AdivB * B / B == AdivB ok 451 - AdivB * A + 2 * AmodB - AmodB == B ok 452 - AdivB * A / A == AdivB ok 453 - AdivB * B + 2 * AmodB - AmodB == A ok 454 - AdivB * B / B == AdivB ok 455 - AdivB * A + 2 * AmodB - AmodB == B ok 456 - AdivB * A / A == AdivB ok 457 - AdivB * B + 2 * AmodB - AmodB == A ok 458 - AdivB * B / B == AdivB ok 459 - AdivB * A + 2 * AmodB - AmodB == B ok 460 - AdivB * A / A == AdivB ok 461 - AdivB * B + 2 * AmodB - AmodB == A ok 462 - AdivB * B / B == AdivB ok 463 - AdivB * A + 2 * AmodB - AmodB == B ok 464 - AdivB * A / A == AdivB ok 465 - AdivB * B + 2 * AmodB - AmodB == A ok 466 - AdivB * B / B == AdivB ok 467 - AdivB * A + 2 * AmodB - AmodB == B ok 468 - AdivB * A / A == AdivB ok 469 - AdivB * B + 2 * AmodB - AmodB == A ok 470 - AdivB * B / B == AdivB ok 471 - AdivB * A + 2 * AmodB - AmodB == B ok 472 - AdivB * A / A == AdivB ok 473 - AdivB * B + 2 * AmodB - AmodB == A ok 474 - AdivB * B / B == AdivB ok 475 - AdivB * A + 2 * AmodB - AmodB == B ok 476 - AdivB * A / A == AdivB ok 477 - AdivB * B + 2 * AmodB - AmodB == A ok 478 - AdivB * B / B == AdivB ok 479 - AdivB * A + 2 * AmodB - AmodB == B ok 480 - AdivB * A / A == AdivB ok 481 - AdivB * B + 2 * AmodB - AmodB == A ok 482 - AdivB * B / B == AdivB ok 483 - AdivB * A + 2 * AmodB - AmodB == B ok 484 - AdivB * A / A == AdivB ok 485 - AdivB * B + 2 * AmodB - AmodB == A ok 486 - AdivB * B / B == AdivB ok 487 - AdivB * A + 2 * AmodB - AmodB == B ok 488 - AdivB * A / A == AdivB ok 489 - AdivB * B + 2 * AmodB - AmodB == A ok 490 - AdivB * B / B == AdivB ok 491 - AdivB * A + 2 * AmodB - AmodB == B ok 492 - AdivB * A / A == AdivB ok 493 - AdivB * B + 2 * AmodB - AmodB == A ok 494 - AdivB * B / B == AdivB ok 495 - AdivB * A + 2 * AmodB - AmodB == B ok 496 - AdivB * A / A == AdivB ok 497 - AdivB * B + 2 * AmodB - AmodB == A ok 498 - AdivB * B / B == AdivB ok 499 - AdivB * A + 2 * AmodB - AmodB == B ok 500 - AdivB * A / A == AdivB ok 501 - AdivB * B + 2 * AmodB - AmodB == A ok 502 - AdivB * B / B == AdivB ok 503 - AdivB * A + 2 * AmodB - AmodB == B ok 504 - AdivB * A / A == AdivB ok 505 - AdivB * B + 2 * AmodB - AmodB == A ok 506 - AdivB * B / B == AdivB ok 507 - AdivB * A + 2 * AmodB - AmodB == B ok 508 - AdivB * A / A == AdivB ok 509 - AdivB * B + 2 * AmodB - AmodB == A ok 510 - AdivB * B / B == AdivB ok 511 - AdivB * A + 2 * AmodB - AmodB == B ok 512 - AdivB * A / A == AdivB ok t/mbimbf.t .................... 1..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->{_a} ok 131 - $x = Math::BigInt->bzero(); $x->precision(5); $x->{_p} ok 132 - $x = Math::BigInt->new(0); $x->accuracy(5); $x->{_a} ok 133 - $x = Math::BigInt->new(0); $x->precision(5); $x->{_p} ok 134 - $x = Math::BigInt->bzero(); $x->round(5); $x->{_a} ok 135 - $x = Math::BigInt->bzero(); $x->round(undef, 5); $x->{_p} ok 136 - $x = Math::BigInt->new(0); $x->round(5); $x->{_a} ok 137 - $x = Math::BigInt->new(0); $x->round(undef, 5); $x->{_p} ok 138 - $x = Math::BigInt->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 139 - $x = Math::BigFloat->bzero(); $x->accuracy(5); $x->{_a} ok 140 - $x = Math::BigFloat->bzero(); $x->precision(5); $x->{_p} ok 141 - $x = Math::BigFloat->new(0); $x->accuracy(5); $x->{_a} ok 142 - $x = Math::BigFloat->new(0); $x->precision(5); $x->{_p} ok 143 - $x = Math::BigFloat->bzero(); $x->round(5); $x->{_a} ok 144 - $x = Math::BigFloat->bzero(); $x->round(undef, 5); $x->{_p} ok 145 - $x = Math::BigFloat->new(0); $x->round(5); $x->{_a} ok 146 - $x = Math::BigFloat->new(0); $x->round(undef, 5); $x->{_p} ok 147 - $x = Math::BigFloat->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 148 - Math::BigInt->new(123)->badd(123) ok 149 - Math::BigInt->badd(123, 321) ok 150 - Math::BigInt->badd(123, Math::BigInt->new(321)) ok 151 - Math::BigInt->new(123)->bsub(122) ok 152 - Math::BigInt->bsub(321, 123) ok 153 - Math::BigInt->bsub(321, Math::BigInt->new(123)) ok 154 - Math::BigInt->new(123)->bmul(123) ok 155 - Math::BigInt->bmul(123, 123) ok 156 - Math::BigInt->bmul(123, Math::BigInt->new(123)) ok 157 - Math::BigInt->new(15131)->bmod(123) ok 158 - Math::BigInt->bmod(15131, 123) ok 159 - Math::BigInt->bmod(15131, Math::BigInt->new(123)) ok 160 - Math::BigInt->new(2)->bpow(16) ok 161 - Math::BigInt->bpow(2, 16) ok 162 - Math::BigInt->bpow(2, Math::BigInt->new(16)) ok 163 - Math::BigInt->new(2**15)->brsft(1) ok 164 - Math::BigInt->brsft(2**15, 1) ok 165 - Math::BigInt->brsft(2**15, Math::BigInt->new(1)) ok 166 - Math::BigInt->new(2**13)->blsft(1) ok 167 - Math::BigInt->blsft(2**13, 1) ok 168 - Math::BigInt->blsft(2**13, Math::BigInt->new(1)) ok 169 - Math::BigFloat->new(123)->badd(123) ok 170 - Math::BigFloat->badd(123, 321) ok 171 - Math::BigFloat->badd(123, Math::BigFloat->new(321)) ok 172 - Math::BigFloat->new(123)->bsub(122) ok 173 - Math::BigFloat->bsub(321, 123) ok 174 - Math::BigFloat->bsub(321, Math::BigFloat->new(123)) ok 175 - Math::BigFloat->new(123)->bmul(123) ok 176 - Math::BigFloat->bmul(123, 123) ok 177 - Math::BigFloat->bmul(123, Math::BigFloat->new(123)) ok 178 - Math::BigFloat->new(15131)->bmod(123) ok 179 - Math::BigFloat->bmod(15131, 123) ok 180 - Math::BigFloat->bmod(15131, Math::BigFloat->new(123)) ok 181 - Math::BigFloat->new(2)->bpow(16) ok 182 - Math::BigFloat->bpow(2, 16) ok 183 - Math::BigFloat->bpow(2, Math::BigFloat->new(16)) ok 184 - Math::BigFloat->new(2**15)->brsft(1) ok 185 - Math::BigFloat->brsft(2**15, 1) ok 186 - Math::BigFloat->brsft(2**15, Math::BigFloat->new(1)) ok 187 - Math::BigFloat->new(2**13)->blsft(1) ok 188 - Math::BigFloat->blsft(2**13, 1) ok 189 - Math::BigFloat->blsft(2**13, Math::BigFloat->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{_a} ok 209 - $x->bdiv($y) ok 210 - $x->{_a} ok 211 - $x->bdiv($y) ok 212 - $x->{_a} ok 213 - $x->bdiv($y) ok 214 - $x->{_a} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{_a} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{_a} ok 253 - $x->bdiv($y) ok 254 - $x->{_a} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{_a} = 4 ok 260 - $y->{_a} = 4 ok 261 - $x->{_p} = undef ok 262 - $y->{_p} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{_p} = -2 ok 265 - $y->{_p} = -2 ok 266 - $x->{_a} = undef ok 267 - $y->{_a} = undef ok 268 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 269 - $x = "1.000" ok 270 - $x->{_a} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{_a} = 3 ok 274 - $x = "1230" # bround(n) should set _a ok 275 - $x = "1200" ok 276 - $x->{_a} = 2 # bround(-n) should set _a ok 277 - $x = "12300" ok 278 - $x->{_a} = 4 # bround(-n) should set _a ok 279 - $x = "12000" ok 280 - $x->{_a} = 3 # bround(-n) should set _a ok 281 - $x = "10000" ok 282 - $x->{_a} = 2 # bround(-n) should set _a ok 283 - $x = "0" ok 284 - $x->{_a} = 1 # bround(-n) should be no-op if n too big ok 285 - $x = "0" ok 286 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 287 - $x = "100000" ok 288 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 289 - $x = "100000" ok 290 - $x->{_a} = 0 # bround(n) should set _a ok 291 - $x = "12345" ok 292 - $x->{_a} = 5 # bround(n) should set _a 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->{_a} = 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->{_p} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{_a} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{_a} = 2 # mantissa/exponent format and A/P ok 310 - $x = "12350" ok 311 - $x->{_a} = 4 ok 312 - $x->{_p} = undef # check for no A/P in case of fallback result ok 313 - $x->{_a} = undef ok 314 - $x->{_p} = undef # result & remainder ok 315 - $x->{_a} = undef ok 316 - $x->{_p} = undef ok 317 - $y->{_a} = undef ok 318 - $y->{_p} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x = Math::BigInt->new(2)->bzero(); $x->{_a} ok 348 - $x = Math::BigInt->new(2)->bzero(); $x->{_p} ok 349 - $x = Math::BigInt->new(2)->bone(); $x->{_a} ok 350 - $x = Math::BigInt->new(2)->bone(); $x->{_p} ok 351 - $x = Math::BigInt->new(2)->binf(); $x->{_a} ok 352 - $x = Math::BigInt->new(2)->binf(); $x->{_p} ok 353 - $x = Math::BigInt->new(2)->bnan(); $x->{_a} ok 354 - $x = Math::BigInt->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 355 - $x = Math::BigInt->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 356 - $x = Math::BigInt->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 357 - $x = Math::BigInt->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 358 - $x = Math::BigInt->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 359 - $x = Math::BigInt->new(2, 1); $x->{_a} ok 360 - $x = Math::BigInt->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 361 - $x = Math::BigInt->new(2, undef, 1); $x->{_a} ok 362 - $x = Math::BigInt->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 363 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{_a} ok 364 - $x = Math::BigInt->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 365 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{_a} ok 366 - $x = Math::BigInt->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 367 - $x = Math::BigInt->new(2, 1)->bone(); $x->{_a} ok 368 - $x = Math::BigInt->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 369 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{_a} ok 370 - $x = Math::BigInt->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 371 - $x = Math::BigInt->new(2); $x->{_a} ok 372 - $x = Math::BigInt->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 373 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{_a} ok 374 - $x = Math::BigInt->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 375 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{_a} ok 376 - $x = Math::BigInt->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 377 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{_a} ok 378 - $x = Math::BigInt->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 379 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{_a} ok 380 - $x = Math::BigInt->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 381 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{_a} ok 382 - $x = Math::BigInt->new(2); $x->bzero(undef, 2); $x->{_p} ok 383 - $x = Math::BigFloat->new(2)->bzero(); $x->{_a} ok 384 - $x = Math::BigFloat->new(2)->bzero(); $x->{_p} ok 385 - $x = Math::BigFloat->new(2)->bone(); $x->{_a} ok 386 - $x = Math::BigFloat->new(2)->bone(); $x->{_p} ok 387 - $x = Math::BigFloat->new(2)->binf(); $x->{_a} ok 388 - $x = Math::BigFloat->new(2)->binf(); $x->{_p} ok 389 - $x = Math::BigFloat->new(2)->bnan(); $x->{_a} ok 390 - $x = Math::BigFloat->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 391 - $x = Math::BigFloat->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 392 - $x = Math::BigFloat->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 393 - $x = Math::BigFloat->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 394 - $x = Math::BigFloat->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 395 - $x = Math::BigFloat->new(2, 1); $x->{_a} ok 396 - $x = Math::BigFloat->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 397 - $x = Math::BigFloat->new(2, undef, 1); $x->{_a} ok 398 - $x = Math::BigFloat->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 399 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{_a} ok 400 - $x = Math::BigFloat->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 401 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{_a} ok 402 - $x = Math::BigFloat->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 403 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{_a} ok 404 - $x = Math::BigFloat->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 405 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{_a} ok 406 - $x = Math::BigFloat->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 407 - $x = Math::BigFloat->new(2); $x->{_a} ok 408 - $x = Math::BigFloat->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 409 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{_a} ok 410 - $x = Math::BigFloat->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 411 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{_a} ok 412 - $x = Math::BigFloat->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 413 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{_a} ok 414 - $x = Math::BigFloat->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 415 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{_a} ok 416 - $x = Math::BigFloat->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 417 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{_a} ok 418 - $x = Math::BigFloat->new(2); $x->bzero(undef, 2); $x->{_p} # 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->{_a} == 3 ok 480 - $x->{_p} 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->{_p} == -3 ok 484 - $x->{_a} 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->{_a} == 3 ok 488 - $x->{_p} 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->{_p} == -3 ok 492 - $x->{_a} 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->{_a} == 3 ok 498 - $x->{_p} 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->{_p} == -3 ok 502 - $x->{_a} 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->{_a} == 3 ok 506 - $x->{_p} 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->{_p} == -3 ok 510 - $x->{_a} 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->{_a} == 3 ok 514 - $x->{_p} 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->{_p} == -3 ok 518 - $x->{_a} 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->{_a} == 3 ok 522 - $x->{_p} 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->{_p} == -3 ok 526 - $x->{_a} 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->{_a} == 3 ok 530 - $x->{_p} 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->{_p} == -3 ok 534 - $x->{_a} 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->{_a} == 3 ok 538 - $x->{_p} 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->{_p} == -3 ok 542 - $x->{_a} 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->{_a} == 4 ok 548 - $x->{_p} 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->{_a} == 4 ok 552 - $x->{_p} 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->{_p} == -4 ok 556 - $x->{_a} 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->{_p} == -4 ok 560 - $x->{_a} 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->{_a} == 4 ok 564 - $x->{_p} 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->{_a} == 4 ok 568 - $x->{_p} 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->{_p} == -4 ok 572 - $x->{_a} 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->{_p} == -4 ok 576 - $x->{_a} 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->{_a} == 1 ok 582 - $x->{_p} 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->{_a} == 1 ok 586 - $x->{_p} 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->{_p} == -1 ok 590 - $x->{_a} 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->{_p} == -1 ok 594 - $x->{_a} 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->{_a} == 2 ok 600 - $x->{_p} 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->{_a} == 2 ok 604 - $x->{_p} 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->{_p} == 1 ok 608 - $x->{_a} 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->{_p} == 1 ok 612 - $x->{_a} 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->{_a} == 1 ok 618 - $x->{_p} 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->{_a} == 1 ok 622 - $x->{_p} 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->{_p} == 3 ok 626 - $x->{_a} 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->{_p} == 3 ok 630 - $x->{_a} 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->{_a} == 2 ok 636 - $x->{_p} 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->{_a} == 2 ok 640 - $x->{_p} 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->{_p} == 1 ok 644 - $x->{_a} 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->{_p} == 1 ok 648 - $x->{_a} 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->{_a} == 2 ok 652 - $x->{_p} 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->{_a} == 2 ok 656 - $x->{_p} 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->{_p} == 2 ok 660 - $x->{_a} 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->{_p} == 2 ok 664 - $x->{_a} 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->{_a} == 1 ok 670 - $x->{_p} 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->{_a} == 1 ok 674 - $x->{_p} 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->{_p} == 3 ok 678 - $x->{_a} 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->{_p} == 3 ok 682 - $x->{_a} 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->{_a} == 2 ok 688 - $x->{_p} 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->{_a} == 2 ok 692 - $x->{_p} 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->{_p} == 1 ok 696 - $x->{_a} 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->{_p} == 1 ok 700 - $x->{_a} 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->{_a} == 2 ok 708 - $x->{_p} 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->{_a} == 2 ok 712 - $x->{_p} 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/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/req_mbf0.t .................. 1..1 ok 1 - $x is 1 ok t/req_mbf1.t .................. 1..1 ok 1 - $x is 1 ok t/req_mbfa.t .................. 1..1 ok 1 - $x is NaN ok t/req_mbfi.t .................. 1..1 ok 1 - $x is inf ok t/req_mbfn.t .................. 1..1 ok 1 - $x is 2 ok t/req_mbfw.t .................. 1..3 ok 1 - $x is 2 ok 2 - "with" ignored ok 3 - "with" ignored ok t/require.t ................... 1..1 ok 1 - $x is 2 ok t/round.t ..................... 1..95 ok 1 - round(3) ok 2 - round(3.1) ok 3 - round(3.5) ok 4 - round(3.6) ok 5 - round(3.9) ok 6 - bfround(3) ok 7 - bfround(3.1) ok 8 - bfround(3.5) ok 9 - bfround(3.6) ok 10 - bfround(3.9) ok 11 - bfround(2) ok 12 - bfround(2.1) ok 13 - bfround(2.5) ok 14 - bfround(2.6) ok 15 - bfround(2.9) ok 16 - bfround(-2) ok 17 - bfround(-2.1) ok 18 - bfround(-2.5) ok 19 - bfround(-2.6) ok 20 - bfround(-2.9) ok 21 - bfround(-3) ok 22 - bfround(-3.1) ok 23 - bfround(-3.5) ok 24 - bfround(-3.6) ok 25 - bfround(-3.9) ok 26 - bround(4) ok 27 - bround(4.1) ok 28 - bround(4.5) ok 29 - bround(4.6) ok 30 - bround(4.9) ok 31 - bround(3) ok 32 - bround(3.1) ok 33 - bround(3.5) ok 34 - bround(3.6) ok 35 - bround(3.9) ok 36 - bround(2) ok 37 - bround(2.1) ok 38 - bround(2.5) ok 39 - bround(2.6) ok 40 - bround(2.9) ok 41 - bsqrt(4) ok 42 - bsqrt(4.1) ok 43 - bsqrt(4.5) ok 44 - bsqrt(4.6) ok 45 - bsqrt(4.9) ok 46 - bsqrt(3) ok 47 - bsqrt(3.1) ok 48 - bsqrt(3.5) ok 49 - bsqrt(3.6) ok 50 - bsqrt(3.9) ok 51 - bsqrt(2) ok 52 - bsqrt(2.1) ok 53 - bsqrt(2.5) ok 54 - bsqrt(2.6) ok 55 - bsqrt(2.9) ok 56 - bsqrt(undef, 2) ok 57 - bsqrt(undef, 2.1) ok 58 - bsqrt(undef.2.5) ok 59 - bsqrt(undef, 2.6) ok 60 - bsqrt(undef, 2.9) ok 61 - bsqrt(undef, -2) ok 62 - bsqrt(undef, -2.1) ok 63 - bsqrt(undef.-2.5) ok 64 - bsqrt(undef, -2.6) ok 65 - bsqrt(undef, -2.9) ok 66 - bdiv(2, 6) ok 67 - bdiv(2, 6.1) ok 68 - bdiv(2, 6.5) ok 69 - bdiv(2, 6.6) ok 70 - bdiv(2, 6.9) ok 71 - bdiv(2, 4) ok 72 - bdiv(2, 4.1) ok 73 - bdiv(2, 4.5) ok 74 - bdiv(2, 4.6) ok 75 - bdiv(2, 4.9) ok 76 - bdiv(2, 3) ok 77 - bdiv(2, 3.1) ok 78 - bdiv(2, 3.5) ok 79 - bdiv(2, 3.6) ok 80 - bdiv(2, 3.9) ok 81 - bdiv(undef, -6) ok 82 - bdiv(2, undef, -6.1) ok 83 - bdiv(2, undef, -6.5) ok 84 - bdiv(2, undef, -6.6) ok 85 - bdiv(2, undef, -6.9) ok 86 - bdiv(undef, -4) ok 87 - bdiv(2, undef, -4.1) ok 88 - bdiv(2, undef, -4.5) ok 89 - bdiv(2, undef, -4.6) ok 90 - bdiv(2, undef, -4.9) ok 91 - bdiv(undef, -3) ok 92 - bdiv(2, undef, -3.1) ok 93 - bdiv(2, undef, -3.5) ok 94 - bdiv(2, undef, -3.6) ok 95 - bdiv(2, undef, -3.9) ok t/rt-16221.t .................. 1..2 ok 1 - $int * $int_percent = 10 ok 2 - $float * $float_percent = 10 ok t/sub_ali.t ................... 1..6 ok 1 - Math::BigInt::Subclass -> new(123) -> is_pos() ok 2 - Math::BigInt::Subclass -> new(123) -> is_neg() ok 3 - Math::BigInt::Subclass -> new(123) -> as_int() ok 4 - ref(Math::BigInt::Subclass -> new(123) -> as_int()) ok 5 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_pos() ok 6 - Math::BigInt::Subclass -> new(123) -> bneg() -> is_neg() ok t/sub_mbf.t ................... 1..3078 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->{_a} ok 3015 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(); $x->{_p} ok 3016 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{_a} ok 3017 - $x = Math::BigFloat::Subclass->new(2); $x->binf(); $x->{_p} ok 3018 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{_a} ok 3019 - $x = Math::BigFloat::Subclass->new(2); $x->bone(); $x->{_p} ok 3020 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{_a} ok 3021 - $x = Math::BigFloat::Subclass->new(2); $x->bnan(); $x->{_p} 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; $x->copy()->bfround(-9); ok 3069 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 3070 - $x = Math::BigFloat::Subclass->new("2"); $y = Math::BigFloat::Subclass->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $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 'div_scale' from parent ok 3078 - Math::BigFloat::Subclass gets 'round_mode' from parent ok t/sub_mbi.t ................... 1..4285 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 'div_scale' from parent ok 4285 - Math::BigInt::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->{_a} ok 131 - $x = Math::BigInt::Subclass->bzero(); $x->precision(5); $x->{_p} ok 132 - $x = Math::BigInt::Subclass->new(0); $x->accuracy(5); $x->{_a} ok 133 - $x = Math::BigInt::Subclass->new(0); $x->precision(5); $x->{_p} ok 134 - $x = Math::BigInt::Subclass->bzero(); $x->round(5); $x->{_a} ok 135 - $x = Math::BigInt::Subclass->bzero(); $x->round(undef, 5); $x->{_p} ok 136 - $x = Math::BigInt::Subclass->new(0); $x->round(5); $x->{_a} ok 137 - $x = Math::BigInt::Subclass->new(0); $x->round(undef, 5); $x->{_p} ok 138 - $x = Math::BigInt::Subclass->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 139 - $x = Math::BigFloat::Subclass->bzero(); $x->accuracy(5); $x->{_a} ok 140 - $x = Math::BigFloat::Subclass->bzero(); $x->precision(5); $x->{_p} ok 141 - $x = Math::BigFloat::Subclass->new(0); $x->accuracy(5); $x->{_a} ok 142 - $x = Math::BigFloat::Subclass->new(0); $x->precision(5); $x->{_p} ok 143 - $x = Math::BigFloat::Subclass->bzero(); $x->round(5); $x->{_a} ok 144 - $x = Math::BigFloat::Subclass->bzero(); $x->round(undef, 5); $x->{_p} ok 145 - $x = Math::BigFloat::Subclass->new(0); $x->round(5); $x->{_a} ok 146 - $x = Math::BigFloat::Subclass->new(0); $x->round(undef, 5); $x->{_p} ok 147 - $x = Math::BigFloat::Subclass->bzero(); $x->{_a} = 3; $x->round(5); $x->{_a} ok 148 - Math::BigInt::Subclass->new(123)->badd(123) ok 149 - Math::BigInt::Subclass->badd(123, 321) ok 150 - Math::BigInt::Subclass->badd(123, Math::BigInt::Subclass->new(321)) ok 151 - Math::BigInt::Subclass->new(123)->bsub(122) ok 152 - Math::BigInt::Subclass->bsub(321, 123) ok 153 - Math::BigInt::Subclass->bsub(321, Math::BigInt::Subclass->new(123)) ok 154 - Math::BigInt::Subclass->new(123)->bmul(123) ok 155 - Math::BigInt::Subclass->bmul(123, 123) ok 156 - Math::BigInt::Subclass->bmul(123, Math::BigInt::Subclass->new(123)) ok 157 - Math::BigInt::Subclass->new(15131)->bmod(123) ok 158 - Math::BigInt::Subclass->bmod(15131, 123) ok 159 - Math::BigInt::Subclass->bmod(15131, Math::BigInt::Subclass->new(123)) ok 160 - Math::BigInt::Subclass->new(2)->bpow(16) ok 161 - Math::BigInt::Subclass->bpow(2, 16) ok 162 - Math::BigInt::Subclass->bpow(2, Math::BigInt::Subclass->new(16)) ok 163 - Math::BigInt::Subclass->new(2**15)->brsft(1) ok 164 - Math::BigInt::Subclass->brsft(2**15, 1) ok 165 - Math::BigInt::Subclass->brsft(2**15, Math::BigInt::Subclass->new(1)) ok 166 - Math::BigInt::Subclass->new(2**13)->blsft(1) ok 167 - Math::BigInt::Subclass->blsft(2**13, 1) ok 168 - Math::BigInt::Subclass->blsft(2**13, Math::BigInt::Subclass->new(1)) ok 169 - Math::BigFloat::Subclass->new(123)->badd(123) ok 170 - Math::BigFloat::Subclass->badd(123, 321) ok 171 - Math::BigFloat::Subclass->badd(123, Math::BigFloat::Subclass->new(321)) ok 172 - Math::BigFloat::Subclass->new(123)->bsub(122) ok 173 - Math::BigFloat::Subclass->bsub(321, 123) ok 174 - Math::BigFloat::Subclass->bsub(321, Math::BigFloat::Subclass->new(123)) ok 175 - Math::BigFloat::Subclass->new(123)->bmul(123) ok 176 - Math::BigFloat::Subclass->bmul(123, 123) ok 177 - Math::BigFloat::Subclass->bmul(123, Math::BigFloat::Subclass->new(123)) ok 178 - Math::BigFloat::Subclass->new(15131)->bmod(123) ok 179 - Math::BigFloat::Subclass->bmod(15131, 123) ok 180 - Math::BigFloat::Subclass->bmod(15131, Math::BigFloat::Subclass->new(123)) ok 181 - Math::BigFloat::Subclass->new(2)->bpow(16) ok 182 - Math::BigFloat::Subclass->bpow(2, 16) ok 183 - Math::BigFloat::Subclass->bpow(2, Math::BigFloat::Subclass->new(16)) ok 184 - Math::BigFloat::Subclass->new(2**15)->brsft(1) ok 185 - Math::BigFloat::Subclass->brsft(2**15, 1) ok 186 - Math::BigFloat::Subclass->brsft(2**15, Math::BigFloat::Subclass->new(1)) ok 187 - Math::BigFloat::Subclass->new(2**13)->blsft(1) ok 188 - Math::BigFloat::Subclass->blsft(2**13, 1) ok 189 - Math::BigFloat::Subclass->blsft(2**13, Math::BigFloat::Subclass->new(1)) ok 190 - $z = $x + $y ok 191 - $z = $y - $x ok 192 - $z = $y * $x ok 193 - $z = $x ** 2 ok 194 - $z = $x * $x ok 195 - $z = $z / 2 ok 196 - $z++ ok 197 - $z = $x + $y ok 198 - $z = $y - $x ok 199 - $z = $y * $x ok 200 - $z = $x ** 2 ok 201 - $z++ ok 202 - $z = $z / 2 ok 203 - $x->bnot() ok 204 - $x->babs() ok 205 - $x->bneg() ok 206 - $x ok 207 - $x->bdiv($y) ok 208 - $x->{_a} ok 209 - $x->bdiv($y) ok 210 - $x->{_a} ok 211 - $x->bdiv($y) ok 212 - $x->{_a} ok 213 - $x->bdiv($y) ok 214 - $x->{_a} ok 215 - $x->copy()->bsqrt(...) ok 216 - $x->copy->bsqrt(...) ok 217 - $x->{_a} ok 218 - $z = $x->bsqrt(); $z ok 219 - $z = $x->bsqrt(); $x ok 220 - $x->copy()->bpow(...) ok 221 - $x->copy()->bpow(...) vs. $x->copy()->bsqrt(...) ok 222 - $x->copy()->bpow('2', 0) ok 223 - $mbi->new(12)->bfac() ok 224 - $mbi->new(12)->bfac(2) ok 225 - $x = Math::BigInt::Subclass->new(12); $x->accuracy(2); $x->bfac() ok 226 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(2); $x->bfac() ok 227 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(3); $x->bfac() ok 228 - $x = Math::BigInt::Subclass->new(13); $x->accuracy(4); $x->bfac() ok 229 - $x = Math::BigInt::Subclass->new(20); $x->accuracy(1); $x->bfac() ok 230 - $x = Math::BigInt::Subclass->new("123456")->bsqrt(2, undef) ok 231 - $x->accuracy() ok 232 - $x = 360 ok 233 - $x = 400 ok 234 - $z = $x + $y; ok 235 - $z is a "Math::BigFloat::Subclass" object ok 236 - $z = $x / $y; ok 237 - $z is a "Math::BigFloat::Subclass" object ok 238 - $z = $u * $y; ok 239 - $z is a "Math::BigFloat::Subclass" object ok 240 - $z = 31000 ok 241 - $z = 30900 ok 242 - $z = 30863 ok 243 - $z = 30863 ok 244 - $z = 30860 ok 245 - $z = 30900 ok 246 - $z = 30862.5 ok 247 - $z = "" ok 248 - "$z = $y >= 3.17" gives warning as expected ok 249 - $z = "" ok 250 - "$z = $y >= 3.17" gives warning as expected ok 251 - $x->bdiv(3) ok 252 - $x->{_a} ok 253 - $x->bdiv($y) ok 254 - $x->{_a} ok 255 - $x->bdiv(3) ok 256 - $x->bdiv(3, undef, -2) ok 257 - $x->bdiv(3, undef, -8) = "3.33333333" ok 258 - $x->bdiv($y) = '3.333' ok 259 - $x->{_a} = 4 ok 260 - $y->{_a} = 4 ok 261 - $x->{_p} = undef ok 262 - $y->{_p} = undef ok 263 - $x->bdiv($y) = '3.33' ok 264 - $x->{_p} = -2 ok 265 - $y->{_p} = -2 ok 266 - $x->{_a} = undef ok 267 - $y->{_a} = undef ok 268 - "$x->bround(-2)" gives warning as expected # test whether rounding to higher accuracy is no-op ok 269 - $x = "1.000" ok 270 - $x->{_a} = 4 ok 271 - $x = "1.000" ok 272 - $x = "1230" ok 273 - $x->{_a} = 3 ok 274 - $x = "1230" # bround(n) should set _a ok 275 - $x = "1200" ok 276 - $x->{_a} = 2 # bround(-n) should set _a ok 277 - $x = "12300" ok 278 - $x->{_a} = 4 # bround(-n) should set _a ok 279 - $x = "12000" ok 280 - $x->{_a} = 3 # bround(-n) should set _a ok 281 - $x = "10000" ok 282 - $x->{_a} = 2 # bround(-n) should set _a ok 283 - $x = "0" ok 284 - $x->{_a} = 1 # bround(-n) should be no-op if n too big ok 285 - $x = "0" ok 286 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 287 - $x = "100000" ok 288 - $x->{_a} = 0 # bround(-n) should be no-op if n too big ok 289 - $x = "100000" ok 290 - $x->{_a} = 0 # bround(n) should set _a ok 291 - $x = "12345" ok 292 - $x->{_a} = 5 # bround(n) should set _a 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->{_a} = 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->{_p} = -2 ok 306 - $x->bround(2) = "12000" ok 307 - $x->{_a} = 2 ok 308 - $x->bround(2) = "1.2" ok 309 - $x->{_a} = 2 # mantissa/exponent format and A/P ok 310 - $x = "12350" ok 311 - $x->{_a} = 4 ok 312 - $x->{_p} = undef # check for no A/P in case of fallback result ok 313 - $x->{_a} = undef ok 314 - $x->{_p} = undef # result & remainder ok 315 - $x->{_a} = undef ok 316 - $x->{_p} = undef ok 317 - $y->{_a} = undef ok 318 - $y->{_p} = undef ok 319 - $x+$y = 24000 ok 320 - $x-$y = 42000 ok 321 - $x+$y = "2.46" ok 322 - scalar(@params) = 1 ok 323 - scalar(@params) = 4 ok 324 - $params[0] = $x ok 325 - $params[1] = 1 ok 326 - $params[2] = undef ok 327 - $params[3] = "odd" ok 328 - scalar(@params) = 4 ok 329 - $params[0] = $x ok 330 - $params[1] = undef ok 331 - $params[2] = 2 ok 332 - $params[3] = "odd" ok 333 - round mode "foo" gives a warning as expected ok 334 - scalar(@params) = 4 ok 335 - $params[0] = $x ok 336 - $params[1] = undef ok 337 - $params[2] = 2 ok 338 - $params[3] = "+inf" ok 339 - scalar(@params) = 1 ok 340 - $params[0] = $x ok 341 - scalar(@params) = 1 ok 342 - $params[0] = $x ok 343 - $x->is_nan() = 1 ok 344 - scalar(@params) = 1 ok 345 - $params[0] = $x ok 346 - $x->is_nan() = 1 ok 347 - $x = Math::BigInt::Subclass->new(2)->bzero(); $x->{_a} ok 348 - $x = Math::BigInt::Subclass->new(2)->bzero(); $x->{_p} ok 349 - $x = Math::BigInt::Subclass->new(2)->bone(); $x->{_a} ok 350 - $x = Math::BigInt::Subclass->new(2)->bone(); $x->{_p} ok 351 - $x = Math::BigInt::Subclass->new(2)->binf(); $x->{_a} ok 352 - $x = Math::BigInt::Subclass->new(2)->binf(); $x->{_p} ok 353 - $x = Math::BigInt::Subclass->new(2)->bnan(); $x->{_a} ok 354 - $x = Math::BigInt::Subclass->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 355 - $x = Math::BigInt::Subclass->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 356 - $x = Math::BigInt::Subclass->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 357 - $x = Math::BigInt::Subclass->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 358 - $x = Math::BigInt::Subclass->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 359 - $x = Math::BigInt::Subclass->new(2, 1); $x->{_a} ok 360 - $x = Math::BigInt::Subclass->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 361 - $x = Math::BigInt::Subclass->new(2, undef, 1); $x->{_a} ok 362 - $x = Math::BigInt::Subclass->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 363 - $x = Math::BigInt::Subclass->new(2, 1)->bzero(); $x->{_a} ok 364 - $x = Math::BigInt::Subclass->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 365 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bzero(); $x->{_a} ok 366 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 367 - $x = Math::BigInt::Subclass->new(2, 1)->bone(); $x->{_a} ok 368 - $x = Math::BigInt::Subclass->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 369 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bone(); $x->{_a} ok 370 - $x = Math::BigInt::Subclass->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 371 - $x = Math::BigInt::Subclass->new(2); $x->{_a} ok 372 - $x = Math::BigInt::Subclass->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 373 - $x = Math::BigInt::Subclass->new(2); $x->bone('+', undef, 2); $x->{_a} ok 374 - $x = Math::BigInt::Subclass->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 375 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', 2, undef); $x->{_a} ok 376 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 377 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', undef, 2); $x->{_a} ok 378 - $x = Math::BigInt::Subclass->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 379 - $x = Math::BigInt::Subclass->new(2);$x->bzero(2, undef); $x->{_a} ok 380 - $x = Math::BigInt::Subclass->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 381 - $x = Math::BigInt::Subclass->new(2); $x->bzero(undef, 2); $x->{_a} ok 382 - $x = Math::BigInt::Subclass->new(2); $x->bzero(undef, 2); $x->{_p} ok 383 - $x = Math::BigFloat::Subclass->new(2)->bzero(); $x->{_a} ok 384 - $x = Math::BigFloat::Subclass->new(2)->bzero(); $x->{_p} ok 385 - $x = Math::BigFloat::Subclass->new(2)->bone(); $x->{_a} ok 386 - $x = Math::BigFloat::Subclass->new(2)->bone(); $x->{_p} ok 387 - $x = Math::BigFloat::Subclass->new(2)->binf(); $x->{_a} ok 388 - $x = Math::BigFloat::Subclass->new(2)->binf(); $x->{_p} ok 389 - $x = Math::BigFloat::Subclass->new(2)->bnan(); $x->{_a} ok 390 - $x = Math::BigFloat::Subclass->new(2)->bnan(); $x->{_p} # Verify that bnan() does not delete/undefine accuracy and precision. ok 391 - $x = Math::BigFloat::Subclass->new(2); $x->{_a} = 1; $x->bnan(); $x->{_a} ok 392 - $x = Math::BigFloat::Subclass->new(2); $x->{_p} = 1; $x->bnan(); $x->{_p} # Verify that binf() does not delete/undefine accuracy and precision. ok 393 - $x = Math::BigFloat::Subclass->new(2); $x->{_a} = 1; $x->binf(); $x->{_a} ok 394 - $x = Math::BigFloat::Subclass->new(2); $x->{_p} = 1; $x->binf(); $x->{_p} # Verify that accuracy can be set as argument to new(). ok 395 - $x = Math::BigFloat::Subclass->new(2, 1); $x->{_a} ok 396 - $x = Math::BigFloat::Subclass->new(2, 1); $x->{_p} # Verify that precision can be set as argument to new(). ok 397 - $x = Math::BigFloat::Subclass->new(2, undef, 1); $x->{_a} ok 398 - $x = Math::BigFloat::Subclass->new(2, undef, 1); $x->{_p} # Verify that accuracy set with new() is preserved after calling bzero(). ok 399 - $x = Math::BigFloat::Subclass->new(2, 1)->bzero(); $x->{_a} ok 400 - $x = Math::BigFloat::Subclass->new(2, 1)->bzero(); $x->{_p} # Verify that precision set with new() is preserved after calling bzero(). ok 401 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bzero(); $x->{_a} ok 402 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bzero(); $x->{_p} # Verify that accuracy set with new() is preserved after calling bone(). ok 403 - $x = Math::BigFloat::Subclass->new(2, 1)->bone(); $x->{_a} ok 404 - $x = Math::BigFloat::Subclass->new(2, 1)->bone(); $x->{_p} # Verify that precision set with new() is preserved after calling bone(). ok 405 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bone(); $x->{_a} ok 406 - $x = Math::BigFloat::Subclass->new(2, undef, 1)->bone(); $x->{_p} # Verify that accuracy can be set with instance method bone('+'). ok 407 - $x = Math::BigFloat::Subclass->new(2); $x->{_a} ok 408 - $x = Math::BigFloat::Subclass->new(2); $x->{_p} # Verify that precision can be set with instance method bone('+'). ok 409 - $x = Math::BigFloat::Subclass->new(2); $x->bone('+', undef, 2); $x->{_a} ok 410 - $x = Math::BigFloat::Subclass->new(2); $x->bone('+', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bone('-'). ok 411 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', 2, undef); $x->{_a} ok 412 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', 2, undef); $x->{_p} # Verify that precision can be set with instance method bone('-'). ok 413 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', undef, 2); $x->{_a} ok 414 - $x = Math::BigFloat::Subclass->new(2); $x->bone('-', undef, 2); $x->{_p} # Verify that accuracy can be set with instance method bzero(). ok 415 - $x = Math::BigFloat::Subclass->new(2);$x->bzero(2, undef); $x->{_a} ok 416 - $x = Math::BigFloat::Subclass->new(2);$x->bzero(2, undef); $x->{_p} # Verify that precision can be set with instance method bzero(). ok 417 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(undef, 2); $x->{_a} ok 418 - $x = Math::BigFloat::Subclass->new(2); $x->bzero(undef, 2); $x->{_p} # 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->{_a} == 3 ok 480 - $x->{_p} 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->{_p} == -3 ok 484 - $x->{_a} 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->{_a} == 3 ok 488 - $x->{_p} 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->{_p} == -3 ok 492 - $x->{_a} 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->{_a} == 3 ok 498 - $x->{_p} 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->{_p} == -3 ok 502 - $x->{_a} 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->{_a} == 3 ok 506 - $x->{_p} 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->{_p} == -3 ok 510 - $x->{_a} 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->{_a} == 3 ok 514 - $x->{_p} 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->{_p} == -3 ok 518 - $x->{_a} 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->{_a} == 3 ok 522 - $x->{_p} 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->{_p} == -3 ok 526 - $x->{_a} 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->{_a} == 3 ok 530 - $x->{_p} 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->{_p} == -3 ok 534 - $x->{_a} 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->{_a} == 3 ok 538 - $x->{_p} 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->{_p} == -3 ok 542 - $x->{_a} 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->{_a} == 4 ok 548 - $x->{_p} 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->{_a} == 4 ok 552 - $x->{_p} 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->{_p} == -4 ok 556 - $x->{_a} 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->{_p} == -4 ok 560 - $x->{_a} 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->{_a} == 4 ok 564 - $x->{_p} 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->{_a} == 4 ok 568 - $x->{_p} 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->{_p} == -4 ok 572 - $x->{_a} 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->{_p} == -4 ok 576 - $x->{_a} 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->{_a} == 1 ok 582 - $x->{_p} 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->{_a} == 1 ok 586 - $x->{_p} 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->{_p} == -1 ok 590 - $x->{_a} 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->{_p} == -1 ok 594 - $x->{_a} 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->{_a} == 2 ok 600 - $x->{_p} 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->{_a} == 2 ok 604 - $x->{_p} 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->{_p} == 1 ok 608 - $x->{_a} 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->{_p} == 1 ok 612 - $x->{_a} 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->{_a} == 1 ok 618 - $x->{_p} 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->{_a} == 1 ok 622 - $x->{_p} 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->{_p} == 3 ok 626 - $x->{_a} 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->{_p} == 3 ok 630 - $x->{_a} 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->{_a} == 2 ok 636 - $x->{_p} 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->{_a} == 2 ok 640 - $x->{_p} 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->{_p} == 1 ok 644 - $x->{_a} 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->{_p} == 1 ok 648 - $x->{_a} 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->{_a} == 2 ok 652 - $x->{_p} 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->{_a} == 2 ok 656 - $x->{_p} 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->{_p} == 2 ok 660 - $x->{_a} 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->{_p} == 2 ok 664 - $x->{_a} 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->{_a} == 1 ok 670 - $x->{_p} 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->{_a} == 1 ok 674 - $x->{_p} 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->{_p} == 3 ok 678 - $x->{_a} 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->{_p} == 3 ok 682 - $x->{_a} 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->{_a} == 2 ok 688 - $x->{_p} 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->{_a} == 2 ok 692 - $x->{_p} 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->{_p} == 1 ok 696 - $x->{_a} 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->{_p} == 1 ok 700 - $x->{_a} 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->{_a} == 2 ok 708 - $x->{_p} 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->{_a} == 2 ok 712 - $x->{_p} is undef ok t/trap.t ...................... 1..43 ok 1 - can config() ok 2 - trap_nan defaults to 0 ok 3 - trap_inf defaults to 0 ok 4 - trap_nan now true ok 5 - died ok 6 - $x after new() never modified ok 7 - trap_nan disabled ok 8 - trap_inf enabled ok 9 - died ok 10 - $x after new() never modified ok 11 - died ok 12 - $x after new() never modified ok 13 - died ok 14 - $x after new() never modified ok 15 - died ok 16 - $x after new() never modified ok 17 - died ok 18 - $x after new not modified ok 19 - died ok 20 - $x after new not modified ok 21 - can config() ok 22 - trap_nan defaults to 0 ok 23 - trap_inf defaults to 0 ok 24 - trap_nan now true ok 25 - died ok 26 - $x after new() never modified ok 27 - trap_nan disabled ok 28 - trap_inf enabled ok 29 - died ok 30 - $x after new() never modified ok 31 - died ok 32 - $x after new() never modified ok 33 - died ok 34 - $x after new() never modified ok 35 - died ok 36 - $x after new() never modified ok 37 - died ok 38 - $x after new not modified ok 39 - died ok 40 - $x after new not modified ok 41 - never modified since it dies ok 42 - never modified since it dies ok 43 - never modified since it dies ok t/upgrade.t ................... 1..2146 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("144"); $x->bsqrt(); ok 1841 - ref($got) ok 1842 - $Math::BigInt::upgrade ok 1843 - is a valid object ok 1844 - $x = Math::BigInt->new("143"); $x->bsqrt(); ok 1845 - ref($got) ok 1846 - $Math::BigInt::upgrade ok 1847 - is a valid object ok 1848 - $x = Math::BigInt->new("16"); $x->bsqrt(); ok 1849 - is a valid object ok 1850 - $x = Math::BigInt->new("170"); $x->bsqrt(); ok 1851 - ref($got) ok 1852 - $Math::BigInt::upgrade ok 1853 - is a valid object ok 1854 - $x = Math::BigInt->new("169"); $x->bsqrt(); ok 1855 - is a valid object ok 1856 - $x = Math::BigInt->new("168"); $x->bsqrt(); ok 1857 - ref($got) ok 1858 - $Math::BigInt::upgrade ok 1859 - is a valid object ok 1860 - $x = Math::BigInt->new("4"); $x->bsqrt(); ok 1861 - is a valid object ok 1862 - $x = Math::BigInt->new("3"); $x->bsqrt(); ok 1863 - ref($got) ok 1864 - $Math::BigInt::upgrade ok 1865 - is a valid object ok 1866 - $x = Math::BigInt->new("2"); $x->bsqrt(); ok 1867 - ref($got) ok 1868 - $Math::BigInt::upgrade ok 1869 - is a valid object ok 1870 - $x = Math::BigInt->new("9"); $x->bsqrt(); ok 1871 - is a valid object ok 1872 - $x = Math::BigInt->new("12"); $x->bsqrt(); ok 1873 - ref($got) ok 1874 - $Math::BigInt::upgrade ok 1875 - is a valid object ok 1876 - $x = Math::BigInt->new("256"); $x->bsqrt(); ok 1877 - is a valid object ok 1878 - $x = Math::BigInt->new("100000000"); $x->bsqrt(); ok 1879 - is a valid object ok 1880 - $x = Math::BigInt->new("4000000000000"); $x->bsqrt(); ok 1881 - is a valid object ok 1882 - $x = Math::BigInt->new("152399026"); $x->bsqrt(); ok 1883 - ref($got) ok 1884 - $Math::BigInt::upgrade ok 1885 - is a valid object ok 1886 - $x = Math::BigInt->new("152399025"); $x->bsqrt(); ok 1887 - is a valid object ok 1888 - $x = Math::BigInt->new("152399024"); $x->bsqrt(); ok 1889 - ref($got) ok 1890 - $Math::BigInt::upgrade ok 1891 - is a valid object ok 1892 - $x = Math::BigInt->new("1"); $x->bsqrt(); ok 1893 - is a valid object ok 1894 - $x = Math::BigInt->new("0"); $x->bsqrt(); ok 1895 - is a valid object ok 1896 - $x = Math::BigInt->new("-2"); $x->bsqrt(); ok 1897 - is a valid object ok 1898 - $x = Math::BigInt->new("-123"); $x->bsqrt(); ok 1899 - is a valid object ok 1900 - $x = Math::BigInt->new("Nan"); $x->bsqrt(); ok 1901 - is a valid object ok 1902 - $x = Math::BigInt->new("+inf"); $x->bsqrt(); ok 1903 - is a valid object ok 1904 - $x = Math::BigInt->new("-inf"); $x->bsqrt(); ok 1905 - is a valid object ok 1906 - $x = Math::BigInt->new("0"); $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("NaNbround"); $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("+inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1911 - is a valid object ok 1912 - $x = Math::BigInt->new("-inf"); $y = Math::BigInt->new("12"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1913 - is a valid object ok 1914 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("0"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1915 - is a valid object ok 1916 - $x = Math::BigInt->new("1234"); $y = Math::BigInt->new("2"); 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("4"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1919 - is a valid object ok 1920 - $x = Math::BigInt->new("123456"); $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("123456"); $y = Math::BigInt->new("6"); 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("5"); 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("5"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1927 - is a valid object ok 1928 - $x = Math::BigInt->new("+10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1929 - is a valid object ok 1930 - $x = Math::BigInt->new("-10123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1931 - is a valid object ok 1932 - $x = Math::BigInt->new("+101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1933 - is a valid object ok 1934 - $x = Math::BigInt->new("-101234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('trunc'); $x->bround($y); ok 1935 - is a valid object ok 1936 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("5"); 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("5"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1939 - is a valid object ok 1940 - $x = Math::BigInt->new("+20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1941 - is a valid object ok 1942 - $x = Math::BigInt->new("-20123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1943 - is a valid object ok 1944 - $x = Math::BigInt->new("+201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1945 - is a valid object ok 1946 - $x = Math::BigInt->new("-201234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1947 - is a valid object ok 1948 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1949 - is a valid object ok 1950 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('zero'); $x->bround($y); ok 1951 - is a valid object ok 1952 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("5"); 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("5"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1955 - is a valid object ok 1956 - $x = Math::BigInt->new("+30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1957 - is a valid object ok 1958 - $x = Math::BigInt->new("-30123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1959 - is a valid object ok 1960 - $x = Math::BigInt->new("+301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1961 - is a valid object ok 1962 - $x = Math::BigInt->new("-301234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1963 - is a valid object ok 1964 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1965 - is a valid object ok 1966 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('+inf'); $x->bround($y); ok 1967 - is a valid object ok 1968 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("5"); 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("5"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1971 - is a valid object ok 1972 - $x = Math::BigInt->new("+40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1973 - is a valid object ok 1974 - $x = Math::BigInt->new("-40123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1975 - is a valid object ok 1976 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1977 - is a valid object ok 1978 - $x = Math::BigInt->new("+401234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1979 - is a valid object ok 1980 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1981 - is a valid object ok 1982 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('-inf'); $x->bround($y); ok 1983 - is a valid object ok 1984 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("5"); 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("5"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1987 - is a valid object ok 1988 - $x = Math::BigInt->new("+50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1989 - is a valid object ok 1990 - $x = Math::BigInt->new("-50123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1991 - is a valid object ok 1992 - $x = Math::BigInt->new("+501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1993 - is a valid object ok 1994 - $x = Math::BigInt->new("-501234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1995 - is a valid object ok 1996 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1997 - is a valid object ok 1998 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('odd'); $x->bround($y); ok 1999 - is a valid object ok 2000 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("5"); 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("5"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2003 - is a valid object ok 2004 - $x = Math::BigInt->new("+60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2005 - is a valid object ok 2006 - $x = Math::BigInt->new("-60123456789"); $y = Math::BigInt->new("9"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2007 - is a valid object ok 2008 - $x = Math::BigInt->new("+601234500"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2009 - is a valid object ok 2010 - $x = Math::BigInt->new("-601234500"); $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("+1234567"); $y = Math::BigInt->new("7"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2013 - is a valid object ok 2014 - $x = Math::BigInt->new("+1234567"); $y = Math::BigInt->new("6"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2015 - is a valid object ok 2016 - $x = Math::BigInt->new("+12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2017 - is a valid object ok 2018 - $x = Math::BigInt->new("-12345000"); $y = Math::BigInt->new("4"); Math::BigInt->round_mode('even'); $x->bround($y); ok 2019 - is a valid object ok 2020 - $x = Math::BigInt->new("0"); $x->is_zero(); ok 2021 - $x = Math::BigInt->new("NaNzero"); $x->is_zero(); ok 2022 - $x = Math::BigInt->new("+inf"); $x->is_zero(); ok 2023 - $x = Math::BigInt->new("-inf"); $x->is_zero(); ok 2024 - $x = Math::BigInt->new("123"); $x->is_zero(); ok 2025 - $x = Math::BigInt->new("-1"); $x->is_zero(); ok 2026 - $x = Math::BigInt->new("1"); $x->is_zero(); ok 2027 - $x = Math::BigInt->new("0"); $x->is_one(); ok 2028 - $x = Math::BigInt->new("NaNone"); $x->is_one(); ok 2029 - $x = Math::BigInt->new("+inf"); $x->is_one(); ok 2030 - $x = Math::BigInt->new("-inf"); $x->is_one(); ok 2031 - $x = Math::BigInt->new("1"); $x->is_one(); ok 2032 - $x = Math::BigInt->new("2"); $x->is_one(); ok 2033 - $x = Math::BigInt->new("-1"); $x->is_one(); ok 2034 - $x = Math::BigInt->new("-2"); $x->is_one(); ok 2035 - $x = Math::BigInt->new("0"); $x->bfloor(); ok 2036 - is a valid object ok 2037 - $x = Math::BigInt->new("NaNfloor"); $x->bfloor(); ok 2038 - is a valid object ok 2039 - $x = Math::BigInt->new("+inf"); $x->bfloor(); ok 2040 - is a valid object ok 2041 - $x = Math::BigInt->new("-inf"); $x->bfloor(); ok 2042 - is a valid object ok 2043 - $x = Math::BigInt->new("-1"); $x->bfloor(); ok 2044 - is a valid object ok 2045 - $x = Math::BigInt->new("-2"); $x->bfloor(); ok 2046 - is a valid object ok 2047 - $x = Math::BigInt->new("2"); $x->bfloor(); ok 2048 - is a valid object ok 2049 - $x = Math::BigInt->new("3"); $x->bfloor(); ok 2050 - is a valid object ok 2051 - $x = Math::BigInt->new("abc"); $x->bfloor(); ok 2052 - is a valid object ok 2053 - $x = Math::BigInt->new("NaNceil"); $x->bceil(); ok 2054 - is a valid object ok 2055 - $x = Math::BigInt->new("+inf"); $x->bceil(); ok 2056 - is a valid object ok 2057 - $x = Math::BigInt->new("-inf"); $x->bceil(); ok 2058 - is a valid object ok 2059 - $x = Math::BigInt->new("0"); $x->bceil(); ok 2060 - is a valid object ok 2061 - $x = Math::BigInt->new("-1"); $x->bceil(); ok 2062 - is a valid object ok 2063 - $x = Math::BigInt->new("-2"); $x->bceil(); ok 2064 - is a valid object ok 2065 - $x = Math::BigInt->new("2"); $x->bceil(); ok 2066 - is a valid object ok 2067 - $x = Math::BigInt->new("3"); $x->bceil(); ok 2068 - is a valid object ok 2069 - $x = Math::BigInt->new("abc"); $x->bceil(); ok 2070 - is a valid object ok 2071 - $x = Math::BigInt->new("NaN"); $x->bint(); ok 2072 - is a valid object ok 2073 - $x = Math::BigInt->new("+inf"); $x->bint(); ok 2074 - is a valid object ok 2075 - $x = Math::BigInt->new("-inf"); $x->bint(); ok 2076 - is a valid object ok 2077 - $x = Math::BigInt->new("0"); $x->bint(); ok 2078 - is a valid object ok 2079 - $x = Math::BigInt->new("-1"); $x->bint(); ok 2080 - is a valid object ok 2081 - $x = Math::BigInt->new("-2"); $x->bint(); ok 2082 - is a valid object ok 2083 - $x = Math::BigInt->new("2"); $x->bint(); ok 2084 - is a valid object ok 2085 - $x = Math::BigInt->new("3"); $x->bint(); ok 2086 - is a valid object ok 2087 - $x = Math::BigInt->new("128"); $x->to_hex(); ok 2088 - $x = Math::BigInt->new("-128"); $x->to_hex(); ok 2089 - $x = Math::BigInt->new("0"); $x->to_hex(); ok 2090 - $x = Math::BigInt->new("-0"); $x->to_hex(); ok 2091 - $x = Math::BigInt->new("1"); $x->to_hex(); ok 2092 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_hex(); ok 2093 - $x = Math::BigInt->new("+inf"); $x->to_hex(); ok 2094 - $x = Math::BigInt->new("-inf"); $x->to_hex(); ok 2095 - $x = Math::BigInt->new("NaNto_hex"); $x->to_hex(); ok 2096 - $x = Math::BigInt->new("128"); $x->to_oct(); ok 2097 - $x = Math::BigInt->new("-128"); $x->to_oct(); ok 2098 - $x = Math::BigInt->new("0"); $x->to_oct(); ok 2099 - $x = Math::BigInt->new("-0"); $x->to_oct(); ok 2100 - $x = Math::BigInt->new("1"); $x->to_oct(); ok 2101 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_oct(); ok 2102 - $x = Math::BigInt->new("0x123456789123456789"); $x->to_oct(); ok 2103 - $x = Math::BigInt->new("+inf"); $x->to_oct(); ok 2104 - $x = Math::BigInt->new("-inf"); $x->to_oct(); ok 2105 - $x = Math::BigInt->new("NaNto_oct"); $x->to_oct(); ok 2106 - $x = Math::BigInt->new("128"); $x->to_bin(); ok 2107 - $x = Math::BigInt->new("-128"); $x->to_bin(); ok 2108 - $x = Math::BigInt->new("0"); $x->to_bin(); ok 2109 - $x = Math::BigInt->new("-0"); $x->to_bin(); ok 2110 - $x = Math::BigInt->new("1"); $x->to_bin(); ok 2111 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->to_bin(); ok 2112 - $x = Math::BigInt->new("+inf"); $x->to_bin(); ok 2113 - $x = Math::BigInt->new("-inf"); $x->to_bin(); ok 2114 - $x = Math::BigInt->new("NaNto_bin"); $x->to_bin(); ok 2115 - $x = Math::BigInt->new("128"); $x->as_hex(); ok 2116 - $x = Math::BigInt->new("-128"); $x->as_hex(); ok 2117 - $x = Math::BigInt->new("0"); $x->as_hex(); ok 2118 - $x = Math::BigInt->new("-0"); $x->as_hex(); ok 2119 - $x = Math::BigInt->new("1"); $x->as_hex(); ok 2120 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_hex(); ok 2121 - $x = Math::BigInt->new("+inf"); $x->as_hex(); ok 2122 - $x = Math::BigInt->new("-inf"); $x->as_hex(); ok 2123 - $x = Math::BigInt->new("NaNas_hex"); $x->as_hex(); ok 2124 - $x = Math::BigInt->new("128"); $x->as_bin(); ok 2125 - $x = Math::BigInt->new("-128"); $x->as_bin(); ok 2126 - $x = Math::BigInt->new("0"); $x->as_bin(); ok 2127 - $x = Math::BigInt->new("-0"); $x->as_bin(); ok 2128 - $x = Math::BigInt->new("1"); $x->as_bin(); ok 2129 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_bin(); ok 2130 - $x = Math::BigInt->new("+inf"); $x->as_bin(); ok 2131 - $x = Math::BigInt->new("-inf"); $x->as_bin(); ok 2132 - $x = Math::BigInt->new("NaNas_bin"); $x->as_bin(); ok 2133 - $x = Math::BigInt->new("128"); $x->as_oct(); ok 2134 - $x = Math::BigInt->new("-128"); $x->as_oct(); ok 2135 - $x = Math::BigInt->new("0"); $x->as_oct(); ok 2136 - $x = Math::BigInt->new("-0"); $x->as_oct(); ok 2137 - $x = Math::BigInt->new("1"); $x->as_oct(); ok 2138 - $x = Math::BigInt->new("0b1010111101010101010110110110110110101"); $x->as_oct(); ok 2139 - $x = Math::BigInt->new("0x123456789123456789"); $x->as_oct(); ok 2140 - $x = Math::BigInt->new("+inf"); $x->as_oct(); ok 2141 - $x = Math::BigInt->new("-inf"); $x->as_oct(); ok 2142 - $x = Math::BigInt->new("NaNas_oct"); $x->as_oct(); ok 2143 - $z = 3.17 <= $y ok 2144 - the code "$z = 3.17 <= $y" issued no warning ok 2145 - $z = $y >= 3.17 ok 2146 - the code "$z = $y >= 3.17" issued no warning ok t/upgrade2.t .................. 1..1 ok 1 - sqrt on a big int does not segv if there are 2 upgrade levels ok t/upgradef.t .................. 1..6 ok 1 - Math::BigFloat->upgrade() ok 2 - Math::BigFloat->downgrade() ok 3 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); ref($z) ok 4 - $x = Math::BigFloat->new(123); $y = Math::BigFloat::Test->new(123); $z = $x->bmul($y); $z ok 5 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); ref($z) ok 6 - 123 = Math::BigFloat->new(123); 123 = Math::BigFloat::Test->new(123); $z = $x->badd($y); $z ok t/use.t ....................... 1..1 ok 1 - $x = Math::BigInt->new(1); ++$x; ok t/use_lib1.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok 2 - Math::BigFloat->new(123)->badd(123) ok t/use_lib2.t .................. 1..2 ok 1 - Math::BigInt->config('lib') ok 2 - Math::BigFloat->new(123)->badd(123) ok t/use_lib3.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok 2 - Math::BigFloat->new(123)->badd(123) ok t/use_lib4.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok 2 - Math::BigFloat->new(123)->badd(123) ok t/use_lib5.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok 2 - Math::BigFloat->new(123)->badd(123) ok t/use_lib6.t .................. 1..1 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 ok 1 - Math::BigInt->config('lib') ok t/use_mbfw.t .................. 1..2 # Math::BigInt::BareCalc v1.999803 using Math::BigInt::Calc v1.999838 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->{_a} ok 3016 - $x = Math::BigFloat->new(2); $x->bzero(); $x->{_p} ok 3017 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_a} ok 3018 - $x = Math::BigFloat->new(2); $x->binf(); $x->{_p} ok 3019 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_a} ok 3020 - $x = Math::BigFloat->new(2); $x->bone(); $x->{_p} ok 3021 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_a} ok 3022 - $x = Math::BigFloat->new(2); $x->bnan(); $x->{_p} 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; $x->copy()->bfround(-9); ok 3070 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y ok 3071 - $x = Math::BigFloat->new("2"); $y = Math::BigFloat->new("18.2"); $x <<= $y; $x->copy()->bfround(-9); $x >>= $y; $x ok All tests successful. Files=54, Tests=32454, 34 wallclock secs ( 3.75 usr 0.44 sys + 30.04 cusr 2.32 csys = 36.55 CPU) Result: PASS make[1]: Leaving directory '/build/libmath-bigint-perl-1.999838' create-stamp debian/debhelper-build-stamp dh_prep dh_auto_install --destdir=debian/libmath-bigint-perl/ make -j16 install DESTDIR=/build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl AM_UPDATE_INFO_DIR=no PREFIX=/usr make[1]: Entering directory '/build/libmath-bigint-perl-1.999838' Manifying 4 pod documents Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt.pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/perl5/Math/BigFloat.pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt/Lib.pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/perl5/Math/BigInt/Calc.pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt::Lib.3pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt::Calc.3pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigInt.3pm Installing /build/libmath-bigint-perl-1.999838/debian/libmath-bigint-perl/usr/share/man/man3/Math::BigFloat.3pm make[1]: Leaving directory '/build/libmath-bigint-perl-1.999838' 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_1.999838-1_all.deb'. dpkg-genbuildinfo --build=binary -O../libmath-bigint-perl_1.999838-1_amd64.buildinfo dpkg-genchanges --build=binary -O../libmath-bigint-perl_1.999838-1_amd64.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: including full source code in upload I: copying local configuration I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/3929730 and its subdirectories I: Current time: Fri Jun 21 21:05:33 -12 2024 I: pbuilder-time-stamp: 1719047133