R Under development (unstable) (2025-07-07 r88391 ucrt) -- "Unsuffered Consequences" Copyright (C) 2025 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > ####--------------- bd0() & ebd0() ------------------------------------------------ > ## > ## was 2nd part of ./stirlerr-tst.R > > require(DPQ) Loading required package: DPQ > for(pkg in c("Rmpfr", "DPQmpfr")) + if(!requireNamespace(pkg)) { + cat("no CRAN package", sQuote(pkg), " ---> no tests here.\n") + q("no") + } Loading required namespace: Rmpfr Loading required namespace: DPQmpfr > > n0 <- numeric() > stopifnot(identical(n0, dpois_raw(1, n0))) # gave an error before 2025-05-14 > > require("Rmpfr") Loading required package: Rmpfr Loading required package: gmp Attaching package: 'gmp' The following objects are masked from 'package:base': %*%, apply, crossprod, matrix, tcrossprod C code of R package 'Rmpfr': GMP using 64 bits per limb Attaching package: 'Rmpfr' The following object is masked from 'package:gmp': outer The following object is masked from 'package:DPQ': log1mexp The following objects are masked from 'package:stats': dbinom, dgamma, dnbinom, dnorm, dpois, dt, pgamma, pnorm The following objects are masked from 'package:base': cbind, pmax, pmin, rbind > options(warnPartialMatchArgs = FALSE) > > source(system.file(package="DPQ", "test-tools.R", mustWork=TRUE)) > ## => showProc.time(), ... list_() , loadList() , readRDS_() , save2RDS() > ##_ options(conflicts.policy = list(depends.ok=TRUE, error=FALSE, warn=FALSE)) > require(sfsmisc) # masking 'list_' *and* gmp's factorize(), is.whole() Loading required package: sfsmisc Attaching package: 'sfsmisc' The following object is masked _by_ '.GlobalEnv': list_ The following objects are masked from 'package:gmp': factorize, is.whole > ##_ options(conflicts.policy = NULL) > > pks <- c("sfsmisc", "DPQ", "Rmpfr", "DPQmpfr") > sapply(lapply(setNames(,pks), packageVersion), format) sfsmisc DPQ Rmpfr DPQmpfr "1.1.20" "0.6.0" "1.1.0" "0.3.3" > > showProc.time() Time (user system elapsed): 0 0 0 > (doExtras <- DPQ:::doExtras() && !grepl("valgrind", R.home())) [1] FALSE > > ## ebd0 constants: the column sums of "bd0_scale": log(n / 1024) for all these n > ## ---- according to the *comments* in the C code -- so here I test that at least the *sums* are correct > bd0.n <- c(2048,2032,2016,2001,1986,1971,1956,1942,1928,1913,1900,1886,1872,1859, + 1846,1833,1820,1808,1796,1783,1771,1759,1748,1736,1725,1713,1702,1691, + 1680,1670,1659,1649,1638,1628,1618,1608,1598,1589,1579,1570,1560,1551, + 1542,1533,1524,1515,1507,1498,1489,1481,1473,1464,1456,1448,1440,1432, + 1425,1417,1409,1402,1394,1387,1380,1372,1365,1358,1351,1344,1337,1331, + 1324,1317,1311,1304,1298,1291,1285,1279,1273,1266,1260,1254,1248,1242, + 1237,1231,1225,1219,1214,1208,1202,1197,1192,1186,1181,1176,1170,1165, + 1160,1155,1150,1145,1140,1135,1130,1125,1120,1116,1111,1106,1101,1097, + 1092,1088,1083,1079,1074,1070,1066,1061,1057,1053,1049,1044,1040,1036, + 1032,1028,1024) > > stopifnot( + all.equal(bd0.n, + 1024 * exp(colSums(DPQ:::logf_mat))) + ) ## on lynne (64-bit, Fedora 32, 2021) they are even *identical* > identical(bd0.n, 1024 * exp(colSums(DPQ:::logf_mat))) # amazingly to me [1] TRUE > > ## Also, the numbers themselves decrease monotonely, > ## their differences are close to, but *not* monotone: > diff(bd0.n) # -16 -16 -15 -15 -15 -15 -14 -14 -15 -13 -14 ... [1] -16 -16 -15 -15 -15 -15 -14 -14 -15 -13 -14 -14 -13 -13 -13 -13 -12 -12 [19] -13 -12 -12 -11 -12 -11 -12 -11 -11 -11 -10 -11 -10 -11 -10 -10 -10 -10 [37] -9 -10 -9 -10 -9 -9 -9 -9 -9 -8 -9 -9 -8 -8 -9 -8 -8 -8 [55] -8 -7 -8 -8 -7 -8 -7 -7 -8 -7 -7 -7 -7 -7 -6 -7 -7 -6 [73] -7 -6 -7 -6 -6 -6 -7 -6 -6 -6 -6 -5 -6 -6 -6 -5 -6 -6 [91] -5 -5 -6 -5 -5 -6 -5 -5 -5 -5 -5 -5 -5 -5 -5 -5 -4 -5 [109] -5 -5 -4 -5 -4 -5 -4 -5 -4 -4 -5 -4 -4 -4 -5 -4 -4 -4 [127] -4 -4 > # ^^^^^^^^^^^^^^ (etc) > > do.pdf <- TRUE > do.pdf <- !dev.interactive(orNone = TRUE) > do.pdf [1] TRUE > if(do.pdf) { pdf.options(width = 9, height = 6.5)# for all {9/6.5 = 1.38 ; 4/3 < 1.38 < sqrt(2) [A4] + pdf("diff-bd0_tab.pdf") + } > > plot(diff(bd0.n), type="b") > c2 <- adjustcolor(2, 1/2) > par(new=TRUE) > plot(diff(bd0.n, differences = 2), type="b", col=c2, axes=FALSE, ann=FALSE) > axis(4, at=-1:2, col=c2, col.axis=c2) > > showProc.time() Time (user system elapsed): 0.05 0.02 0.06 > > > ## use functionality originally in ~/R/MM/NUMERICS/dpq-functions/15628-dpois_raw_accuracy.R > ## now -- require(Rmpfr) > > > ## transition till DPQmpfr exports this *and* that version is on CRAN, to ease maintainer("DPQ"): > ## vvvvvvvvvvvvvvvvvvvvvvvvvvv DPQmpfr 0.3-3 has, but does *not* export dpoisEr() > if(file.exists(ff <- "~/R/Pkgs/DPQmpfr/R/dpoisEr.R")) withAutoprint({ #------------- + + source(ff) + str(dpoisEr) # ==> prBits = 1536 __large__ default: found that 256 was too small for lambda = 1e100 (??) + ## but should prBits not depend on lambda + + ##-- ----- *or* move to vignette ../vignettes/log1pmx-etc.Rnw <<<<<<<<<<<<<<< + + ##-------- small lambda --- is dpois_simpl0() good ? + + range(dpE40 <- dpoisEr(40.25, x=0:200)) # integer only: dpois(x, ..) is 0 for non-int !!! + ## -2.442882e-16 3.645529e-16 was -4.401959e-16 3.645529e-16 + str(attributes(dpE40)) + p.dpoisEr(dpE40) # showing errors to be small, as w/ range(..) above + + ## dpois_simpl0() uses "old" direct formula on original scale: factorial(x) + stopifnot(factorial(170) < Inf, + factorial(171) == Inf) + xS <- 0:170 # the full range of "sensible" x values for dpois_simpl0 + range(dpE40simpl <- dpoisEr(40.25, x=xS, dpoisFUN = dpois_simpl0)) + str(attributes(dpE40simpl)) + + ## -1.299950e-13 1.118291e-13 + p.dpoisEr(dpE40simpl) + ## --> suprising: errors are *very* small up to x <= 49, then in in the order of 1e-13 + ## zoom in [y- range only] + p.dpoisEr(dpE40simpl, ylim = c(-1,1)*4e-16) + + ## zoom into small x --- integer x only: + range(dpE40simpl2 <- dpoisEr(40.25, x=0:49, dpoisFUN = dpois_simpl0)) + ## -2.889661e-16 2.076597e-16 + p.dpoisEr(dpE40simpl2) # --- almost all in [-eps, +eps] + + ## zoom into small x and use non-integer x: + range(dpE40simpl2d <- dpoisEr(40.25, x=seq(0, 49, by=1/8), dpoisFUN = dpois_simpl0)) + ## [1] -3.861877e-14 3.080750e-14 == Oops ! blown up to + p.dpoisEr(dpE40simpl2d) + + }) > > ### MM: moved much of this to Rmpfr vignette: > ### > " ~/R/D/R-forge/Rmpfr/pkg/vignettes/gamma-inaccuracy.Rnw " [1] " ~/R/D/R-forge/Rmpfr/pkg/vignettes/gamma-inaccuracy.Rnw " > ##~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ > ## and the R code actually to the R script, also pkg {Rmpfr} > " ~/R/Pkgs/Rmpfr/vignettes/gamma-inaccuracy_R/plot-factErr-def.R " [1] " ~/R/Pkgs/Rmpfr/vignettes/gamma-inaccuracy_R/plot-factErr-def.R " > ##=======> gamma(x) itself suffers from the fact that exp(y) has a *large* relative error, > ## -------- when |y| ~ 100 or so, more specifically, the > ## relative error of exp(y) = |y| * {rel.err(y)} , since > ## exp(((1+ eps)*y) = exp(y) * exp(eps*y) >= exp(y) (1 + eps*y) and indeed, > ## the inaccuracy of y (i.e. eps) is blown up by a factor |y| which is not small here! > > > ## close to over-/underflow ------- > > ### Large lambda == np == M ------- > > if(do.pdf) { dev.off(); pdf("bd0-ebd0.pdf") } > > ##-- TODO ----- *or* move to vignette ---> ../vi??????????? > > LL <- 1e20 > dput(x1 <- 1e20 - 2e11) # 9.99999998e+19 9.99999998e+19 > > (P1 <- dpois (x1, LL)) # was 3.989455e-11; now 5.520993e-98 [1] 5.520993e-98 > (P1m <- Rmpfr::dpois(mpfr(x1, 128), LL)) # 5.52099285934214335003128935..e-98 1 'mpfr' number of precision 128 bits [1] 5.520992859342143350031289352677120249641e-98 > ## However -- the ebd0() version > (P1e <- dpois_raw(x1, LL, version="ebd0_v1"))## was 3.989455e-11, but now good! [1] 5.520993e-98 > asNumeric(relErr(P1m, P1)) # 3.218894e-14 [1] 3.218894e-14 > asNumeric(relErr(P1m, P1e)) # 3.218894e-14 -- the same, as R's dpois() now *does* ebd0 [1] 3.218894e-14 > stopifnot(exprs = { + all.equal(P1 , 5.520992859342e-98, tol=1e-12) + all.equal(P1e, P1, tol=1e-12) + all.equal(P1m, P1, tol=1e-12) + }) > > options(digits = 9) > > ## indeed: regular bd0() works "ok" ... and ebd0() now does, too > (bd.1 <- bd0(x1, LL, verbose=2)) bd0(1e+20, 1e+20): T.series w/ 2 terms -> bd0=200 [1] 199.999992 > ## bd0(1e+20, 1e+20): T.series w/ 2 terms -> bd0=200 > ## [1] 200 > (bd.1M <- bd0(x1, mpfr(LL, 128), verbose=2)) # we checked, 128 is sufficient bd0(1e+20, 1e+20): T.series w/ 3 terms -> bd0=200 1 'mpfr' number of precision 128 bits [1] 199.9999919413334091607468236761591740489 > ## bd0(1e+20, 1e+20): T.series w/ 3 terms -> bd0=200 > ## ---> 199.9999919413334091607468236761591740489 > asNumeric(bd.1 / bd.1M - 1)# -1.82e-17 -- suggests bd0() is really accurate here [1] -1.8200191e-17 > stopifnot(abs(bd.1 / bd.1M - 1) < 3e-16, + all.equal(199.999991941333, bd.1, tolerance=1e-14)) > > (ebd1 <- sum((ebd.1 <- ebd0(x1, LL, verbose=TRUE))))# fixed since June 6, 2021 ebd0(x=1e+20, M=1e+20): M/x = (r=0.500000001) * 2^(e=1); i=0, f=2048, fg=f*2^-(e+10)=1 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 1.99999996304e-09 1a. before adding -x * log1pmx(.) = -x * -2e-18 = 200 1. after A.(-x*l..): yl,yh = ( -8.05867e-06, 200); yl+yh= 200 ___ fg = 1 ___ skipping further steps [1] 199.999992 > asNumeric(relErr(bd.1M, ebd1)) # 1.603e-16 ... ebd0() slightly *less* accurate than bd0() !! [1] 1.60308744e-16 > > > showProc.time() Time (user system elapsed): 0.09 0.01 0.11 > > ### Large x -- small np == M ------------------------------------ > > mpfrPrec <- 1024 > mpfrPrec <- 256 > > yy <- bd0 (1e307, 10^(-5:1), verbose=TRUE) bd0(x=1e+307, np=1e-05): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=0.0001): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=0.001): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=0.01): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=0.1): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=10): |x-np| not too "small" -> direct formula > yhl <- ebd0 (1e307, 10^(-5:1), verbose=TRUE) ebd0(x=1e+307, M=1e-05): M/x = (r=0.736335108038475) * 2^(e=-1036); i=61, f=1387, fg=f*2^-(e+10)=Inf --> fg = +Inf --> return( +Inf ) ebd0(x=1e+307, M=0.0001): M/x = (r=0.920418885049457) * 2^(e=-1033); i=108, f=1111, fg=f*2^-(e+10)=Inf --> fg = +Inf --> return( +Inf ) ebd0(x=1e+307, M=0.001): M/x = (r=0.575261803155939) * 2^(e=-1029); i=19, f=1783, fg=f*2^-(e+10)=Inf --> fg = +Inf --> return( +Inf ) ebd0(x=1e+307, M=0.01): M/x = (r=0.719077253944928) * 2^(e=-1026); i=56, f=1425, fg=f*2^-(e+10)=Inf --> fg = +Inf --> return( +Inf ) ebd0(x=1e+307, M=0.1): M/x = (r=0.898846567431158) * 2^(e=-1023); i=102, f=1140, fg=f*2^-(e+10)=1.00067e+308 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006690301479688298 1a. before adding -x * log1pmx(.) = -x * -2.23701e-07 = 2.23701e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.23701e+300); yl+yh= 2.23701e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=1): M/x = (r=0.561779104644474) * 2^(e=-1019); i=16, f=1820, fg=f*2^-(e+10)=9.98475e+306 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=10): M/x = (r=0.702223880805592) * 2^(e=-1016); i=52, f=1456, fg=f*2^-(e+10)=9.98475e+305 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.351976 2.85039e-08 -9.56643e-16 -6.4096e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.51978e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) > yhlC<- ebd0C(1e307, 10^(-5:1)) ## newly returns data.frame > stopifnot(yy == Inf, yhl$yh == Inf, yhlC == yhl) > yM <- bd0(mpfr(1e307, mpfrPrec), 10^(-5:1)) > roundMpfr(range(yM), 12) ## 7.0363e+309 7.1739e+309 -- *are* larger than DBL_MAX 2 'mpfr' numbers of precision 12 bits [1] 7.0363e+309 7.1739e+309 > > > ### Now *BOTH* x and lambda are large : --------------------------------------- > > ##' lseq()--like sequence of length ~= n2ex around "round(x)" to use as `np` in bd0(x, np) > np_bd0 <- function(x, rnd.N = 256, ex2M = 2, n2ex = 256) { + stopifnot(is.numeric(x), x >= 0, length(x) == 1L) + l2x <- round(rnd.N*log2(x))/rnd.N + ## 2 ^ seq() i.e., lseq()--like: + 2^(l2x + seq(-ex2M, ex2M, by=1/(n2ex/2/ex2M))) + } > > ## (FIXME?? Small loss for ebd0, see below) <<< ??? > ## is bd0(, *) really accurate --- (currently, it seems even precBits = 128 is fine) > ## it uses it's own convergent series approximation for |x-np| < .. ???? > > ##' Compute relative errors (wrt MPFR) for "many" bd0() versions > ##' @title > ##' @param x, np main arguments for computing bd0*(x, np) = D_0(x, np) == D_0(x, M) > ##' @param mpfrPrec positive integer, typically >= 64, `precBits` bit precision for mpfr-number arithmetic > ##' @param delta > ##' @param tol_logcf > ##' @param ... > ##' @param chkVerb logical, TRUE by default, indicating if some checking + verbosity should happen > ##' @param keepMpfr logical, FALSE by default, indication if full precision mpfr result should be storted > ##' @return a \code{list()}, .. > ##' @author Martin Maechler > bd0ver <- function(x, np = np_bd0(x), mpfrPrec, delta = 0.1, tol_logcf = 1e-14, ..., + chkVerb=TRUE, keepMpfr=FALSE) { ### passed to log1pmx() + stopifnot(length(mpfrPrec <- as.integer(mpfrPrec)) == 1, + !is.na(mpfrPrec), mpfrPrec >= 64, + x >= 0, np >= 0) + yy <- cbind(bd0 = bd0 (x, np, delta = delta), + bd0.l = bd0_l1pm (x, np, tol_logcf=tol_logcf, ...), + bd0.p1l1 = bd0_p1l1 (x, np, tol_logcf=tol_logcf, ...), + bd0.p1.d = bd0_p1l1d (x, np, tol_logcf=tol_logcf, ...), + bd0.p1.d1= bd0_p1l1d1(x, np, tol_logcf=tol_logcf, ...)) + yhl <- ebd0 (x, np) + yhlC <- ebd0C(x, np) + if(chkVerb) { + yhl. <- ebd0 (x, np, verbose=TRUE) + yhlC. <- ebd0C(x, np, verbose=TRUE) + stopifnot(identical(yhl., yhl), + identical(yhlC., yhlC)) + } + epsC <- .Machine$double.eps + aeq0 <- all.equal(yhl, yhlC, tol = 0) + aeq4 <- all.equal(yhl, yhlC, tol = 4*epsC) + if(!isTRUE(aeq4)) warning("the C and R versions of ebd0() differ:", aeq4) + stopifnot(is.whole(yhl [["yh"]]), + is.whole(yhlC[["yh"]])) + yM <- bd0(mpfr(x, mpfrPrec), + mpfr(np,mpfrPrec), verbose=chkVerb)# more accurate ! (?? always ??) + relE <- relErrV(target = yM, # the mpfr one + cbind(ebd0 = yhl [["yh"]] + yhl [["yl"]], + ebd0C= yhlC[["yh"]] + yhlC[["yl"]], + yy)) + relE <- structure(asNumeric(relE), dim=dim(relE), dimnames=dimnames(relE)) + ## return: + list(x=x, np=np, delta = delta, bd0=yy, ebd0=yhl, ebd0C=yhlC, + bd0M=if(keepMpfr) yM, # <- expensive + aeq0=aeq0, aeq4=aeq4, relE = relE) + } > > x. <- 1e307 > cbind(log10.M=300:308, ebd0(x., 10^(300:308))) # yl are all 0 ; and bd0(x.,x.) = 0 log10.M yh yl 1 300 1.51180958e+308 0 2 301 1.28155116e+308 0 3 302 1.05129355e+308 0 4 303 8.21044037e+307 0 5 304 5.90875528e+307 0 6 305 3.61517019e+307 0 7 306 1.40258509e+307 0 8 307 0.00000000e+00 0 9 308 6.69741491e+307 0 > > bd0v.7 <- bd0ver(x., mpfrPrec = 128, chkVerb = FALSE) > > bd0v.10 <- bd0ver(x., mpfrPrec = 1024) ebd0(x=1e+307, M=2.50018e+306): M/x = (r=0.500036779596429) * 2^(e=-1); i=0, f=2048, fg=f*2^-(e+10)=4 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=2: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=3: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=4: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 1.63631e+307); yl+yh= 1.63631e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.36239e+306); yl+yh= 6.36239e+306 ebd0(x=1e+307, M=2.52741e+306): M/x = (r=0.505481823125825) * 2^(e=-1); i=1, f=2032, fg=f*2^-(e+10)=3.96875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=2: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=3: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=4: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 3. after ADD1(M): yl,yh = ( 0, 1.6312e+307); yl+yh= 1.6312e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.28131e+306); yl+yh= 6.28131e+306 ebd0(x=1e+307, M=2.55493e+306): M/x = (r=0.510986159291777) * 2^(e=-1); i=3, f=2001, fg=f*2^-(e+10)=3.9082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=2: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=3: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=4: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 3. after ADD1(M): yl,yh = ( 0, 1.61857e+307); yl+yh= 1.61857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.20053e+306); yl+yh= 6.20053e+306 ebd0(x=1e+307, M=2.58275e+306): M/x = (r=0.516550433748765) * 2^(e=-1); i=4, f=1986, fg=f*2^-(e+10)=3.87891 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=2: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=3: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=4: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 3. after ADD1(M): yl,yh = ( 0, 1.61383e+307); yl+yh= 1.61383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.12005e+306); yl+yh= 6.12005e+306 ebd0(x=1e+307, M=2.61088e+306): M/x = (r=0.522175299181986) * 2^(e=-1); i=6, f=1956, fg=f*2^-(e+10)=3.82031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=2: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=3: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=4: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 3. after ADD1(M): yl,yh = ( 0, 1.60142e+307); yl+yh= 1.60142e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.03987e+306); yl+yh= 6.03987e+306 ebd0(x=1e+307, M=2.63931e+306): M/x = (r=0.52786141538391) * 2^(e=-1); i=7, f=1942, fg=f*2^-(e+10)=3.79297 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=2: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=3: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=4: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 3. after ADD1(M): yl,yh = ( 0, 1.59708e+307); yl+yh= 1.59708e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.95999e+306); yl+yh= 5.95999e+306 ebd0(x=1e+307, M=2.66805e+306): M/x = (r=0.533609449331681) * 2^(e=-1); i=9, f=1913, fg=f*2^-(e+10)=3.73633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=2: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=3: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=4: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 3. after ADD1(M): yl,yh = ( 0, 1.58491e+307); yl+yh= 1.58491e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.88043e+306); yl+yh= 5.88043e+306 ebd0(x=1e+307, M=2.6971e+306): M/x = (r=0.539420075265344) * 2^(e=-1); i=10, f=1900, fg=f*2^-(e+10)=3.71094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=2: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=3: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=4: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 3. after ADD1(M): yl,yh = ( 0, 1.58099e+307); yl+yh= 1.58099e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.80118e+306); yl+yh= 5.80118e+306 ebd0(x=1e+307, M=2.72647e+306): M/x = (r=0.545293974766939) * 2^(e=-1); i=12, f=1872, fg=f*2^-(e+10)=3.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=2: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=3: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=4: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 3. after ADD1(M): yl,yh = ( 0, 1.56909e+307); yl+yh= 1.56909e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.72224e+306); yl+yh= 5.72224e+306 ebd0(x=1e+307, M=2.75616e+306): M/x = (r=0.551231836840444) * 2^(e=-1); i=13, f=1859, fg=f*2^-(e+10)=3.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=2: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=3: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=4: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 3. after ADD1(M): yl,yh = ( 0, 1.56509e+307); yl+yh= 1.56509e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.64363e+306); yl+yh= 5.64363e+306 ebd0(x=1e+307, M=2.78617e+306): M/x = (r=0.557234357992604) * 2^(e=-1); i=15, f=1833, fg=f*2^-(e+10)=3.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=2: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=3: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=4: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 3. after ADD1(M): yl,yh = ( 0, 1.55401e+307); yl+yh= 1.55401e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.56534e+306); yl+yh= 5.56534e+306 ebd0(x=1e+307, M=2.81651e+306): M/x = (r=0.563302242314621) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=4: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54992e+307); yl+yh= 1.54992e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.48737e+306); yl+yh= 5.48737e+306 ebd0(x=1e+307, M=2.84718e+306): M/x = (r=0.56943620156475) * 2^(e=-1); i=18, f=1796, fg=f*2^-(e+10)=3.50781 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=2: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=3: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=4: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 3. after ADD1(M): yl,yh = ( 0, 1.53971e+307); yl+yh= 1.53971e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.40974e+306); yl+yh= 5.40974e+306 ebd0(x=1e+307, M=2.87818e+306): M/x = (r=0.575636955251782) * 2^(e=-1); i=19, f=1783, fg=f*2^-(e+10)=3.48242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=2: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=3: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=4: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 3. after ADD1(M): yl,yh = ( 0, 1.53555e+307); yl+yh= 1.53555e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.33244e+306); yl+yh= 5.33244e+306 ebd0(x=1e+307, M=2.90953e+306): M/x = (r=0.581905230719448) * 2^(e=-1); i=21, f=1759, fg=f*2^-(e+10)=3.43555 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=2: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=3: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=4: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 3. after ADD1(M): yl,yh = ( 0, 1.52513e+307); yl+yh= 1.52513e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.25547e+306); yl+yh= 5.25547e+306 ebd0(x=1e+307, M=2.94121e+306): M/x = (r=0.588241763231733) * 2^(e=-1); i=23, f=1736, fg=f*2^-(e+10)=3.39062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=2: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=3: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=4: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 3. after ADD1(M): yl,yh = ( 0, 1.51514e+307); yl+yh= 1.51514e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.17885e+306); yl+yh= 5.17885e+306 ebd0(x=1e+307, M=2.97324e+306): M/x = (r=0.59464729605912) * 2^(e=-1); i=24, f=1725, fg=f*2^-(e+10)=3.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=2: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=3: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=4: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 3. after ADD1(M): yl,yh = ( 0, 1.51198e+307); yl+yh= 1.51198e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10258e+306); yl+yh= 5.10258e+306 ebd0(x=1e+307, M=3.00561e+306): M/x = (r=0.601122580565778) * 2^(e=-1); i=26, f=1702, fg=f*2^-(e+10)=3.32422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=2: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=3: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=4: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 3. after ADD1(M): yl,yh = ( 0, 1.5018e+307); yl+yh= 1.5018e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.02665e+306); yl+yh= 5.02665e+306 ebd0(x=1e+307, M=3.03834e+306): M/x = (r=0.607668376297695) * 2^(e=-1); i=28, f=1680, fg=f*2^-(e+10)=3.28125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=2: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=3: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=4: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 3. after ADD1(M): yl,yh = ( 0, 1.49206e+307); yl+yh= 1.49206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.95107e+306); yl+yh= 4.95107e+306 ebd0(x=1e+307, M=3.07143e+306): M/x = (r=0.614285451071773) * 2^(e=-1); i=29, f=1670, fg=f*2^-(e+10)=3.26172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=2: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=3: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=4: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 3. after ADD1(M): yl,yh = ( 0, 1.4894e+307); yl+yh= 1.4894e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.87585e+306); yl+yh= 4.87585e+306 ebd0(x=1e+307, M=3.10487e+306): M/x = (r=0.620974581065892) * 2^(e=-1); i=31, f=1649, fg=f*2^-(e+10)=3.2207 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=2: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=3: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=4: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 3. after ADD1(M): yl,yh = ( 0, 1.48009e+307); yl+yh= 1.48009e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.801e+306); yl+yh= 4.801e+306 ebd0(x=1e+307, M=3.13868e+306): M/x = (r=0.627736550909953) * 2^(e=-1); i=33, f=1628, fg=f*2^-(e+10)=3.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=2: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=3: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=4: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 3. after ADD1(M): yl,yh = ( 0, 1.47065e+307); yl+yh= 1.47065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7265e+306); yl+yh= 4.7265e+306 ebd0(x=1e+307, M=3.17286e+306): M/x = (r=0.634572153777919) * 2^(e=-1); i=34, f=1618, fg=f*2^-(e+10)=3.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=2: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=3: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=4: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 3. after ADD1(M): yl,yh = ( 0, 1.46791e+307); yl+yh= 1.46791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.65238e+306); yl+yh= 4.65238e+306 ebd0(x=1e+307, M=3.20741e+306): M/x = (r=0.641482191480851) * 2^(e=-1); i=36, f=1598, fg=f*2^-(e+10)=3.12109 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=2: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=3: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=4: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 3. after ADD1(M): yl,yh = ( 0, 1.45893e+307); yl+yh= 1.45893e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.57862e+306); yl+yh= 4.57862e+306 ebd0(x=1e+307, M=3.24234e+306): M/x = (r=0.648467474560957) * 2^(e=-1); i=38, f=1579, fg=f*2^-(e+10)=3.08398 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=2: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=3: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=4: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 3. after ADD1(M): yl,yh = ( 0, 1.45046e+307); yl+yh= 1.45046e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.50524e+306); yl+yh= 4.50524e+306 ebd0(x=1e+307, M=3.27764e+306): M/x = (r=0.655528822386676) * 2^(e=-1); i=40, f=1560, fg=f*2^-(e+10)=3.04688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=2: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=3: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=4: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 3. after ADD1(M): yl,yh = ( 0, 1.44188e+307); yl+yh= 1.44188e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43225e+306); yl+yh= 4.43225e+306 ebd0(x=1e+307, M=3.31334e+306): M/x = (r=0.662667063248778) * 2^(e=-1); i=42, f=1542, fg=f*2^-(e+10)=3.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=2: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=3: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=4: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 3. after ADD1(M): yl,yh = ( 0, 1.43385e+307); yl+yh= 1.43385e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.35963e+306); yl+yh= 4.35963e+306 ebd0(x=1e+307, M=3.34942e+306): M/x = (r=0.669883034457535) * 2^(e=-1); i=43, f=1533, fg=f*2^-(e+10)=2.99414 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=2: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=3: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=4: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 3. after ADD1(M): yl,yh = ( 0, 1.4316e+307); yl+yh= 1.4316e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.28741e+306); yl+yh= 4.28741e+306 ebd0(x=1e+307, M=3.38589e+306): M/x = (r=0.677177582440924) * 2^(e=-1); i=45, f=1515, fg=f*2^-(e+10)=2.95898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=2: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=3: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=4: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 3. after ADD1(M): yl,yh = ( 0, 1.42344e+307); yl+yh= 1.42344e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.21558e+306); yl+yh= 4.21558e+306 ebd0(x=1e+307, M=3.42276e+306): M/x = (r=0.684551562843922) * 2^(e=-1); i=47, f=1498, fg=f*2^-(e+10)=2.92578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=2: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=3: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=4: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 3. after ADD1(M): yl,yh = ( 0, 1.41584e+307); yl+yh= 1.41584e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14414e+306); yl+yh= 4.14414e+306 ebd0(x=1e+307, M=3.46003e+306): M/x = (r=0.692005840628868) * 2^(e=-1); i=49, f=1481, fg=f*2^-(e+10)=2.89258 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=2: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=3: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=4: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 3. after ADD1(M): yl,yh = ( 0, 1.40815e+307); yl+yh= 1.40815e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.07311e+306); yl+yh= 4.07311e+306 ebd0(x=1e+307, M=3.49771e+306): M/x = (r=0.699541290176923) * 2^(e=-1); i=51, f=1464, fg=f*2^-(e+10)=2.85938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=2: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=3: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=4: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 3. after ADD1(M): yl,yh = ( 0, 1.40037e+307); yl+yh= 1.40037e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.00248e+306); yl+yh= 4.00248e+306 ebd0(x=1e+307, M=3.53579e+306): M/x = (r=0.707158795390635) * 2^(e=-1); i=53, f=1448, fg=f*2^-(e+10)=2.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=2: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=3: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=4: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 3. after ADD1(M): yl,yh = ( 0, 1.39319e+307); yl+yh= 1.39319e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.93227e+306); yl+yh= 3.93227e+306 ebd0(x=1e+307, M=3.5743e+306): M/x = (r=0.71485924979762) * 2^(e=-1); i=55, f=1432, fg=f*2^-(e+10)=2.79688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=2: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=3: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=4: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 3. after ADD1(M): yl,yh = ( 0, 1.38593e+307); yl+yh= 1.38593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.86246e+306); yl+yh= 3.86246e+306 ebd0(x=1e+307, M=3.61322e+306): M/x = (r=0.72264355665537) * 2^(e=-1); i=57, f=1417, fg=f*2^-(e+10)=2.76758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=2: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=3: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=4: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 3. after ADD1(M): yl,yh = ( 0, 1.37929e+307); yl+yh= 1.37929e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.79308e+306); yl+yh= 3.79308e+306 ebd0(x=1e+307, M=3.65256e+306): M/x = (r=0.730512629057209) * 2^(e=-1); i=59, f=1402, fg=f*2^-(e+10)=2.73828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=2: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=3: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=4: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 3. after ADD1(M): yl,yh = ( 0, 1.37259e+307); yl+yh= 1.37259e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.72412e+306); yl+yh= 3.72412e+306 ebd0(x=1e+307, M=3.69234e+306): M/x = (r=0.738467390039392) * 2^(e=-1); i=61, f=1387, fg=f*2^-(e+10)=2.70898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=2: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=3: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=4: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 3. after ADD1(M): yl,yh = ( 0, 1.36581e+307); yl+yh= 1.36581e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.65559e+306); yl+yh= 3.65559e+306 ebd0(x=1e+307, M=3.73254e+306): M/x = (r=0.746508772689384) * 2^(e=-1); i=63, f=1372, fg=f*2^-(e+10)=2.67969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=2: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=3: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=4: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 3. after ADD1(M): yl,yh = ( 0, 1.35895e+307); yl+yh= 1.35895e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.58749e+306); yl+yh= 3.58749e+306 ebd0(x=1e+307, M=3.77319e+306): M/x = (r=0.754637720255303) * 2^(e=-1); i=65, f=1358, fg=f*2^-(e+10)=2.65234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=2: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=3: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=4: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 3. after ADD1(M): yl,yh = ( 0, 1.35276e+307); yl+yh= 1.35276e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.51984e+306); yl+yh= 3.51984e+306 ebd0(x=1e+307, M=3.81428e+306): M/x = (r=0.762855186256566) * 2^(e=-1); i=67, f=1344, fg=f*2^-(e+10)=2.625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=2: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=3: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=4: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 3. after ADD1(M): yl,yh = ( 0, 1.34651e+307); yl+yh= 1.34651e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.45262e+306); yl+yh= 3.45262e+306 ebd0(x=1e+307, M=3.85581e+306): M/x = (r=0.771162134595737) * 2^(e=-1); i=69, f=1331, fg=f*2^-(e+10)=2.59961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=2: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=3: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=4: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 3. after ADD1(M): yl,yh = ( 0, 1.34095e+307); yl+yh= 1.34095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.38585e+306); yl+yh= 3.38585e+306 ebd0(x=1e+307, M=3.8978e+306): M/x = (r=0.77955953967159) * 2^(e=-1); i=72, f=1311, fg=f*2^-(e+10)=2.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=2: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=3: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=4: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 3. after ADD1(M): yl,yh = ( 0, 1.33e+307); yl+yh= 1.33e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.31953e+306); yl+yh= 3.31953e+306 ebd0(x=1e+307, M=3.94024e+306): M/x = (r=0.788048386493405) * 2^(e=-1); i=74, f=1298, fg=f*2^-(e+10)=2.53516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=2: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=3: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=4: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 3. after ADD1(M): yl,yh = ( 0, 1.32428e+307); yl+yh= 1.32428e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.25367e+306); yl+yh= 3.25367e+306 ebd0(x=1e+307, M=3.98315e+306): M/x = (r=0.796629670796513) * 2^(e=-1); i=76, f=1285, fg=f*2^-(e+10)=2.50977 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=2: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=3: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=4: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 3. after ADD1(M): yl,yh = ( 0, 1.3185e+307); yl+yh= 1.3185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.18827e+306); yl+yh= 3.18827e+306 ebd0(x=1e+307, M=4.02652e+306): M/x = (r=0.805304399159088) * 2^(e=-1); i=78, f=1273, fg=f*2^-(e+10)=2.48633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=2: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=3: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=4: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 3. after ADD1(M): yl,yh = ( 0, 1.31346e+307); yl+yh= 1.31346e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.12334e+306); yl+yh= 3.12334e+306 ebd0(x=1e+307, M=4.07037e+306): M/x = (r=0.814073589120224) * 2^(e=-1); i=80, f=1260, fg=f*2^-(e+10)=2.46094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=2: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=3: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=4: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 3. after ADD1(M): yl,yh = ( 0, 1.30758e+307); yl+yh= 1.30758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05888e+306); yl+yh= 3.05888e+306 ebd0(x=1e+307, M=4.11469e+306): M/x = (r=0.822938269299289) * 2^(e=-1); i=83, f=1242, fg=f*2^-(e+10)=2.42578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=2: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=3: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=4: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 3. after ADD1(M): yl,yh = ( 0, 1.29762e+307); yl+yh= 1.29762e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.9949e+306); yl+yh= 2.9949e+306 ebd0(x=1e+307, M=4.1595e+306): M/x = (r=0.83189947951658) * 2^(e=-1); i=85, f=1231, fg=f*2^-(e+10)=2.4043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, 8.77257e+306); yl+yh= 8.77257e+306 j=2: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=3: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=4: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 3. after ADD1(M): yl,yh = ( 0, 1.29321e+307); yl+yh= 1.29321e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.93141e+306); yl+yh= 2.93141e+306 ebd0(x=1e+307, M=4.20479e+306): M/x = (r=0.840958270915297) * 2^(e=-1); i=87, f=1219, fg=f*2^-(e+10)=2.38086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=2: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=3: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=4: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 3. after ADD1(M): yl,yh = ( 0, 1.28794e+307); yl+yh= 1.28794e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.8684e+306); yl+yh= 2.8684e+306 ebd0(x=1e+307, M=4.25058e+306): M/x = (r=0.850115706084837) * 2^(e=-1); i=90, f=1202, fg=f*2^-(e+10)=2.34766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=2: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=3: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=4: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 3. after ADD1(M): yl,yh = ( 0, 1.27848e+307); yl+yh= 1.27848e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.80588e+306); yl+yh= 2.80588e+306 ebd0(x=1e+307, M=4.29686e+306): M/x = (r=0.859372859185438) * 2^(e=-1); i=92, f=1192, fg=f*2^-(e+10)=2.32812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=2: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=3: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=4: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 3. after ADD1(M): yl,yh = ( 0, 1.27475e+307); yl+yh= 1.27475e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.74386e+306); yl+yh= 2.74386e+306 ebd0(x=1e+307, M=4.34365e+306): M/x = (r=0.868730816074176) * 2^(e=-1); i=94, f=1181, fg=f*2^-(e+10)=2.30664 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=2: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=3: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=4: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 3. after ADD1(M): yl,yh = ( 0, 1.27016e+307); yl+yh= 1.27016e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.68235e+306); yl+yh= 2.68235e+306 ebd0(x=1e+307, M=4.39095e+306): M/x = (r=0.878190674432335) * 2^(e=-1); i=97, f=1165, fg=f*2^-(e+10)=2.27539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=2: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=3: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=4: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 3. after ADD1(M): yl,yh = ( 0, 1.26125e+307); yl+yh= 1.26125e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62134e+306); yl+yh= 2.62134e+306 ebd0(x=1e+307, M=4.43877e+306): M/x = (r=0.887753543894164) * 2^(e=-1); i=99, f=1155, fg=f*2^-(e+10)=2.25586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=2: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=3: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=4: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 3. after ADD1(M): yl,yh = ( 0, 1.25741e+307); yl+yh= 1.25741e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.56085e+306); yl+yh= 2.56085e+306 ebd0(x=1e+307, M=4.4871e+306): M/x = (r=0.897420546177039) * 2^(e=-1); i=102, f=1140, fg=f*2^-(e+10)=2.22656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=2: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=3: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=4: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 3. after ADD1(M): yl,yh = ( 0, 1.24917e+307); yl+yh= 1.24917e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.50088e+306); yl+yh= 2.50088e+306 ebd0(x=1e+307, M=4.53596e+306): M/x = (r=0.907192815213034) * 2^(e=-1); i=104, f=1130, fg=f*2^-(e+10)=2.20703 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=2: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=3: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=4: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 3. after ADD1(M): yl,yh = ( 0, 1.24525e+307); yl+yh= 1.24525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.44144e+306); yl+yh= 2.44144e+306 ebd0(x=1e+307, M=4.58536e+306): M/x = (r=0.917071497281936) * 2^(e=-1); i=107, f=1116, fg=f*2^-(e+10)=2.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=2: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=3: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=4: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 3. after ADD1(M): yl,yh = ( 0, 1.23772e+307); yl+yh= 1.23772e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38253e+306); yl+yh= 2.38253e+306 ebd0(x=1e+307, M=4.63529e+306): M/x = (r=0.9270577511457) * 2^(e=-1); i=109, f=1106, fg=f*2^-(e+10)=2.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=2: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=3: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=4: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 3. after ADD1(M): yl,yh = ( 0, 1.23371e+307); yl+yh= 1.23371e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.32415e+306); yl+yh= 2.32415e+306 ebd0(x=1e+307, M=4.68576e+306): M/x = (r=0.937152748184372) * 2^(e=-1); i=112, f=1092, fg=f*2^-(e+10)=2.13281 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=2: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=3: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=4: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 3. after ADD1(M): yl,yh = ( 0, 1.22602e+307); yl+yh= 1.22602e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.26633e+306); yl+yh= 2.26633e+306 ebd0(x=1e+307, M=4.73679e+306): M/x = (r=0.947357672533489) * 2^(e=-1); i=115, f=1079, fg=f*2^-(e+10)=2.10742 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=2: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=3: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=4: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 3. after ADD1(M): yl,yh = ( 0, 1.21915e+307); yl+yh= 1.21915e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.20905e+306); yl+yh= 2.20905e+306 ebd0(x=1e+307, M=4.78837e+306): M/x = (r=0.957673721222979) * 2^(e=-1); i=117, f=1070, fg=f*2^-(e+10)=2.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=2: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=3: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=4: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 3. after ADD1(M): yl,yh = ( 0, 1.21593e+307); yl+yh= 1.21593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.15232e+306); yl+yh= 2.15232e+306 ebd0(x=1e+307, M=4.84051e+306): M/x = (r=0.968102104317573) * 2^(e=-1); i=120, f=1057, fg=f*2^-(e+10)=2.06445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=2: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=3: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=4: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 3. after ADD1(M): yl,yh = ( 0, 1.20892e+307); yl+yh= 1.20892e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09616e+306); yl+yh= 2.09616e+306 ebd0(x=1e+307, M=4.89322e+306): M/x = (r=0.97864404505874) * 2^(e=-1); i=123, f=1044, fg=f*2^-(e+10)=2.03906 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=2: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=3: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=4: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 3. after ADD1(M): yl,yh = ( 0, 1.20181e+307); yl+yh= 1.20181e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.04056e+306); yl+yh= 2.04056e+306 ebd0(x=1e+307, M=4.9465e+306): M/x = (r=0.989300780008178) * 2^(e=-1); i=125, f=1036, fg=f*2^-(e+10)=2.02344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=2: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=3: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=4: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 3. after ADD1(M): yl,yh = ( 0, 1.19945e+307); yl+yh= 1.19945e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.98554e+306); yl+yh= 1.98554e+306 ebd0(x=1e+307, M=5.00037e+306): M/x = (r=0.500036779596429) * 2^(e=0); i=0, f=2048, fg=f*2^-(e+10)=2 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=2: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=3: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=4: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.19318e+307); yl+yh= 1.19318e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.9311e+306); yl+yh= 1.9311e+306 ebd0(x=1e+307, M=5.05482e+306): M/x = (r=0.505481823125825) * 2^(e=0); i=1, f=2032, fg=f*2^-(e+10)=1.98438 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=2: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=3: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=4: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 3. after ADD1(M): yl,yh = ( 0, 1.19079e+307); yl+yh= 1.19079e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.87725e+306); yl+yh= 1.87725e+306 ebd0(x=1e+307, M=5.10986e+306): M/x = (r=0.510986159291777) * 2^(e=0); i=3, f=2001, fg=f*2^-(e+10)=1.9541 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=2: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=3: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=4: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 3. after ADD1(M): yl,yh = ( 0, 1.18092e+307); yl+yh= 1.18092e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.82399e+306); yl+yh= 1.82399e+306 ebd0(x=1e+307, M=5.1655e+306): M/x = (r=0.516550433748765) * 2^(e=0); i=4, f=1986, fg=f*2^-(e+10)=1.93945 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=2: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=3: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=4: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 3. after ADD1(M): yl,yh = ( 0, 1.17896e+307); yl+yh= 1.17896e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77133e+306); yl+yh= 1.77133e+306 ebd0(x=1e+307, M=5.22175e+306): M/x = (r=0.522175299181986) * 2^(e=0); i=6, f=1956, fg=f*2^-(e+10)=1.91016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=2: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=3: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=4: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 3. after ADD1(M): yl,yh = ( 0, 1.16936e+307); yl+yh= 1.16936e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.71927e+306); yl+yh= 1.71927e+306 ebd0(x=1e+307, M=5.27861e+306): M/x = (r=0.52786141538391) * 2^(e=0); i=7, f=1942, fg=f*2^-(e+10)=1.89648 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=2: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=3: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=4: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 3. after ADD1(M): yl,yh = ( 0, 1.16786e+307); yl+yh= 1.16786e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.66783e+306); yl+yh= 1.66783e+306 ebd0(x=1e+307, M=5.33609e+306): M/x = (r=0.533609449331681) * 2^(e=0); i=9, f=1913, fg=f*2^-(e+10)=1.86816 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=2: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=3: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=4: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 3. after ADD1(M): yl,yh = ( 0, 1.15857e+307); yl+yh= 1.15857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61701e+306); yl+yh= 1.61701e+306 ebd0(x=1e+307, M=5.3942e+306): M/x = (r=0.539420075265344) * 2^(e=0); i=10, f=1900, fg=f*2^-(e+10)=1.85547 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=2: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=3: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=4: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 3. after ADD1(M): yl,yh = ( 0, 1.15756e+307); yl+yh= 1.15756e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.56681e+306); yl+yh= 1.56681e+306 ebd0(x=1e+307, M=5.45294e+306): M/x = (r=0.545293974766939) * 2^(e=0); i=12, f=1872, fg=f*2^-(e+10)=1.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=2: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=3: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=4: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 3. after ADD1(M): yl,yh = ( 0, 1.14859e+307); yl+yh= 1.14859e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51724e+306); yl+yh= 1.51724e+306 ebd0(x=1e+307, M=5.51232e+306): M/x = (r=0.551231836840444) * 2^(e=0); i=13, f=1859, fg=f*2^-(e+10)=1.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=2: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=3: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=4: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 3. after ADD1(M): yl,yh = ( 0, 1.14755e+307); yl+yh= 1.14755e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.46832e+306); yl+yh= 1.46832e+306 ebd0(x=1e+307, M=5.57234e+306): M/x = (r=0.557234357992604) * 2^(e=0); i=15, f=1833, fg=f*2^-(e+10)=1.79004 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=2: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=3: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=4: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 3. after ADD1(M): yl,yh = ( 0, 1.13948e+307); yl+yh= 1.13948e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42004e+306); yl+yh= 1.42004e+306 ebd0(x=1e+307, M=5.63302e+306): M/x = (r=0.563302242314621) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=4: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.13842e+307); yl+yh= 1.13842e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.37241e+306); yl+yh= 1.37241e+306 ebd0(x=1e+307, M=5.69436e+306): M/x = (r=0.56943620156475) * 2^(e=0); i=18, f=1796, fg=f*2^-(e+10)=1.75391 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=2: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=3: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=4: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 3. after ADD1(M): yl,yh = ( 0, 1.13128e+307); yl+yh= 1.13128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.32545e+306); yl+yh= 1.32545e+306 ebd0(x=1e+307, M=5.75637e+306): M/x = (r=0.575636955251782) * 2^(e=0); i=19, f=1783, fg=f*2^-(e+10)=1.74121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=2: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=3: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=4: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 3. after ADD1(M): yl,yh = ( 0, 1.13022e+307); yl+yh= 1.13022e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27915e+306); yl+yh= 1.27915e+306 ebd0(x=1e+307, M=5.81905e+306): M/x = (r=0.581905230719448) * 2^(e=0); i=21, f=1759, fg=f*2^-(e+10)=1.71777 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=2: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=3: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=4: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 3. after ADD1(M): yl,yh = ( 0, 1.12293e+307); yl+yh= 1.12293e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.23353e+306); yl+yh= 1.23353e+306 ebd0(x=1e+307, M=5.88242e+306): M/x = (r=0.588241763231733) * 2^(e=0); i=23, f=1736, fg=f*2^-(e+10)=1.69531 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=2: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=3: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=4: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 3. after ADD1(M): yl,yh = ( 0, 1.11611e+307); yl+yh= 1.11611e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.18859e+306); yl+yh= 1.18859e+306 ebd0(x=1e+307, M=5.94647e+306): M/x = (r=0.59464729605912) * 2^(e=0); i=24, f=1725, fg=f*2^-(e+10)=1.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=2: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=3: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=4: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 3. after ADD1(M): yl,yh = ( 0, 1.11616e+307); yl+yh= 1.11616e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14434e+306); yl+yh= 1.14434e+306 ebd0(x=1e+307, M=6.01123e+306): M/x = (r=0.601122580565778) * 2^(e=0); i=26, f=1702, fg=f*2^-(e+10)=1.66211 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=2: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=3: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=4: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 3. after ADD1(M): yl,yh = ( 0, 1.10921e+307); yl+yh= 1.10921e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10079e+306); yl+yh= 1.10079e+306 ebd0(x=1e+307, M=6.07668e+306): M/x = (r=0.607668376297695) * 2^(e=0); i=28, f=1680, fg=f*2^-(e+10)=1.64062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=2: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=3: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=4: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 3. after ADD1(M): yl,yh = ( 0, 1.10275e+307); yl+yh= 1.10275e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05794e+306); yl+yh= 1.05794e+306 ebd0(x=1e+307, M=6.14285e+306): M/x = (r=0.614285451071773) * 2^(e=0); i=29, f=1670, fg=f*2^-(e+10)=1.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=2: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=3: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=4: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 3. after ADD1(M): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.01581e+306); yl+yh= 1.01581e+306 ebd0(x=1e+307, M=6.20975e+306): M/x = (r=0.620974581065892) * 2^(e=0); i=31, f=1649, fg=f*2^-(e+10)=1.61035 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=2: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=3: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=4: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 3. after ADD1(M): yl,yh = ( 0, 1.09743e+307); yl+yh= 1.09743e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.74397e+305); yl+yh= 9.74397e+305 ebd0(x=1e+307, M=6.27737e+306): M/x = (r=0.627736550909953) * 2^(e=0); i=33, f=1628, fg=f*2^-(e+10)=1.58984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=2: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=3: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=4: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 3. after ADD1(M): yl,yh = ( 0, 1.09137e+307); yl+yh= 1.09137e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.33713e+305); yl+yh= 9.33713e+305 ebd0(x=1e+307, M=6.34572e+306): M/x = (r=0.634572153777919) * 2^(e=0); i=34, f=1618, fg=f*2^-(e+10)=1.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=2: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=3: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=4: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 3. after ADD1(M): yl,yh = ( 0, 1.09205e+307); yl+yh= 1.09205e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.93764e+305); yl+yh= 8.93764e+305 ebd0(x=1e+307, M=6.41482e+306): M/x = (r=0.641482191480851) * 2^(e=0); i=36, f=1598, fg=f*2^-(e+10)=1.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=2: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=3: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=4: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 3. after ADD1(M): yl,yh = ( 0, 1.08652e+307); yl+yh= 1.08652e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.5456e+305); yl+yh= 8.5456e+305 ebd0(x=1e+307, M=6.48467e+306): M/x = (r=0.648467474560957) * 2^(e=0); i=38, f=1579, fg=f*2^-(e+10)=1.54199 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=2: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=3: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=4: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 3. after ADD1(M): yl,yh = ( 0, 1.08154e+307); yl+yh= 1.08154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.16109e+305); yl+yh= 8.16109e+305 ebd0(x=1e+307, M=6.55529e+306): M/x = (r=0.655528822386676) * 2^(e=0); i=40, f=1560, fg=f*2^-(e+10)=1.52344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=2: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=3: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=4: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 3. after ADD1(M): yl,yh = ( 0, 1.0765e+307); yl+yh= 1.0765e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.78418e+305); yl+yh= 7.78418e+305 ebd0(x=1e+307, M=6.62667e+306): M/x = (r=0.662667063248778) * 2^(e=0); i=42, f=1542, fg=f*2^-(e+10)=1.50586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=2: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=3: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=4: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 3. after ADD1(M): yl,yh = ( 0, 1.07203e+307); yl+yh= 1.07203e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.41496e+305); yl+yh= 7.41496e+305 ebd0(x=1e+307, M=6.69883e+306): M/x = (r=0.669883034457535) * 2^(e=0); i=43, f=1533, fg=f*2^-(e+10)=1.49707 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=2: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=3: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=4: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 3. after ADD1(M): yl,yh = ( 0, 1.0734e+307); yl+yh= 1.0734e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05352e+305); yl+yh= 7.05352e+305 ebd0(x=1e+307, M=6.77178e+306): M/x = (r=0.677177582440924) * 2^(e=0); i=45, f=1515, fg=f*2^-(e+10)=1.47949 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=2: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=3: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=4: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 3. after ADD1(M): yl,yh = ( 0, 1.06888e+307); yl+yh= 1.06888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.69993e+305); yl+yh= 6.69993e+305 ebd0(x=1e+307, M=6.84552e+306): M/x = (r=0.684551562843922) * 2^(e=0); i=47, f=1498, fg=f*2^-(e+10)=1.46289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=2: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=3: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=4: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 3. after ADD1(M): yl,yh = ( 0, 1.06497e+307); yl+yh= 1.06497e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.35429e+305); yl+yh= 6.35429e+305 ebd0(x=1e+307, M=6.92006e+306): M/x = (r=0.692005840628868) * 2^(e=0); i=49, f=1481, fg=f*2^-(e+10)=1.44629 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=2: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=3: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=4: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 3. after ADD1(M): yl,yh = ( 0, 1.06101e+307); yl+yh= 1.06101e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.01667e+305); yl+yh= 6.01667e+305 ebd0(x=1e+307, M=6.99541e+306): M/x = (r=0.699541290176923) * 2^(e=0); i=51, f=1464, fg=f*2^-(e+10)=1.42969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=2: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=3: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=4: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 3. after ADD1(M): yl,yh = ( 0, 1.057e+307); yl+yh= 1.057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.68717e+305); yl+yh= 5.68717e+305 ebd0(x=1e+307, M=7.07159e+306): M/x = (r=0.707158795390635) * 2^(e=0); i=53, f=1448, fg=f*2^-(e+10)=1.41406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=2: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=3: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=4: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 3. after ADD1(M): yl,yh = ( 0, 1.05363e+307); yl+yh= 1.05363e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36588e+305); yl+yh= 5.36588e+305 ebd0(x=1e+307, M=7.14859e+306): M/x = (r=0.71485924979762) * 2^(e=0); i=55, f=1432, fg=f*2^-(e+10)=1.39844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=2: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=3: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=4: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 3. after ADD1(M): yl,yh = ( 0, 1.05021e+307); yl+yh= 1.05021e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.05289e+305); yl+yh= 5.05289e+305 ebd0(x=1e+307, M=7.22644e+306): M/x = (r=0.72264355665537) * 2^(e=0); i=57, f=1417, fg=f*2^-(e+10)=1.38379 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=2: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=3: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=4: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 3. after ADD1(M): yl,yh = ( 0, 1.04747e+307); yl+yh= 1.04747e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.74827e+305); yl+yh= 4.74827e+305 ebd0(x=1e+307, M=7.30513e+306): M/x = (r=0.730512629057209) * 2^(e=0); i=59, f=1402, fg=f*2^-(e+10)=1.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=2: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=3: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=4: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 3. after ADD1(M): yl,yh = ( 0, 1.0447e+307); yl+yh= 1.0447e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.45214e+305); yl+yh= 4.45214e+305 ebd0(x=1e+307, M=7.38467e+306): M/x = (r=0.738467390039392) * 2^(e=0); i=61, f=1387, fg=f*2^-(e+10)=1.35449 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=2: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=3: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=4: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 3. after ADD1(M): yl,yh = ( 0, 1.04189e+307); yl+yh= 1.04189e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.16457e+305); yl+yh= 4.16457e+305 ebd0(x=1e+307, M=7.46509e+306): M/x = (r=0.746508772689384) * 2^(e=0); i=63, f=1372, fg=f*2^-(e+10)=1.33984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=2: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=3: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=4: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 3. after ADD1(M): yl,yh = ( 0, 1.03906e+307); yl+yh= 1.03906e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88567e+305); yl+yh= 3.88567e+305 ebd0(x=1e+307, M=7.54638e+306): M/x = (r=0.754637720255303) * 2^(e=0); i=65, f=1358, fg=f*2^-(e+10)=1.32617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=2: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=3: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=4: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 3. after ADD1(M): yl,yh = ( 0, 1.03693e+307); yl+yh= 1.03693e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.61552e+305); yl+yh= 3.61552e+305 ebd0(x=1e+307, M=7.62855e+306): M/x = (r=0.762855186256566) * 2^(e=0); i=67, f=1344, fg=f*2^-(e+10)=1.3125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, 2.71935e+306); yl+yh= 2.71935e+306 j=2: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=3: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=4: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 3. after ADD1(M): yl,yh = ( 0, 1.03479e+307); yl+yh= 1.03479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.35422e+305); yl+yh= 3.35422e+305 ebd0(x=1e+307, M=7.71162e+306): M/x = (r=0.771162134595737) * 2^(e=0); i=69, f=1331, fg=f*2^-(e+10)=1.2998 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=2: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=3: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=4: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 3. after ADD1(M): yl,yh = ( 0, 1.03338e+307); yl+yh= 1.03338e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.10188e+305); yl+yh= 3.10188e+305 ebd0(x=1e+307, M=7.7956e+306): M/x = (r=0.77955953967159) * 2^(e=0); i=72, f=1311, fg=f*2^-(e+10)=1.28027 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=2: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=3: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=4: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 3. after ADD1(M): yl,yh = ( 0, 1.02664e+307); yl+yh= 1.02664e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85858e+305); yl+yh= 2.85858e+305 ebd0(x=1e+307, M=7.88048e+306): M/x = (r=0.788048386493405) * 2^(e=0); i=74, f=1298, fg=f*2^-(e+10)=1.26758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=2: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=3: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=4: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 3. after ADD1(M): yl,yh = ( 0, 1.02516e+307); yl+yh= 1.02516e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62442e+305); yl+yh= 2.62442e+305 ebd0(x=1e+307, M=7.9663e+306): M/x = (r=0.796629670796513) * 2^(e=0); i=76, f=1285, fg=f*2^-(e+10)=1.25488 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=2: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=3: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=4: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 3. after ADD1(M): yl,yh = ( 0, 1.02367e+307); yl+yh= 1.02367e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.3995e+305); yl+yh= 2.3995e+305 ebd0(x=1e+307, M=8.05304e+306): M/x = (r=0.805304399159088) * 2^(e=0); i=78, f=1273, fg=f*2^-(e+10)=1.24316 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=2: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=3: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=4: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 3. after ADD1(M): yl,yh = ( 0, 1.02296e+307); yl+yh= 1.02296e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18393e+305); yl+yh= 2.18393e+305 ebd0(x=1e+307, M=8.14074e+306): M/x = (r=0.814073589120224) * 2^(e=0); i=80, f=1260, fg=f*2^-(e+10)=1.23047 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=2: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=3: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=4: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 3. after ADD1(M): yl,yh = ( 0, 1.02147e+307); yl+yh= 1.02147e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.97781e+305); yl+yh= 1.97781e+305 ebd0(x=1e+307, M=8.22938e+306): M/x = (r=0.822938269299289) * 2^(e=0); i=83, f=1242, fg=f*2^-(e+10)=1.21289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=2: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=3: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=4: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 3. after ADD1(M): yl,yh = ( 0, 1.01595e+307); yl+yh= 1.01595e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.78124e+305); yl+yh= 1.78124e+305 ebd0(x=1e+307, M=8.31899e+306): M/x = (r=0.83189947951658) * 2^(e=0); i=85, f=1231, fg=f*2^-(e+10)=1.20215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=2: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=3: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=4: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 3. after ADD1(M): yl,yh = ( 0, 1.01601e+307); yl+yh= 1.01601e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59431e+305); yl+yh= 1.59431e+305 ebd0(x=1e+307, M=8.40958e+306): M/x = (r=0.840958270915297) * 2^(e=0); i=87, f=1219, fg=f*2^-(e+10)=1.19043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=2: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=3: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=4: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 3. after ADD1(M): yl,yh = ( 0, 1.01527e+307); yl+yh= 1.01527e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41715e+305); yl+yh= 1.41715e+305 ebd0(x=1e+307, M=8.50116e+306): M/x = (r=0.850115706084837) * 2^(e=0); i=90, f=1202, fg=f*2^-(e+10)=1.17383 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=2: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=3: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=4: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 3. after ADD1(M): yl,yh = ( 0, 1.01039e+307); yl+yh= 1.01039e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.24985e+305); yl+yh= 1.24985e+305 ebd0(x=1e+307, M=8.59373e+306): M/x = (r=0.859372859185438) * 2^(e=0); i=92, f=1192, fg=f*2^-(e+10)=1.16406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=2: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=3: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=4: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 3. after ADD1(M): yl,yh = ( 0, 1.01129e+307); yl+yh= 1.01129e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09252e+305); yl+yh= 1.09252e+305 ebd0(x=1e+307, M=8.68731e+306): M/x = (r=0.868730816074176) * 2^(e=0); i=94, f=1181, fg=f*2^-(e+10)=1.15332 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=2: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=3: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=4: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 3. after ADD1(M): yl,yh = ( 0, 1.01138e+307); yl+yh= 1.01138e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.45278e+304); yl+yh= 9.45278e+304 ebd0(x=1e+307, M=8.78191e+306): M/x = (r=0.878190674432335) * 2^(e=0); i=97, f=1165, fg=f*2^-(e+10)=1.1377 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=2: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=3: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=4: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 3. after ADD1(M): yl,yh = ( 0, 1.0072e+307); yl+yh= 1.0072e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08221e+304); yl+yh= 8.08221e+304 ebd0(x=1e+307, M=8.87754e+306): M/x = (r=0.887753543894164) * 2^(e=0); i=99, f=1155, fg=f*2^-(e+10)=1.12793 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=2: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=3: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=4: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 3. after ADD1(M): yl,yh = ( 0, 1.00814e+307); yl+yh= 1.00814e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.81466e+304); yl+yh= 6.81466e+304 ebd0(x=1e+307, M=8.97421e+306): M/x = (r=0.897420546177039) * 2^(e=0); i=102, f=1140, fg=f*2^-(e+10)=1.11328 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=2: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=3: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=4: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 3. after ADD1(M): yl,yh = ( 0, 1.00473e+307); yl+yh= 1.00473e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.65124e+304); yl+yh= 5.65124e+304 ebd0(x=1e+307, M=9.07193e+306): M/x = (r=0.907192815213034) * 2^(e=0); i=104, f=1130, fg=f*2^-(e+10)=1.10352 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=2: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=3: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=4: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 3. after ADD1(M): yl,yh = ( 0, 1.00569e+307); yl+yh= 1.00569e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.59308e+304); yl+yh= 4.59308e+304 ebd0(x=1e+307, M=9.17071e+306): M/x = (r=0.917071497281936) * 2^(e=0); i=107, f=1116, fg=f*2^-(e+10)=1.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=2: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=3: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=4: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 3. after ADD1(M): yl,yh = ( 0, 1.00311e+307); yl+yh= 1.00311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64134e+304); yl+yh= 3.64134e+304 ebd0(x=1e+307, M=9.27058e+306): M/x = (r=0.9270577511457) * 2^(e=0); i=109, f=1106, fg=f*2^-(e+10)=1.08008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=2: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=3: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=4: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 3. after ADD1(M): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79717e+304); yl+yh= 2.79717e+304 ebd0(x=1e+307, M=9.37153e+306): M/x = (r=0.937152748184372) * 2^(e=0); i=112, f=1092, fg=f*2^-(e+10)=1.06641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=2: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=3: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=4: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 3. after ADD1(M): yl,yh = ( 0, 1.00145e+307); yl+yh= 1.00145e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.06174e+304); yl+yh= 2.06174e+304 ebd0(x=1e+307, M=9.47358e+306): M/x = (r=0.947357672533489) * 2^(e=0); i=115, f=1079, fg=f*2^-(e+10)=1.05371 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=2: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=3: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=4: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 3. after ADD1(M): yl,yh = ( 0, 9.99677e+306); yl+yh= 9.99677e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 1.43624e+304); yl+yh= 1.43624e+304 ebd0(x=1e+307, M=9.57674e+306): M/x = (r=0.957673721222979) * 2^(e=0); i=117, f=1070, fg=f*2^-(e+10)=1.04492 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=2: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=3: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=4: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 3. after ADD1(M): yl,yh = ( 0, 1.00162e+307); yl+yh= 1.00162e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.21864e+303); yl+yh= 9.21864e+303 ebd0(x=1e+307, M=9.68102e+306): M/x = (r=0.968102104317573) * 2^(e=0); i=120, f=1057, fg=f*2^-(e+10)=1.03223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=2: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=3: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=4: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 3. after ADD1(M): yl,yh = ( 0, 9.99821e+306); yl+yh= 9.99821e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 5.19822e+303); yl+yh= 5.19822e+303 ebd0(x=1e+307, M=9.78644e+306): M/x = (r=0.97864404505874) * 2^(e=0); i=123, f=1044, fg=f*2^-(e+10)=1.01953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=2: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=3: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=4: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 3. after ADD1(M): yl,yh = ( 0, 9.9799e+306); yl+yh= 9.9799e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.31338e+303); yl+yh= 2.31338e+303 ebd0(x=1e+307, M=9.89301e+306): M/x = (r=0.989300780008178) * 2^(e=0); i=125, f=1036, fg=f*2^-(e+10)=1.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=2: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=3: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=4: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 3. after ADD1(M): yl,yh = ( 0, 1.00095e+307); yl+yh= 1.00095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.76482e+302); yl+yh= 5.76482e+302 ebd0(x=1e+307, M=1.00007e+307): M/x = (r=0.500036779596429) * 2^(e=1); i=0, f=2048, fg=f*2^-(e+10)=1 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 ___ fg = 1 ___ skipping further steps ebd0(x=1e+307, M=1.01096e+307): M/x = (r=0.505481823125825) * 2^(e=1); i=1, f=2032, fg=f*2^-(e+10)=0.992188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, -7.83845e+304); yl+yh= -7.83845e+304 j=2: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=3: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=4: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 3. after ADD1(M): yl,yh = ( 0, 1.00313e+307); yl+yh= 1.00313e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.96651e+302); yl+yh= 5.96651e+302 ebd0(x=1e+307, M=1.02197e+307): M/x = (r=0.510986159291777) * 2^(e=1); i=3, f=2001, fg=f*2^-(e+10)=0.977051 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, -2.32155e+305); yl+yh= -2.32155e+305 j=2: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=3: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=4: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 3. after ADD1(M): yl,yh = ( 0, 9.98757e+306); yl+yh= 9.98757e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.37913e+303); yl+yh= 2.37913e+303 ebd0(x=1e+307, M=1.0331e+307): M/x = (r=0.516550433748765) * 2^(e=1); i=4, f=1986, fg=f*2^-(e+10)=0.969727 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, -3.07394e+305); yl+yh= -3.07394e+305 j=2: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=3: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=4: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 3. after ADD1(M): yl,yh = ( 0, 1.00236e+307); yl+yh= 1.00236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36037e+303); yl+yh= 5.36037e+303 ebd0(x=1e+307, M=1.04435e+307): M/x = (r=0.522175299181986) * 2^(e=1); i=6, f=1956, fg=f*2^-(e+10)=0.955078 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=2: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=3: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=4: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 3. after ADD1(M): yl,yh = ( 0, 9.98392e+306); yl+yh= 9.98392e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 9.55343e+303); yl+yh= 9.55343e+303 ebd0(x=1e+307, M=1.05572e+307): M/x = (r=0.52786141538391) * 2^(e=1); i=7, f=1942, fg=f*2^-(e+10)=0.948242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, -5.31447e+305); yl+yh= -5.31447e+305 j=2: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=3: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=4: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 3. after ADD1(M): yl,yh = ( 0, 1.00258e+307); yl+yh= 1.00258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.49715e+304); yl+yh= 1.49715e+304 ebd0(x=1e+307, M=1.06722e+307): M/x = (r=0.533609449331681) * 2^(e=1); i=9, f=1913, fg=f*2^-(e+10)=0.934082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=2: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=3: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=4: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 3. after ADD1(M): yl,yh = ( 0, 9.99033e+306); yl+yh= 9.99033e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.16279e+304); yl+yh= 2.16279e+304 ebd0(x=1e+307, M=1.07884e+307): M/x = (r=0.539420075265344) * 2^(e=1); i=10, f=1900, fg=f*2^-(e+10)=0.927734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=2: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=3: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=4: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 3. after ADD1(M): yl,yh = ( 0, 1.00383e+307); yl+yh= 1.00383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.95362e+304); yl+yh= 2.95362e+304 ebd0(x=1e+307, M=1.09059e+307): M/x = (r=0.545293974766939) * 2^(e=1); i=12, f=1872, fg=f*2^-(e+10)=0.914062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, -8.98515e+305); yl+yh= -8.98515e+305 j=2: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=3: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=4: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 3. after ADD1(M): yl,yh = ( 0, 1.00074e+307); yl+yh= 1.00074e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.871e+304); yl+yh= 3.871e+304 ebd0(x=1e+307, M=1.10246e+307): M/x = (r=0.551231836840444) * 2^(e=1); i=13, f=1859, fg=f*2^-(e+10)=0.907715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=2: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=3: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=4: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 3. after ADD1(M): yl,yh = ( 0, 1.00564e+307); yl+yh= 1.00564e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.91629e+304); yl+yh= 4.91629e+304 ebd0(x=1e+307, M=1.11447e+307): M/x = (r=0.557234357992604) * 2^(e=1); i=15, f=1833, fg=f*2^-(e+10)=0.89502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, -1.10906e+306); yl+yh= -1.10906e+306 j=2: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=3: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=4: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 3. after ADD1(M): yl,yh = ( 0, 1.00356e+307); yl+yh= 1.00356e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.09091e+304); yl+yh= 6.09091e+304 ebd0(x=1e+307, M=1.1266e+307): M/x = (r=0.563302242314621) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=2: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=3: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=4: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 3. after ADD1(M): yl,yh = ( 0, 1.00858e+307); yl+yh= 1.00858e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.39626e+304); yl+yh= 7.39626e+304 ebd0(x=1e+307, M=1.13887e+307): M/x = (r=0.56943620156475) * 2^(e=1); i=18, f=1796, fg=f*2^-(e+10)=0.876953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=2: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=3: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=4: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 3. after ADD1(M): yl,yh = ( 0, 1.00757e+307); yl+yh= 1.00757e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.83375e+304); yl+yh= 8.83375e+304 ebd0(x=1e+307, M=1.15127e+307): M/x = (r=0.575636955251782) * 2^(e=1); i=19, f=1783, fg=f*2^-(e+10)=0.870605 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=2: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=3: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=4: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 3. after ADD1(M): yl,yh = ( 0, 1.01271e+307); yl+yh= 1.01271e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.04048e+305); yl+yh= 1.04048e+305 ebd0(x=1e+307, M=1.16381e+307): M/x = (r=0.581905230719448) * 2^(e=1); i=21, f=1759, fg=f*2^-(e+10)=0.858887 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=2: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=3: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=4: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 3. after ADD1(M): yl,yh = ( 0, 1.01169e+307); yl+yh= 1.01169e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.2111e+305); yl+yh= 1.2111e+305 ebd0(x=1e+307, M=1.17648e+307): M/x = (r=0.588241763231733) * 2^(e=1); i=23, f=1736, fg=f*2^-(e+10)=0.847656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=2: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=3: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=4: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 3. after ADD1(M): yl,yh = ( 0, 1.01121e+307); yl+yh= 1.01121e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39536e+305); yl+yh= 1.39536e+305 ebd0(x=1e+307, M=1.18929e+307): M/x = (r=0.59464729605912) * 2^(e=1); i=24, f=1725, fg=f*2^-(e+10)=0.842285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=2: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=3: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=4: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 3. after ADD1(M): yl,yh = ( 0, 1.01766e+307); yl+yh= 1.01766e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59342e+305); yl+yh= 1.59342e+305 ebd0(x=1e+307, M=1.20225e+307): M/x = (r=0.601122580565778) * 2^(e=1); i=26, f=1702, fg=f*2^-(e+10)=0.831055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=2: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=3: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=4: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 3. after ADD1(M): yl,yh = ( 0, 1.01719e+307); yl+yh= 1.01719e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.80544e+305); yl+yh= 1.80544e+305 ebd0(x=1e+307, M=1.21534e+307): M/x = (r=0.607668376297695) * 2^(e=1); i=28, f=1680, fg=f*2^-(e+10)=0.820312 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=2: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=3: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=4: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 3. after ADD1(M): yl,yh = ( 0, 1.01727e+307); yl+yh= 1.01727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.03156e+305); yl+yh= 2.03156e+305 ebd0(x=1e+307, M=1.22857e+307): M/x = (r=0.614285451071773) * 2^(e=1); i=29, f=1670, fg=f*2^-(e+10)=0.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=2: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=3: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=4: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 3. after ADD1(M): yl,yh = ( 0, 1.02453e+307); yl+yh= 1.02453e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27193e+305); yl+yh= 2.27193e+305 ebd0(x=1e+307, M=1.24195e+307): M/x = (r=0.620974581065892) * 2^(e=1); i=31, f=1649, fg=f*2^-(e+10)=0.805176 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=2: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=3: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=4: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 3. after ADD1(M): yl,yh = ( 0, 1.02525e+307); yl+yh= 1.02525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.52671e+305); yl+yh= 2.52671e+305 ebd0(x=1e+307, M=1.25547e+307): M/x = (r=0.627736550909953) * 2^(e=1); i=33, f=1628, fg=f*2^-(e+10)=0.794922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=2: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=3: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=4: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 3. after ADD1(M): yl,yh = ( 0, 1.02596e+307); yl+yh= 1.02596e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79606e+305); yl+yh= 2.79606e+305 ebd0(x=1e+307, M=1.26914e+307): M/x = (r=0.634572153777919) * 2^(e=1); i=34, f=1618, fg=f*2^-(e+10)=0.790039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=2: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=3: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=4: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 3. after ADD1(M): yl,yh = ( 0, 1.03347e+307); yl+yh= 1.03347e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.08014e+305); yl+yh= 3.08014e+305 ebd0(x=1e+307, M=1.28296e+307): M/x = (r=0.641482191480851) * 2^(e=1); i=36, f=1598, fg=f*2^-(e+10)=0.780273 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=2: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=3: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=4: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 3. after ADD1(M): yl,yh = ( 0, 1.03485e+307); yl+yh= 1.03485e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.37911e+305); yl+yh= 3.37911e+305 ebd0(x=1e+307, M=1.29693e+307): M/x = (r=0.648467474560957) * 2^(e=1); i=38, f=1579, fg=f*2^-(e+10)=0.770996 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=2: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=3: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=4: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 3. after ADD1(M): yl,yh = ( 0, 1.03686e+307); yl+yh= 1.03686e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.69312e+305); yl+yh= 3.69312e+305 ebd0(x=1e+307, M=1.31106e+307): M/x = (r=0.655528822386676) * 2^(e=1); i=40, f=1560, fg=f*2^-(e+10)=0.761719 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=2: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=3: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=4: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 3. after ADD1(M): yl,yh = ( 0, 1.03888e+307); yl+yh= 1.03888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.02235e+305); yl+yh= 4.02235e+305 ebd0(x=1e+307, M=1.32533e+307): M/x = (r=0.662667063248778) * 2^(e=1); i=42, f=1542, fg=f*2^-(e+10)=0.75293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=2: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=3: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=4: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 3. after ADD1(M): yl,yh = ( 0, 1.04155e+307); yl+yh= 1.04155e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.36695e+305); yl+yh= 4.36695e+305 ebd0(x=1e+307, M=1.33977e+307): M/x = (r=0.669883034457535) * 2^(e=1); i=43, f=1533, fg=f*2^-(e+10)=0.748535 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=2: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=3: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=4: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 3. after ADD1(M): yl,yh = ( 0, 1.05013e+307); yl+yh= 1.05013e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7271e+305); yl+yh= 4.7271e+305 ebd0(x=1e+307, M=1.35436e+307): M/x = (r=0.677177582440924) * 2^(e=1); i=45, f=1515, fg=f*2^-(e+10)=0.739746 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=2: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=3: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=4: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 3. after ADD1(M): yl,yh = ( 0, 1.05291e+307); yl+yh= 1.05291e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10297e+305); yl+yh= 5.10297e+305 ebd0(x=1e+307, M=1.3691e+307): M/x = (r=0.684551562843922) * 2^(e=1); i=47, f=1498, fg=f*2^-(e+10)=0.731445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=2: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=3: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=4: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 3. after ADD1(M): yl,yh = ( 0, 1.05637e+307); yl+yh= 1.05637e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.49473e+305); yl+yh= 5.49473e+305 ebd0(x=1e+307, M=1.38401e+307): M/x = (r=0.692005840628868) * 2^(e=1); i=49, f=1481, fg=f*2^-(e+10)=0.723145 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=2: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=3: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=4: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 3. after ADD1(M): yl,yh = ( 0, 1.05987e+307); yl+yh= 1.05987e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90254e+305); yl+yh= 5.90254e+305 ebd0(x=1e+307, M=1.39908e+307): M/x = (r=0.699541290176923) * 2^(e=1); i=51, f=1464, fg=f*2^-(e+10)=0.714844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=2: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=3: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=4: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 3. after ADD1(M): yl,yh = ( 0, 1.06339e+307); yl+yh= 1.06339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.32659e+305); yl+yh= 6.32659e+305 ebd0(x=1e+307, M=1.41432e+307): M/x = (r=0.707158795390635) * 2^(e=1); i=53, f=1448, fg=f*2^-(e+10)=0.707031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=2: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=3: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=4: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 3. after ADD1(M): yl,yh = ( 0, 1.06764e+307); yl+yh= 1.06764e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.76704e+305); yl+yh= 6.76704e+305 ebd0(x=1e+307, M=1.42972e+307): M/x = (r=0.71485924979762) * 2^(e=1); i=55, f=1432, fg=f*2^-(e+10)=0.699219 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=2: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=3: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=4: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 3. after ADD1(M): yl,yh = ( 0, 1.07193e+307); yl+yh= 1.07193e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.22409e+305); yl+yh= 7.22409e+305 ebd0(x=1e+307, M=1.44529e+307): M/x = (r=0.72264355665537) * 2^(e=1); i=57, f=1417, fg=f*2^-(e+10)=0.691895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=2: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=3: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=4: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 3. after ADD1(M): yl,yh = ( 0, 1.07697e+307); yl+yh= 1.07697e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69791e+305); yl+yh= 7.69791e+305 ebd0(x=1e+307, M=1.46103e+307): M/x = (r=0.730512629057209) * 2^(e=1); i=59, f=1402, fg=f*2^-(e+10)=0.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=2: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=3: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=4: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 3. after ADD1(M): yl,yh = ( 0, 1.08206e+307); yl+yh= 1.08206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.18868e+305); yl+yh= 8.18868e+305 ebd0(x=1e+307, M=1.47693e+307): M/x = (r=0.738467390039392) * 2^(e=1); i=61, f=1387, fg=f*2^-(e+10)=0.677246 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=2: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=3: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=4: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 3. after ADD1(M): yl,yh = ( 0, 1.08721e+307); yl+yh= 1.08721e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.69659e+305); yl+yh= 8.69659e+305 ebd0(x=1e+307, M=1.49302e+307): M/x = (r=0.746508772689384) * 2^(e=1); i=63, f=1372, fg=f*2^-(e+10)=0.669922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=2: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=3: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=4: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 3. after ADD1(M): yl,yh = ( 0, 1.09242e+307); yl+yh= 1.09242e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.22183e+305); yl+yh= 9.22183e+305 ebd0(x=1e+307, M=1.50928e+307): M/x = (r=0.754637720255303) * 2^(e=1); i=65, f=1358, fg=f*2^-(e+10)=0.663086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=2: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=3: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=4: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 3. after ADD1(M): yl,yh = ( 0, 1.09843e+307); yl+yh= 1.09843e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.76457e+305); yl+yh= 9.76457e+305 ebd0(x=1e+307, M=1.52571e+307): M/x = (r=0.762855186256566) * 2^(e=1); i=67, f=1344, fg=f*2^-(e+10)=0.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=2: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=3: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=4: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 3. after ADD1(M): yl,yh = ( 0, 1.1045e+307); yl+yh= 1.1045e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0325e+306); yl+yh= 1.0325e+306 ebd0(x=1e+307, M=1.54232e+307): M/x = (r=0.771162134595737) * 2^(e=1); i=69, f=1331, fg=f*2^-(e+10)=0.649902 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=2: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=3: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=4: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 3. after ADD1(M): yl,yh = ( 0, 1.11139e+307); yl+yh= 1.11139e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09034e+306); yl+yh= 1.09034e+306 ebd0(x=1e+307, M=1.55912e+307): M/x = (r=0.77955953967159) * 2^(e=1); i=72, f=1311, fg=f*2^-(e+10)=0.640137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=2: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=3: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=4: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 3. after ADD1(M): yl,yh = ( 0, 1.11305e+307); yl+yh= 1.11305e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14998e+306); yl+yh= 1.14998e+306 ebd0(x=1e+307, M=1.5761e+307): M/x = (r=0.788048386493405) * 2^(e=1); i=74, f=1298, fg=f*2^-(e+10)=0.633789 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, -4.56039e+306); yl+yh= -4.56039e+306 j=2: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=3: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=4: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 3. after ADD1(M): yl,yh = ( 0, 1.12006e+307); yl+yh= 1.12006e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.21145e+306); yl+yh= 1.21145e+306 ebd0(x=1e+307, M=1.59326e+307): M/x = (r=0.796629670796513) * 2^(e=1); i=76, f=1285, fg=f*2^-(e+10)=0.627441 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=2: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=3: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=4: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 3. after ADD1(M): yl,yh = ( 0, 1.12715e+307); yl+yh= 1.12715e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27478e+306); yl+yh= 1.27478e+306 ebd0(x=1e+307, M=1.61061e+307): M/x = (r=0.805304399159088) * 2^(e=1); i=78, f=1273, fg=f*2^-(e+10)=0.621582 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=2: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=3: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=4: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 3. after ADD1(M): yl,yh = ( 0, 1.13512e+307); yl+yh= 1.13512e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33997e+306); yl+yh= 1.33997e+306 ebd0(x=1e+307, M=1.62815e+307): M/x = (r=0.814073589120224) * 2^(e=1); i=80, f=1260, fg=f*2^-(e+10)=0.615234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=2: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=3: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=4: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 3. after ADD1(M): yl,yh = ( 0, 1.1424e+307); yl+yh= 1.1424e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40705e+306); yl+yh= 1.40705e+306 ebd0(x=1e+307, M=1.64588e+307): M/x = (r=0.822938269299289) * 2^(e=1); i=83, f=1242, fg=f*2^-(e+10)=0.606445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=2: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=3: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=4: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 3. after ADD1(M): yl,yh = ( 0, 1.14574e+307); yl+yh= 1.14574e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.47603e+306); yl+yh= 1.47603e+306 ebd0(x=1e+307, M=1.6638e+307): M/x = (r=0.83189947951658) * 2^(e=1); i=85, f=1231, fg=f*2^-(e+10)=0.601074 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=2: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=3: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=4: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 3. after ADD1(M): yl,yh = ( 0, 1.15476e+307); yl+yh= 1.15476e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54695e+306); yl+yh= 1.54695e+306 ebd0(x=1e+307, M=1.68192e+307): M/x = (r=0.840958270915297) * 2^(e=1); i=87, f=1219, fg=f*2^-(e+10)=0.595215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=2: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=3: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=4: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 3. after ADD1(M): yl,yh = ( 0, 1.16308e+307); yl+yh= 1.16308e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61983e+306); yl+yh= 1.61983e+306 ebd0(x=1e+307, M=1.70023e+307): M/x = (r=0.850115706084837) * 2^(e=1); i=90, f=1202, fg=f*2^-(e+10)=0.586914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=2: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=3: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=4: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 3. after ADD1(M): yl,yh = ( 0, 1.16736e+307); yl+yh= 1.16736e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69467e+306); yl+yh= 1.69467e+306 ebd0(x=1e+307, M=1.71875e+307): M/x = (r=0.859372859185438) * 2^(e=1); i=92, f=1192, fg=f*2^-(e+10)=0.582031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=2: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=3: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=4: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 3. after ADD1(M): yl,yh = ( 0, 1.17751e+307); yl+yh= 1.17751e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77151e+306); yl+yh= 1.77151e+306 ebd0(x=1e+307, M=1.73746e+307): M/x = (r=0.868730816074176) * 2^(e=1); i=94, f=1181, fg=f*2^-(e+10)=0.57666 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=2: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=3: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=4: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 3. after ADD1(M): yl,yh = ( 0, 1.18696e+307); yl+yh= 1.18696e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.85036e+306); yl+yh= 1.85036e+306 ebd0(x=1e+307, M=1.75638e+307): M/x = (r=0.878190674432335) * 2^(e=1); i=97, f=1165, fg=f*2^-(e+10)=0.568848 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=2: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=3: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=4: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 3. after ADD1(M): yl,yh = ( 0, 1.19224e+307); yl+yh= 1.19224e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.93126e+306); yl+yh= 1.93126e+306 ebd0(x=1e+307, M=1.77551e+307): M/x = (r=0.887753543894164) * 2^(e=1); i=99, f=1155, fg=f*2^-(e+10)=0.563965 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=2: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=3: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=4: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 3. after ADD1(M): yl,yh = ( 0, 1.20274e+307); yl+yh= 1.20274e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.01421e+306); yl+yh= 2.01421e+306 ebd0(x=1e+307, M=1.79484e+307): M/x = (r=0.897420546177039) * 2^(e=1); i=102, f=1140, fg=f*2^-(e+10)=0.556641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=2: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=3: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=4: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 3. after ADD1(M): yl,yh = ( 0, 1.20901e+307); yl+yh= 1.20901e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09925e+306); yl+yh= 2.09925e+306 ebd0(x=1e+307, M=1.81439e+307): M/x = (r=0.907192815213034) * 2^(e=1); i=104, f=1130, fg=f*2^-(e+10)=0.551758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=2: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=3: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=4: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 3. after ADD1(M): yl,yh = ( 0, 1.21974e+307); yl+yh= 1.21974e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18639e+306); yl+yh= 2.18639e+306 ebd0(x=1e+307, M=1.83414e+307): M/x = (r=0.917071497281936) * 2^(e=1); i=107, f=1116, fg=f*2^-(e+10)=0.544922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=2: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=3: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=4: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 3. after ADD1(M): yl,yh = ( 0, 1.22703e+307); yl+yh= 1.22703e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27566e+306); yl+yh= 2.27566e+306 ebd0(x=1e+307, M=1.85412e+307): M/x = (r=0.9270577511457) * 2^(e=1); i=109, f=1106, fg=f*2^-(e+10)=0.540039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=2: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=3: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=4: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 3. after ADD1(M): yl,yh = ( 0, 1.238e+307); yl+yh= 1.238e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.36708e+306); yl+yh= 2.36708e+306 ebd0(x=1e+307, M=1.87431e+307): M/x = (r=0.937152748184372) * 2^(e=1); i=112, f=1092, fg=f*2^-(e+10)=0.533203 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=2: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=3: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=4: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 3. after ADD1(M): yl,yh = ( 0, 1.24545e+307); yl+yh= 1.24545e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.46067e+306); yl+yh= 2.46067e+306 ebd0(x=1e+307, M=1.89472e+307): M/x = (r=0.947357672533489) * 2^(e=1); i=115, f=1079, fg=f*2^-(e+10)=0.526855 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=2: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=3: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=4: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 3. after ADD1(M): yl,yh = ( 0, 1.25389e+307); yl+yh= 1.25389e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.55647e+306); yl+yh= 2.55647e+306 ebd0(x=1e+307, M=1.91535e+307): M/x = (r=0.957673721222979) * 2^(e=1); i=117, f=1070, fg=f*2^-(e+10)=0.522461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=2: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=3: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=4: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 3. after ADD1(M): yl,yh = ( 0, 1.26614e+307); yl+yh= 1.26614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.65448e+306); yl+yh= 2.65448e+306 ebd0(x=1e+307, M=1.9362e+307): M/x = (r=0.968102104317573) * 2^(e=1); i=120, f=1057, fg=f*2^-(e+10)=0.516113 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=2: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=3: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=4: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 3. after ADD1(M): yl,yh = ( 0, 1.27478e+307); yl+yh= 1.27478e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.75475e+306); yl+yh= 2.75475e+306 ebd0(x=1e+307, M=1.95729e+307): M/x = (r=0.97864404505874) * 2^(e=1); i=123, f=1044, fg=f*2^-(e+10)=0.509766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=2: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=3: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=4: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 3. after ADD1(M): yl,yh = ( 0, 1.28349e+307); yl+yh= 1.28349e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85728e+306); yl+yh= 2.85728e+306 ebd0(x=1e+307, M=1.9786e+307): M/x = (r=0.989300780008178) * 2^(e=1); i=125, f=1036, fg=f*2^-(e+10)=0.505859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=2: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=3: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=4: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 3. after ADD1(M): yl,yh = ( 0, 1.29711e+307); yl+yh= 1.29711e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.96211e+306); yl+yh= 2.96211e+306 ebd0(x=1e+307, M=2.00015e+307): M/x = (r=0.500036779596429) * 2^(e=2); i=0, f=2048, fg=f*2^-(e+10)=0.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=2: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=3: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=4: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.307e+307); yl+yh= 1.307e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.06926e+306); yl+yh= 3.06926e+306 ebd0(x=1e+307, M=2.02193e+307): M/x = (r=0.505481823125825) * 2^(e=2); i=1, f=2032, fg=f*2^-(e+10)=0.496094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=2: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=3: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=4: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 3. after ADD1(M): yl,yh = ( 0, 1.32094e+307); yl+yh= 1.32094e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.17876e+306); yl+yh= 3.17876e+306 ebd0(x=1e+307, M=2.04394e+307): M/x = (r=0.510986159291777) * 2^(e=2); i=3, f=2001, fg=f*2^-(e+10)=0.488525 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=2: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=3: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=4: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 3. after ADD1(M): yl,yh = ( 0, 1.32758e+307); yl+yh= 1.32758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.29063e+306); yl+yh= 3.29063e+306 ebd0(x=1e+307, M=2.0662e+307): M/x = (r=0.516550433748765) * 2^(e=2); i=4, f=1986, fg=f*2^-(e+10)=0.484863 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=2: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=3: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=4: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 3. after ADD1(M): yl,yh = ( 0, 1.34232e+307); yl+yh= 1.34232e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.4049e+306); yl+yh= 3.4049e+306 ebd0(x=1e+307, M=2.0887e+307): M/x = (r=0.522175299181986) * 2^(e=2); i=6, f=1956, fg=f*2^-(e+10)=0.477539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=2: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=3: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=4: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 3. after ADD1(M): yl,yh = ( 0, 1.3496e+307); yl+yh= 1.3496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.52159e+306); yl+yh= 3.52159e+306 ebd0(x=1e+307, M=2.11145e+307): M/x = (r=0.52786141538391) * 2^(e=2); i=7, f=1942, fg=f*2^-(e+10)=0.474121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=2: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=3: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=4: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 3. after ADD1(M): yl,yh = ( 0, 1.36515e+307); yl+yh= 1.36515e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64073e+306); yl+yh= 3.64073e+306 ebd0(x=1e+307, M=2.13444e+307): M/x = (r=0.533609449331681) * 2^(e=2); i=9, f=1913, fg=f*2^-(e+10)=0.467041 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=2: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=3: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=4: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 3. after ADD1(M): yl,yh = ( 0, 1.3731e+307); yl+yh= 1.3731e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.76235e+306); yl+yh= 3.76235e+306 ebd0(x=1e+307, M=2.15768e+307): M/x = (r=0.539420075265344) * 2^(e=2); i=10, f=1900, fg=f*2^-(e+10)=0.463867 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=2: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=3: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=4: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 3. after ADD1(M): yl,yh = ( 0, 1.38952e+307); yl+yh= 1.38952e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88647e+306); yl+yh= 3.88647e+306 ebd0(x=1e+307, M=2.18118e+307): M/x = (r=0.545293974766939) * 2^(e=2); i=12, f=1872, fg=f*2^-(e+10)=0.457031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=2: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=3: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=4: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 3. after ADD1(M): yl,yh = ( 0, 1.39818e+307); yl+yh= 1.39818e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.01312e+306); yl+yh= 4.01312e+306 ebd0(x=1e+307, M=2.20493e+307): M/x = (r=0.551231836840444) * 2^(e=2); i=13, f=1859, fg=f*2^-(e+10)=0.453857 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=2: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=3: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=4: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 3. after ADD1(M): yl,yh = ( 0, 1.41496e+307); yl+yh= 1.41496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14233e+306); yl+yh= 4.14233e+306 ebd0(x=1e+307, M=2.22894e+307): M/x = (r=0.557234357992604) * 2^(e=2); i=15, f=1833, fg=f*2^-(e+10)=0.44751 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=2: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=3: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=4: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 3. after ADD1(M): yl,yh = ( 0, 1.42488e+307); yl+yh= 1.42488e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.27412e+306); yl+yh= 4.27412e+306 ebd0(x=1e+307, M=2.25321e+307): M/x = (r=0.563302242314621) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=2: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=3: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=4: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 3. after ADD1(M): yl,yh = ( 0, 1.44204e+307); yl+yh= 1.44204e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.40854e+306); yl+yh= 4.40854e+306 ebd0(x=1e+307, M=2.27774e+307): M/x = (r=0.56943620156475) * 2^(e=2); i=18, f=1796, fg=f*2^-(e+10)=0.438477 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=2: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=3: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=4: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 3. after ADD1(M): yl,yh = ( 0, 1.4533e+307); yl+yh= 1.4533e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.54559e+306); yl+yh= 4.54559e+306 ebd0(x=1e+307, M=2.30255e+307): M/x = (r=0.575636955251782) * 2^(e=2); i=19, f=1783, fg=f*2^-(e+10)=0.435303 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=2: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=3: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=4: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 3. after ADD1(M): yl,yh = ( 0, 1.47084e+307); yl+yh= 1.47084e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.68532e+306); yl+yh= 4.68532e+306 ebd0(x=1e+307, M=2.32762e+307): M/x = (r=0.581905230719448) * 2^(e=2); i=21, f=1759, fg=f*2^-(e+10)=0.429443 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=2: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=3: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=4: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 3. after ADD1(M): yl,yh = ( 0, 1.48236e+307); yl+yh= 1.48236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.82774e+306); yl+yh= 4.82774e+306 ebd0(x=1e+307, M=2.35297e+307): M/x = (r=0.588241763231733) * 2^(e=2); i=23, f=1736, fg=f*2^-(e+10)=0.423828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, -8.58424e+306); yl+yh= -8.58424e+306 j=2: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=3: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=4: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 3. after ADD1(M): yl,yh = ( 0, 1.49454e+307); yl+yh= 1.49454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.9729e+306); yl+yh= 4.9729e+306 ebd0(x=1e+307, M=2.37859e+307): M/x = (r=0.59464729605912) * 2^(e=2); i=24, f=1725, fg=f*2^-(e+10)=0.421143 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=2: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=3: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=4: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 3. after ADD1(M): yl,yh = ( 0, 1.51381e+307); yl+yh= 1.51381e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12082e+306); yl+yh= 5.12082e+306 ebd0(x=1e+307, M=2.40449e+307): M/x = (r=0.601122580565778) * 2^(e=2); i=26, f=1702, fg=f*2^-(e+10)=0.415527 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=2: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=3: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=4: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 3. after ADD1(M): yl,yh = ( 0, 1.52628e+307); yl+yh= 1.52628e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.27152e+306); yl+yh= 5.27152e+306 ebd0(x=1e+307, M=2.43067e+307): M/x = (r=0.607668376297695) * 2^(e=2); i=28, f=1680, fg=f*2^-(e+10)=0.410156 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=2: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=3: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=4: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 3. after ADD1(M): yl,yh = ( 0, 1.53946e+307); yl+yh= 1.53946e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.42505e+306); yl+yh= 5.42505e+306 ebd0(x=1e+307, M=2.45714e+307): M/x = (r=0.614285451071773) * 2^(e=2); i=29, f=1670, fg=f*2^-(e+10)=0.407715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=2: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=3: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=4: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 3. after ADD1(M): yl,yh = ( 0, 1.55996e+307); yl+yh= 1.55996e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.58143e+306); yl+yh= 5.58143e+306 ebd0(x=1e+307, M=2.4839e+307): M/x = (r=0.620974581065892) * 2^(e=2); i=31, f=1649, fg=f*2^-(e+10)=0.402588 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=2: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=3: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=4: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 3. after ADD1(M): yl,yh = ( 0, 1.57406e+307); yl+yh= 1.57406e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.74069e+306); yl+yh= 5.74069e+306 ebd0(x=1e+307, M=2.51095e+307): M/x = (r=0.627736550909953) * 2^(e=2); i=33, f=1628, fg=f*2^-(e+10)=0.397461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=2: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=3: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=4: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 3. after ADD1(M): yl,yh = ( 0, 1.58829e+307); yl+yh= 1.58829e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90287e+306); yl+yh= 5.90287e+306 ebd0(x=1e+307, M=2.53829e+307): M/x = (r=0.634572153777919) * 2^(e=2); i=34, f=1618, fg=f*2^-(e+10)=0.39502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=2: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=3: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=4: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 3. after ADD1(M): yl,yh = ( 0, 1.60947e+307); yl+yh= 1.60947e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.06799e+306); yl+yh= 6.06799e+306 ebd0(x=1e+307, M=2.56593e+307): M/x = (r=0.641482191480851) * 2^(e=2); i=36, f=1598, fg=f*2^-(e+10)=0.390137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, -9.41258e+306); yl+yh= -9.41258e+306 j=2: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=3: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=4: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 3. after ADD1(M): yl,yh = ( 0, 1.62467e+307); yl+yh= 1.62467e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.23608e+306); yl+yh= 6.23608e+306 ebd0(x=1e+307, M=2.59387e+307): M/x = (r=0.648467474560957) * 2^(e=2); i=38, f=1579, fg=f*2^-(e+10)=0.385498 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=2: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=3: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=4: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 3. after ADD1(M): yl,yh = ( 0, 1.64065e+307); yl+yh= 1.64065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.40719e+306); yl+yh= 6.40719e+306 ebd0(x=1e+307, M=2.62212e+307): M/x = (r=0.655528822386676) * 2^(e=2); i=40, f=1560, fg=f*2^-(e+10)=0.380859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=2: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=3: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=4: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 3. after ADD1(M): yl,yh = ( 0, 1.65679e+307); yl+yh= 1.65679e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.58134e+306); yl+yh= 6.58134e+306 ebd0(x=1e+307, M=2.65067e+307): M/x = (r=0.662667063248778) * 2^(e=2); i=42, f=1542, fg=f*2^-(e+10)=0.376465 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=2: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=3: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=4: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 3. after ADD1(M): yl,yh = ( 0, 1.67374e+307); yl+yh= 1.67374e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.75856e+306); yl+yh= 6.75856e+306 ebd0(x=1e+307, M=2.67953e+307): M/x = (r=0.669883034457535) * 2^(e=2); i=43, f=1533, fg=f*2^-(e+10)=0.374268 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=2: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=3: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=4: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 3. after ADD1(M): yl,yh = ( 0, 1.69675e+307); yl+yh= 1.69675e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.9389e+306); yl+yh= 6.9389e+306 ebd0(x=1e+307, M=2.70871e+307): M/x = (r=0.677177582440924) * 2^(e=2); i=45, f=1515, fg=f*2^-(e+10)=0.369873 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=2: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=3: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=4: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 3. after ADD1(M): yl,yh = ( 0, 1.71412e+307); yl+yh= 1.71412e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.12238e+306); yl+yh= 7.12238e+306 ebd0(x=1e+307, M=2.73821e+307): M/x = (r=0.684551562843922) * 2^(e=2); i=47, f=1498, fg=f*2^-(e+10)=0.365723 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=2: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=3: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=4: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 3. after ADD1(M): yl,yh = ( 0, 1.73233e+307); yl+yh= 1.73233e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.30903e+306); yl+yh= 7.30903e+306 ebd0(x=1e+307, M=2.76802e+307): M/x = (r=0.692005840628868) * 2^(e=2); i=49, f=1481, fg=f*2^-(e+10)=0.361572 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=2: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=3: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=4: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 3. after ADD1(M): yl,yh = ( 0, 1.75073e+307); yl+yh= 1.75073e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.4989e+306); yl+yh= 7.4989e+306 ebd0(x=1e+307, M=2.79817e+307): M/x = (r=0.699541290176923) * 2^(e=2); i=51, f=1464, fg=f*2^-(e+10)=0.357422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=2: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=3: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=4: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 3. after ADD1(M): yl,yh = ( 0, 1.76933e+307); yl+yh= 1.76933e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69201e+306); yl+yh= 7.69201e+306 ebd0(x=1e+307, M=2.82864e+307): M/x = (r=0.707158795390635) * 2^(e=2); i=53, f=1448, fg=f*2^-(e+10)=0.353516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=2: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=3: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=4: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 3. after ADD1(M): yl,yh = ( 0, 1.78881e+307); yl+yh= 1.78881e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.88841e+306); yl+yh= 7.88841e+306 ebd0(x=1e+307, M=2.85944e+307): M/x = (r=0.71485924979762) * 2^(e=2); i=55, f=1432, fg=f*2^-(e+10)=0.349609 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=2: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=3: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=4: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 3. after ADD1(M): yl,yh = ( 0, 1.8085e+307); yl+yh= 1.8085e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08812e+306); yl+yh= 8.08812e+306 ebd0(x=1e+307, M=2.89057e+307): M/x = (r=0.72264355665537) * 2^(e=2); i=57, f=1417, fg=f*2^-(e+10)=0.345947 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=2: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=3: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=4: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 3. after ADD1(M): yl,yh = ( 0, 1.82911e+307); yl+yh= 1.82911e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.29119e+306); yl+yh= 8.29119e+306 ebd0(x=1e+307, M=2.92205e+307): M/x = (r=0.730512629057209) * 2^(e=2); i=59, f=1402, fg=f*2^-(e+10)=0.342285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=2: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=3: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=4: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 3. after ADD1(M): yl,yh = ( 0, 1.84994e+307); yl+yh= 1.84994e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.49765e+306); yl+yh= 8.49765e+306 ebd0(x=1e+307, M=2.95387e+307): M/x = (r=0.738467390039392) * 2^(e=2); i=61, f=1387, fg=f*2^-(e+10)=0.338623 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=2: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=3: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=4: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 3. after ADD1(M): yl,yh = ( 0, 1.871e+307); yl+yh= 1.871e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.70754e+306); yl+yh= 8.70754e+306 ebd0(x=1e+307, M=2.98604e+307): M/x = (r=0.746508772689384) * 2^(e=2); i=63, f=1372, fg=f*2^-(e+10)=0.334961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=2: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=3: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=4: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 3. after ADD1(M): yl,yh = ( 0, 1.89229e+307); yl+yh= 1.89229e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.92089e+306); yl+yh= 8.92089e+306 ebd0(x=1e+307, M=3.01855e+307): M/x = (r=0.754637720255303) * 2^(e=2); i=65, f=1358, fg=f*2^-(e+10)=0.331543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=2: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=3: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=4: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 3. after ADD1(M): yl,yh = ( 0, 1.91455e+307); yl+yh= 1.91455e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.13774e+306); yl+yh= 9.13774e+306 ebd0(x=1e+307, M=3.05142e+307): M/x = (r=0.762855186256566) * 2^(e=2); i=67, f=1344, fg=f*2^-(e+10)=0.328125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=2: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=3: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=4: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 3. after ADD1(M): yl,yh = ( 0, 1.93706e+307); yl+yh= 1.93706e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.35813e+306); yl+yh= 9.35813e+306 ebd0(x=1e+307, M=3.08465e+307): M/x = (r=0.771162134595737) * 2^(e=2); i=69, f=1331, fg=f*2^-(e+10)=0.324951 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=2: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=3: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=4: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 3. after ADD1(M): yl,yh = ( 0, 1.96057e+307); yl+yh= 1.96057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.58211e+306); yl+yh= 9.58211e+306 ebd0(x=1e+307, M=3.11824e+307): M/x = (r=0.77955953967159) * 2^(e=2); i=72, f=1311, fg=f*2^-(e+10)=0.320068 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=2: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=3: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=4: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 3. after ADD1(M): yl,yh = ( 0, 1.97902e+307); yl+yh= 1.97902e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.8097e+306); yl+yh= 9.8097e+306 ebd0(x=1e+307, M=3.15219e+307): M/x = (r=0.788048386493405) * 2^(e=2); i=74, f=1298, fg=f*2^-(e+10)=0.316895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=2: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=3: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=4: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 3. after ADD1(M): yl,yh = ( 0, 2.00301e+307); yl+yh= 2.00301e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 ebd0(x=1e+307, M=3.18652e+307): M/x = (r=0.796629670796513) * 2^(e=2); i=76, f=1285, fg=f*2^-(e+10)=0.313721 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=2: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=3: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=4: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 3. after ADD1(M): yl,yh = ( 0, 2.02727e+307); yl+yh= 2.02727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.02759e+307); yl+yh= 1.02759e+307 ebd0(x=1e+307, M=3.22122e+307): M/x = (r=0.805304399159088) * 2^(e=2); i=78, f=1273, fg=f*2^-(e+10)=0.310791 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=2: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=3: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=4: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 3. after ADD1(M): yl,yh = ( 0, 2.05258e+307); yl+yh= 2.05258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05146e+307); yl+yh= 1.05146e+307 ebd0(x=1e+307, M=3.25629e+307): M/x = (r=0.814073589120224) * 2^(e=2); i=80, f=1260, fg=f*2^-(e+10)=0.307617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=2: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=3: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=4: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 3. after ADD1(M): yl,yh = ( 0, 2.0774e+307); yl+yh= 2.0774e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0757e+307); yl+yh= 1.0757e+307 ebd0(x=1e+307, M=3.29175e+307): M/x = (r=0.822938269299289) * 2^(e=2); i=83, f=1242, fg=f*2^-(e+10)=0.303223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=2: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=3: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=4: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 3. after ADD1(M): yl,yh = ( 0, 2.09847e+307); yl+yh= 2.09847e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10033e+307); yl+yh= 1.10033e+307 ebd0(x=1e+307, M=3.3276e+307): M/x = (r=0.83189947951658) * 2^(e=2); i=85, f=1231, fg=f*2^-(e+10)=0.300537 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=2: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=3: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=4: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 3. after ADD1(M): yl,yh = ( 0, 2.12541e+307); yl+yh= 2.12541e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.12535e+307); yl+yh= 1.12535e+307 ebd0(x=1e+307, M=3.36383e+307): M/x = (r=0.840958270915297) * 2^(e=2); i=87, f=1219, fg=f*2^-(e+10)=0.297607 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=2: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=3: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=4: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 3. after ADD1(M): yl,yh = ( 0, 2.15185e+307); yl+yh= 2.15185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.15075e+307); yl+yh= 1.15075e+307 ebd0(x=1e+307, M=3.40046e+307): M/x = (r=0.850115706084837) * 2^(e=2); i=90, f=1202, fg=f*2^-(e+10)=0.293457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=2: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=3: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=4: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 3. after ADD1(M): yl,yh = ( 0, 2.17444e+307); yl+yh= 2.17444e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.17655e+307); yl+yh= 1.17655e+307 ebd0(x=1e+307, M=3.43749e+307): M/x = (r=0.859372859185438) * 2^(e=2); i=92, f=1192, fg=f*2^-(e+10)=0.291016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=2: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=3: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=4: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 3. after ADD1(M): yl,yh = ( 0, 2.20311e+307); yl+yh= 2.20311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20275e+307); yl+yh= 1.20275e+307 ebd0(x=1e+307, M=3.47492e+307): M/x = (r=0.868730816074176) * 2^(e=2); i=94, f=1181, fg=f*2^-(e+10)=0.28833 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=2: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=3: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=4: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 3. after ADD1(M): yl,yh = ( 0, 2.23128e+307); yl+yh= 2.23128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.22935e+307); yl+yh= 1.22935e+307 ebd0(x=1e+307, M=3.51276e+307): M/x = (r=0.878190674432335) * 2^(e=2); i=97, f=1165, fg=f*2^-(e+10)=0.284424 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=2: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=3: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=4: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 3. after ADD1(M): yl,yh = ( 0, 2.25547e+307); yl+yh= 2.25547e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.25636e+307); yl+yh= 1.25636e+307 ebd0(x=1e+307, M=3.55101e+307): M/x = (r=0.887753543894164) * 2^(e=2); i=99, f=1155, fg=f*2^-(e+10)=0.281982 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=2: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=3: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=4: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 3. after ADD1(M): yl,yh = ( 0, 2.2851e+307); yl+yh= 2.2851e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.28378e+307); yl+yh= 1.28378e+307 ebd0(x=1e+307, M=3.58968e+307): M/x = (r=0.897420546177039) * 2^(e=2); i=102, f=1140, fg=f*2^-(e+10)=0.27832 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=2: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=3: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=4: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 3. after ADD1(M): yl,yh = ( 0, 2.3107e+307); yl+yh= 2.3107e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.31162e+307); yl+yh= 1.31162e+307 ebd0(x=1e+307, M=3.62877e+307): M/x = (r=0.907192815213034) * 2^(e=2); i=104, f=1130, fg=f*2^-(e+10)=0.275879 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=2: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=3: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=4: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 3. after ADD1(M): yl,yh = ( 0, 2.34098e+307); yl+yh= 2.34098e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33988e+307); yl+yh= 1.33988e+307 ebd0(x=1e+307, M=3.66829e+307): M/x = (r=0.917071497281936) * 2^(e=2); i=107, f=1116, fg=f*2^-(e+10)=0.272461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=2: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=3: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=4: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 3. after ADD1(M): yl,yh = ( 0, 2.36803e+307); yl+yh= 2.36803e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.36856e+307); yl+yh= 1.36856e+307 ebd0(x=1e+307, M=3.70823e+307): M/x = (r=0.9270577511457) * 2^(e=2); i=109, f=1106, fg=f*2^-(e+10)=0.27002 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=2: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=3: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=4: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 3. after ADD1(M): yl,yh = ( 0, 2.39897e+307); yl+yh= 2.39897e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39768e+307); yl+yh= 1.39768e+307 ebd0(x=1e+307, M=3.74861e+307): M/x = (r=0.937152748184372) * 2^(e=2); i=112, f=1092, fg=f*2^-(e+10)=0.266602 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=2: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=3: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=4: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 3. after ADD1(M): yl,yh = ( 0, 2.42661e+307); yl+yh= 2.42661e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42723e+307); yl+yh= 1.42723e+307 ebd0(x=1e+307, M=3.78943e+307): M/x = (r=0.947357672533489) * 2^(e=2); i=115, f=1079, fg=f*2^-(e+10)=0.263428 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=2: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=3: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=4: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 3. after ADD1(M): yl,yh = ( 0, 2.45546e+307); yl+yh= 2.45546e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.45721e+307); yl+yh= 1.45721e+307 ebd0(x=1e+307, M=3.83069e+307): M/x = (r=0.957673721222979) * 2^(e=2); i=117, f=1070, fg=f*2^-(e+10)=0.26123 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=2: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=3: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=4: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 3. after ADD1(M): yl,yh = ( 0, 2.48834e+307); yl+yh= 2.48834e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48765e+307); yl+yh= 1.48765e+307 ebd0(x=1e+307, M=3.87241e+307): M/x = (r=0.968102104317573) * 2^(e=2); i=120, f=1057, fg=f*2^-(e+10)=0.258057 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=2: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=3: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=4: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 3. after ADD1(M): yl,yh = ( 0, 2.51783e+307); yl+yh= 2.51783e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51853e+307); yl+yh= 1.51853e+307 ebd0(x=1e+307, M=3.91458e+307): M/x = (r=0.97864404505874) * 2^(e=2); i=123, f=1044, fg=f*2^-(e+10)=0.254883 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=2: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=3: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=4: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 3. after ADD1(M): yl,yh = ( 0, 2.54763e+307); yl+yh= 2.54763e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54987e+307); yl+yh= 1.54987e+307 ebd0(x=1e+307, M=3.9572e+307): M/x = (r=0.989300780008178) * 2^(e=2); i=125, f=1036, fg=f*2^-(e+10)=0.25293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=2: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=3: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=4: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 3. after ADD1(M): yl,yh = ( 0, 2.58256e+307); yl+yh= 2.58256e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.58167e+307); yl+yh= 1.58167e+307 ebd0(x=1e+307, M=4.00029e+307): M/x = (r=0.500036779596429) * 2^(e=3); i=0, f=2048, fg=f*2^-(e+10)=0.25 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=2: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=3: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=4: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 2.614e+307); yl+yh= 2.614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61393e+307); yl+yh= 1.61393e+307 dpq_ebd0(x[1:1], np[1:257], ... ): ebd0(x=1e+307, M=2.50018e+306): M/x = (r=0.500036779596429) * 2^(e=-1); i=0, f=2048, fg=f*2^-(e+10)=4 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=1: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=2: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=3: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 1.63631e+307); yl+yh= 1.63631e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.36239e+306); yl+yh= 6.36239e+306 ebd0(x=1e+307, M=2.52741e+306): M/x = (r=0.505481823125825) * 2^(e=-1); i=1, f=2032, fg=f*2^-(e+10)=3.96875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=1: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=2: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=3: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 3. after ADD1(M): yl,yh = ( 0, 1.6312e+307); yl+yh= 1.6312e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.28131e+306); yl+yh= 6.28131e+306 ebd0(x=1e+307, M=2.55493e+306): M/x = (r=0.510986159291777) * 2^(e=-1); i=3, f=2001, fg=f*2^-(e+10)=3.9082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=1: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=2: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=3: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 3. after ADD1(M): yl,yh = ( 0, 1.61857e+307); yl+yh= 1.61857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.20053e+306); yl+yh= 6.20053e+306 ebd0(x=1e+307, M=2.58275e+306): M/x = (r=0.516550433748765) * 2^(e=-1); i=4, f=1986, fg=f*2^-(e+10)=3.87891 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=1: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=2: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=3: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 3. after ADD1(M): yl,yh = ( 0, 1.61383e+307); yl+yh= 1.61383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.12005e+306); yl+yh= 6.12005e+306 ebd0(x=1e+307, M=2.61088e+306): M/x = (r=0.522175299181986) * 2^(e=-1); i=6, f=1956, fg=f*2^-(e+10)=3.82031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=1: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=2: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=3: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 3. after ADD1(M): yl,yh = ( 0, 1.60142e+307); yl+yh= 1.60142e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.03987e+306); yl+yh= 6.03987e+306 ebd0(x=1e+307, M=2.63931e+306): M/x = (r=0.52786141538391) * 2^(e=-1); i=7, f=1942, fg=f*2^-(e+10)=3.79297 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=1: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=2: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=3: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 3. after ADD1(M): yl,yh = ( 0, 1.59708e+307); yl+yh= 1.59708e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.95999e+306); yl+yh= 5.95999e+306 ebd0(x=1e+307, M=2.66805e+306): M/x = (r=0.533609449331681) * 2^(e=-1); i=9, f=1913, fg=f*2^-(e+10)=3.73633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=1: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=2: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=3: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 3. after ADD1(M): yl,yh = ( 0, 1.58491e+307); yl+yh= 1.58491e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.88043e+306); yl+yh= 5.88043e+306 ebd0(x=1e+307, M=2.6971e+306): M/x = (r=0.539420075265344) * 2^(e=-1); i=10, f=1900, fg=f*2^-(e+10)=3.71094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=1: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=2: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=3: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 3. after ADD1(M): yl,yh = ( 0, 1.58099e+307); yl+yh= 1.58099e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.80118e+306); yl+yh= 5.80118e+306 ebd0(x=1e+307, M=2.72647e+306): M/x = (r=0.545293974766939) * 2^(e=-1); i=12, f=1872, fg=f*2^-(e+10)=3.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=1: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=2: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=3: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 3. after ADD1(M): yl,yh = ( 0, 1.56909e+307); yl+yh= 1.56909e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.72224e+306); yl+yh= 5.72224e+306 ebd0(x=1e+307, M=2.75616e+306): M/x = (r=0.551231836840444) * 2^(e=-1); i=13, f=1859, fg=f*2^-(e+10)=3.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=1: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=2: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=3: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 3. after ADD1(M): yl,yh = ( 0, 1.56509e+307); yl+yh= 1.56509e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.64363e+306); yl+yh= 5.64363e+306 ebd0(x=1e+307, M=2.78617e+306): M/x = (r=0.557234357992604) * 2^(e=-1); i=15, f=1833, fg=f*2^-(e+10)=3.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=1: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=2: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=3: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 3. after ADD1(M): yl,yh = ( 0, 1.55401e+307); yl+yh= 1.55401e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.56534e+306); yl+yh= 5.56534e+306 ebd0(x=1e+307, M=2.81651e+306): M/x = (r=0.563302242314621) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=1: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54992e+307); yl+yh= 1.54992e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.48737e+306); yl+yh= 5.48737e+306 ebd0(x=1e+307, M=2.84718e+306): M/x = (r=0.56943620156475) * 2^(e=-1); i=18, f=1796, fg=f*2^-(e+10)=3.50781 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=1: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=2: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=3: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 3. after ADD1(M): yl,yh = ( 0, 1.53971e+307); yl+yh= 1.53971e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.40974e+306); yl+yh= 5.40974e+306 ebd0(x=1e+307, M=2.87818e+306): M/x = (r=0.575636955251782) * 2^(e=-1); i=19, f=1783, fg=f*2^-(e+10)=3.48242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=1: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=2: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=3: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 3. after ADD1(M): yl,yh = ( 0, 1.53555e+307); yl+yh= 1.53555e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.33244e+306); yl+yh= 5.33244e+306 ebd0(x=1e+307, M=2.90953e+306): M/x = (r=0.581905230719448) * 2^(e=-1); i=21, f=1759, fg=f*2^-(e+10)=3.43555 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=1: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=2: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=3: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 3. after ADD1(M): yl,yh = ( 0, 1.52513e+307); yl+yh= 1.52513e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.25547e+306); yl+yh= 5.25547e+306 ebd0(x=1e+307, M=2.94121e+306): M/x = (r=0.588241763231733) * 2^(e=-1); i=23, f=1736, fg=f*2^-(e+10)=3.39062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=1: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=2: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=3: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 3. after ADD1(M): yl,yh = ( 0, 1.51514e+307); yl+yh= 1.51514e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.17885e+306); yl+yh= 5.17885e+306 ebd0(x=1e+307, M=2.97324e+306): M/x = (r=0.59464729605912) * 2^(e=-1); i=24, f=1725, fg=f*2^-(e+10)=3.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=1: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=2: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=3: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 3. after ADD1(M): yl,yh = ( 0, 1.51198e+307); yl+yh= 1.51198e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10258e+306); yl+yh= 5.10258e+306 ebd0(x=1e+307, M=3.00561e+306): M/x = (r=0.601122580565778) * 2^(e=-1); i=26, f=1702, fg=f*2^-(e+10)=3.32422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=1: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=2: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=3: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 3. after ADD1(M): yl,yh = ( 0, 1.5018e+307); yl+yh= 1.5018e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.02665e+306); yl+yh= 5.02665e+306 ebd0(x=1e+307, M=3.03834e+306): M/x = (r=0.607668376297695) * 2^(e=-1); i=28, f=1680, fg=f*2^-(e+10)=3.28125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=1: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=2: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=3: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 3. after ADD1(M): yl,yh = ( 0, 1.49206e+307); yl+yh= 1.49206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.95107e+306); yl+yh= 4.95107e+306 ebd0(x=1e+307, M=3.07143e+306): M/x = (r=0.614285451071773) * 2^(e=-1); i=29, f=1670, fg=f*2^-(e+10)=3.26172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=1: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=2: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=3: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 3. after ADD1(M): yl,yh = ( 0, 1.4894e+307); yl+yh= 1.4894e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.87585e+306); yl+yh= 4.87585e+306 ebd0(x=1e+307, M=3.10487e+306): M/x = (r=0.620974581065892) * 2^(e=-1); i=31, f=1649, fg=f*2^-(e+10)=3.2207 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=1: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=2: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=3: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 3. after ADD1(M): yl,yh = ( 0, 1.48009e+307); yl+yh= 1.48009e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.801e+306); yl+yh= 4.801e+306 ebd0(x=1e+307, M=3.13868e+306): M/x = (r=0.627736550909953) * 2^(e=-1); i=33, f=1628, fg=f*2^-(e+10)=3.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=1: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=2: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=3: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 3. after ADD1(M): yl,yh = ( 0, 1.47065e+307); yl+yh= 1.47065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7265e+306); yl+yh= 4.7265e+306 ebd0(x=1e+307, M=3.17286e+306): M/x = (r=0.634572153777919) * 2^(e=-1); i=34, f=1618, fg=f*2^-(e+10)=3.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=1: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=2: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=3: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 3. after ADD1(M): yl,yh = ( 0, 1.46791e+307); yl+yh= 1.46791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.65238e+306); yl+yh= 4.65238e+306 ebd0(x=1e+307, M=3.20741e+306): M/x = (r=0.641482191480851) * 2^(e=-1); i=36, f=1598, fg=f*2^-(e+10)=3.12109 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=1: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=2: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=3: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 3. after ADD1(M): yl,yh = ( 0, 1.45893e+307); yl+yh= 1.45893e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.57862e+306); yl+yh= 4.57862e+306 ebd0(x=1e+307, M=3.24234e+306): M/x = (r=0.648467474560957) * 2^(e=-1); i=38, f=1579, fg=f*2^-(e+10)=3.08398 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=1: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=2: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=3: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 3. after ADD1(M): yl,yh = ( 0, 1.45046e+307); yl+yh= 1.45046e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.50524e+306); yl+yh= 4.50524e+306 ebd0(x=1e+307, M=3.27764e+306): M/x = (r=0.655528822386676) * 2^(e=-1); i=40, f=1560, fg=f*2^-(e+10)=3.04688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=1: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=2: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=3: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 3. after ADD1(M): yl,yh = ( 0, 1.44188e+307); yl+yh= 1.44188e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43225e+306); yl+yh= 4.43225e+306 ebd0(x=1e+307, M=3.31334e+306): M/x = (r=0.662667063248778) * 2^(e=-1); i=42, f=1542, fg=f*2^-(e+10)=3.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=1: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=2: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=3: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 3. after ADD1(M): yl,yh = ( 0, 1.43385e+307); yl+yh= 1.43385e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.35963e+306); yl+yh= 4.35963e+306 ebd0(x=1e+307, M=3.34942e+306): M/x = (r=0.669883034457535) * 2^(e=-1); i=43, f=1533, fg=f*2^-(e+10)=2.99414 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=1: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=2: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=3: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 3. after ADD1(M): yl,yh = ( 0, 1.4316e+307); yl+yh= 1.4316e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.28741e+306); yl+yh= 4.28741e+306 ebd0(x=1e+307, M=3.38589e+306): M/x = (r=0.677177582440924) * 2^(e=-1); i=45, f=1515, fg=f*2^-(e+10)=2.95898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=1: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=2: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=3: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 3. after ADD1(M): yl,yh = ( 0, 1.42344e+307); yl+yh= 1.42344e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.21558e+306); yl+yh= 4.21558e+306 ebd0(x=1e+307, M=3.42276e+306): M/x = (r=0.684551562843922) * 2^(e=-1); i=47, f=1498, fg=f*2^-(e+10)=2.92578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=1: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=2: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=3: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 3. after ADD1(M): yl,yh = ( 0, 1.41584e+307); yl+yh= 1.41584e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14414e+306); yl+yh= 4.14414e+306 ebd0(x=1e+307, M=3.46003e+306): M/x = (r=0.692005840628868) * 2^(e=-1); i=49, f=1481, fg=f*2^-(e+10)=2.89258 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=1: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=2: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=3: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 3. after ADD1(M): yl,yh = ( 0, 1.40815e+307); yl+yh= 1.40815e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.07311e+306); yl+yh= 4.07311e+306 ebd0(x=1e+307, M=3.49771e+306): M/x = (r=0.699541290176923) * 2^(e=-1); i=51, f=1464, fg=f*2^-(e+10)=2.85938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=1: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=2: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=3: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 3. after ADD1(M): yl,yh = ( 0, 1.40037e+307); yl+yh= 1.40037e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.00248e+306); yl+yh= 4.00248e+306 ebd0(x=1e+307, M=3.53579e+306): M/x = (r=0.707158795390635) * 2^(e=-1); i=53, f=1448, fg=f*2^-(e+10)=2.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=1: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=2: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=3: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 3. after ADD1(M): yl,yh = ( 0, 1.39319e+307); yl+yh= 1.39319e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.93227e+306); yl+yh= 3.93227e+306 ebd0(x=1e+307, M=3.5743e+306): M/x = (r=0.71485924979762) * 2^(e=-1); i=55, f=1432, fg=f*2^-(e+10)=2.79688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=1: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=2: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=3: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 3. after ADD1(M): yl,yh = ( 0, 1.38593e+307); yl+yh= 1.38593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.86246e+306); yl+yh= 3.86246e+306 ebd0(x=1e+307, M=3.61322e+306): M/x = (r=0.72264355665537) * 2^(e=-1); i=57, f=1417, fg=f*2^-(e+10)=2.76758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=1: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=2: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=3: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 3. after ADD1(M): yl,yh = ( 0, 1.37929e+307); yl+yh= 1.37929e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.79308e+306); yl+yh= 3.79308e+306 ebd0(x=1e+307, M=3.65256e+306): M/x = (r=0.730512629057209) * 2^(e=-1); i=59, f=1402, fg=f*2^-(e+10)=2.73828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=1: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=2: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=3: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 3. after ADD1(M): yl,yh = ( 0, 1.37259e+307); yl+yh= 1.37259e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.72412e+306); yl+yh= 3.72412e+306 ebd0(x=1e+307, M=3.69234e+306): M/x = (r=0.738467390039392) * 2^(e=-1); i=61, f=1387, fg=f*2^-(e+10)=2.70898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=1: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=2: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=3: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 3. after ADD1(M): yl,yh = ( 0, 1.36581e+307); yl+yh= 1.36581e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.65559e+306); yl+yh= 3.65559e+306 ebd0(x=1e+307, M=3.73254e+306): M/x = (r=0.746508772689384) * 2^(e=-1); i=63, f=1372, fg=f*2^-(e+10)=2.67969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=1: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=2: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=3: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 3. after ADD1(M): yl,yh = ( 0, 1.35895e+307); yl+yh= 1.35895e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.58749e+306); yl+yh= 3.58749e+306 ebd0(x=1e+307, M=3.77319e+306): M/x = (r=0.754637720255303) * 2^(e=-1); i=65, f=1358, fg=f*2^-(e+10)=2.65234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=1: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=2: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=3: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 3. after ADD1(M): yl,yh = ( 0, 1.35276e+307); yl+yh= 1.35276e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.51984e+306); yl+yh= 3.51984e+306 ebd0(x=1e+307, M=3.81428e+306): M/x = (r=0.762855186256566) * 2^(e=-1); i=67, f=1344, fg=f*2^-(e+10)=2.625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=1: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=2: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=3: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 3. after ADD1(M): yl,yh = ( 0, 1.34651e+307); yl+yh= 1.34651e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.45262e+306); yl+yh= 3.45262e+306 ebd0(x=1e+307, M=3.85581e+306): M/x = (r=0.771162134595737) * 2^(e=-1); i=69, f=1331, fg=f*2^-(e+10)=2.59961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=1: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=2: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=3: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 3. after ADD1(M): yl,yh = ( 0, 1.34095e+307); yl+yh= 1.34095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.38585e+306); yl+yh= 3.38585e+306 ebd0(x=1e+307, M=3.8978e+306): M/x = (r=0.77955953967159) * 2^(e=-1); i=72, f=1311, fg=f*2^-(e+10)=2.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=1: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=2: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=3: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 3. after ADD1(M): yl,yh = ( 0, 1.33e+307); yl+yh= 1.33e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.31953e+306); yl+yh= 3.31953e+306 ebd0(x=1e+307, M=3.94024e+306): M/x = (r=0.788048386493405) * 2^(e=-1); i=74, f=1298, fg=f*2^-(e+10)=2.53516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=1: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=2: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=3: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 3. after ADD1(M): yl,yh = ( 0, 1.32428e+307); yl+yh= 1.32428e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.25367e+306); yl+yh= 3.25367e+306 ebd0(x=1e+307, M=3.98315e+306): M/x = (r=0.796629670796513) * 2^(e=-1); i=76, f=1285, fg=f*2^-(e+10)=2.50977 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=1: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=2: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=3: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 3. after ADD1(M): yl,yh = ( 0, 1.3185e+307); yl+yh= 1.3185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.18827e+306); yl+yh= 3.18827e+306 ebd0(x=1e+307, M=4.02652e+306): M/x = (r=0.805304399159088) * 2^(e=-1); i=78, f=1273, fg=f*2^-(e+10)=2.48633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=1: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=2: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=3: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 3. after ADD1(M): yl,yh = ( 0, 1.31346e+307); yl+yh= 1.31346e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.12334e+306); yl+yh= 3.12334e+306 ebd0(x=1e+307, M=4.07037e+306): M/x = (r=0.814073589120224) * 2^(e=-1); i=80, f=1260, fg=f*2^-(e+10)=2.46094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=1: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=2: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=3: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 3. after ADD1(M): yl,yh = ( 0, 1.30758e+307); yl+yh= 1.30758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05888e+306); yl+yh= 3.05888e+306 ebd0(x=1e+307, M=4.11469e+306): M/x = (r=0.822938269299289) * 2^(e=-1); i=83, f=1242, fg=f*2^-(e+10)=2.42578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=1: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=2: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=3: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 3. after ADD1(M): yl,yh = ( 0, 1.29762e+307); yl+yh= 1.29762e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.9949e+306); yl+yh= 2.9949e+306 ebd0(x=1e+307, M=4.1595e+306): M/x = (r=0.83189947951658) * 2^(e=-1); i=85, f=1231, fg=f*2^-(e+10)=2.4043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, 8.77257e+306); yl+yh= 8.77257e+306 j=1: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=2: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=3: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 3. after ADD1(M): yl,yh = ( 0, 1.29321e+307); yl+yh= 1.29321e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.93141e+306); yl+yh= 2.93141e+306 ebd0(x=1e+307, M=4.20479e+306): M/x = (r=0.840958270915297) * 2^(e=-1); i=87, f=1219, fg=f*2^-(e+10)=2.38086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=1: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=2: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=3: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 3. after ADD1(M): yl,yh = ( 0, 1.28794e+307); yl+yh= 1.28794e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.8684e+306); yl+yh= 2.8684e+306 ebd0(x=1e+307, M=4.25058e+306): M/x = (r=0.850115706084837) * 2^(e=-1); i=90, f=1202, fg=f*2^-(e+10)=2.34766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=1: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=2: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=3: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 3. after ADD1(M): yl,yh = ( 0, 1.27848e+307); yl+yh= 1.27848e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.80588e+306); yl+yh= 2.80588e+306 ebd0(x=1e+307, M=4.29686e+306): M/x = (r=0.859372859185438) * 2^(e=-1); i=92, f=1192, fg=f*2^-(e+10)=2.32812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=1: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=2: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=3: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 3. after ADD1(M): yl,yh = ( 0, 1.27475e+307); yl+yh= 1.27475e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.74386e+306); yl+yh= 2.74386e+306 ebd0(x=1e+307, M=4.34365e+306): M/x = (r=0.868730816074176) * 2^(e=-1); i=94, f=1181, fg=f*2^-(e+10)=2.30664 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=1: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=2: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=3: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 3. after ADD1(M): yl,yh = ( 0, 1.27016e+307); yl+yh= 1.27016e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.68235e+306); yl+yh= 2.68235e+306 ebd0(x=1e+307, M=4.39095e+306): M/x = (r=0.878190674432335) * 2^(e=-1); i=97, f=1165, fg=f*2^-(e+10)=2.27539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=1: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=2: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=3: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 3. after ADD1(M): yl,yh = ( 0, 1.26125e+307); yl+yh= 1.26125e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62134e+306); yl+yh= 2.62134e+306 ebd0(x=1e+307, M=4.43877e+306): M/x = (r=0.887753543894164) * 2^(e=-1); i=99, f=1155, fg=f*2^-(e+10)=2.25586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=1: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=2: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=3: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 3. after ADD1(M): yl,yh = ( 0, 1.25741e+307); yl+yh= 1.25741e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.56085e+306); yl+yh= 2.56085e+306 ebd0(x=1e+307, M=4.4871e+306): M/x = (r=0.897420546177039) * 2^(e=-1); i=102, f=1140, fg=f*2^-(e+10)=2.22656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=1: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=2: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=3: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 3. after ADD1(M): yl,yh = ( 0, 1.24917e+307); yl+yh= 1.24917e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.50088e+306); yl+yh= 2.50088e+306 ebd0(x=1e+307, M=4.53596e+306): M/x = (r=0.907192815213034) * 2^(e=-1); i=104, f=1130, fg=f*2^-(e+10)=2.20703 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=1: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=2: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=3: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 3. after ADD1(M): yl,yh = ( 0, 1.24525e+307); yl+yh= 1.24525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.44144e+306); yl+yh= 2.44144e+306 ebd0(x=1e+307, M=4.58536e+306): M/x = (r=0.917071497281936) * 2^(e=-1); i=107, f=1116, fg=f*2^-(e+10)=2.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=1: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=2: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=3: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 3. after ADD1(M): yl,yh = ( 0, 1.23772e+307); yl+yh= 1.23772e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38253e+306); yl+yh= 2.38253e+306 ebd0(x=1e+307, M=4.63529e+306): M/x = (r=0.9270577511457) * 2^(e=-1); i=109, f=1106, fg=f*2^-(e+10)=2.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=1: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=2: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=3: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 3. after ADD1(M): yl,yh = ( 0, 1.23371e+307); yl+yh= 1.23371e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.32415e+306); yl+yh= 2.32415e+306 ebd0(x=1e+307, M=4.68576e+306): M/x = (r=0.937152748184372) * 2^(e=-1); i=112, f=1092, fg=f*2^-(e+10)=2.13281 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=1: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=2: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=3: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 3. after ADD1(M): yl,yh = ( 0, 1.22602e+307); yl+yh= 1.22602e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.26633e+306); yl+yh= 2.26633e+306 ebd0(x=1e+307, M=4.73679e+306): M/x = (r=0.947357672533489) * 2^(e=-1); i=115, f=1079, fg=f*2^-(e+10)=2.10742 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=1: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=2: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=3: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 3. after ADD1(M): yl,yh = ( 0, 1.21915e+307); yl+yh= 1.21915e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.20905e+306); yl+yh= 2.20905e+306 ebd0(x=1e+307, M=4.78837e+306): M/x = (r=0.957673721222979) * 2^(e=-1); i=117, f=1070, fg=f*2^-(e+10)=2.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=1: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=2: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=3: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 3. after ADD1(M): yl,yh = ( 0, 1.21593e+307); yl+yh= 1.21593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.15232e+306); yl+yh= 2.15232e+306 ebd0(x=1e+307, M=4.84051e+306): M/x = (r=0.968102104317573) * 2^(e=-1); i=120, f=1057, fg=f*2^-(e+10)=2.06445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=1: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=2: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=3: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 3. after ADD1(M): yl,yh = ( 0, 1.20892e+307); yl+yh= 1.20892e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09616e+306); yl+yh= 2.09616e+306 ebd0(x=1e+307, M=4.89322e+306): M/x = (r=0.97864404505874) * 2^(e=-1); i=123, f=1044, fg=f*2^-(e+10)=2.03906 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=1: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=2: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=3: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 3. after ADD1(M): yl,yh = ( 0, 1.20181e+307); yl+yh= 1.20181e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.04056e+306); yl+yh= 2.04056e+306 ebd0(x=1e+307, M=4.9465e+306): M/x = (r=0.989300780008178) * 2^(e=-1); i=125, f=1036, fg=f*2^-(e+10)=2.02344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=1: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=2: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=3: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 3. after ADD1(M): yl,yh = ( 0, 1.19945e+307); yl+yh= 1.19945e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.98554e+306); yl+yh= 1.98554e+306 ebd0(x=1e+307, M=5.00037e+306): M/x = (r=0.500036779596429) * 2^(e=0); i=0, f=2048, fg=f*2^-(e+10)=2 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=1: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=2: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=3: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.19318e+307); yl+yh= 1.19318e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.9311e+306); yl+yh= 1.9311e+306 ebd0(x=1e+307, M=5.05482e+306): M/x = (r=0.505481823125825) * 2^(e=0); i=1, f=2032, fg=f*2^-(e+10)=1.98438 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=1: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=2: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=3: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 3. after ADD1(M): yl,yh = ( 0, 1.19079e+307); yl+yh= 1.19079e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.87725e+306); yl+yh= 1.87725e+306 ebd0(x=1e+307, M=5.10986e+306): M/x = (r=0.510986159291777) * 2^(e=0); i=3, f=2001, fg=f*2^-(e+10)=1.9541 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=1: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=2: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=3: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 3. after ADD1(M): yl,yh = ( 0, 1.18092e+307); yl+yh= 1.18092e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.82399e+306); yl+yh= 1.82399e+306 ebd0(x=1e+307, M=5.1655e+306): M/x = (r=0.516550433748765) * 2^(e=0); i=4, f=1986, fg=f*2^-(e+10)=1.93945 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=1: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=2: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=3: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 3. after ADD1(M): yl,yh = ( 0, 1.17896e+307); yl+yh= 1.17896e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77133e+306); yl+yh= 1.77133e+306 ebd0(x=1e+307, M=5.22175e+306): M/x = (r=0.522175299181986) * 2^(e=0); i=6, f=1956, fg=f*2^-(e+10)=1.91016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=1: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=2: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=3: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 3. after ADD1(M): yl,yh = ( 0, 1.16936e+307); yl+yh= 1.16936e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.71927e+306); yl+yh= 1.71927e+306 ebd0(x=1e+307, M=5.27861e+306): M/x = (r=0.52786141538391) * 2^(e=0); i=7, f=1942, fg=f*2^-(e+10)=1.89648 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=1: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=2: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=3: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 3. after ADD1(M): yl,yh = ( 0, 1.16786e+307); yl+yh= 1.16786e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.66783e+306); yl+yh= 1.66783e+306 ebd0(x=1e+307, M=5.33609e+306): M/x = (r=0.533609449331681) * 2^(e=0); i=9, f=1913, fg=f*2^-(e+10)=1.86816 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=1: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=2: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=3: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 3. after ADD1(M): yl,yh = ( 0, 1.15857e+307); yl+yh= 1.15857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61701e+306); yl+yh= 1.61701e+306 ebd0(x=1e+307, M=5.3942e+306): M/x = (r=0.539420075265344) * 2^(e=0); i=10, f=1900, fg=f*2^-(e+10)=1.85547 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=1: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=2: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=3: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 3. after ADD1(M): yl,yh = ( 0, 1.15756e+307); yl+yh= 1.15756e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.56681e+306); yl+yh= 1.56681e+306 ebd0(x=1e+307, M=5.45294e+306): M/x = (r=0.545293974766939) * 2^(e=0); i=12, f=1872, fg=f*2^-(e+10)=1.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=1: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=2: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=3: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 3. after ADD1(M): yl,yh = ( 0, 1.14859e+307); yl+yh= 1.14859e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51724e+306); yl+yh= 1.51724e+306 ebd0(x=1e+307, M=5.51232e+306): M/x = (r=0.551231836840444) * 2^(e=0); i=13, f=1859, fg=f*2^-(e+10)=1.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=1: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=2: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=3: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 3. after ADD1(M): yl,yh = ( 0, 1.14755e+307); yl+yh= 1.14755e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.46832e+306); yl+yh= 1.46832e+306 ebd0(x=1e+307, M=5.57234e+306): M/x = (r=0.557234357992604) * 2^(e=0); i=15, f=1833, fg=f*2^-(e+10)=1.79004 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=1: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=2: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=3: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 3. after ADD1(M): yl,yh = ( 0, 1.13948e+307); yl+yh= 1.13948e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42004e+306); yl+yh= 1.42004e+306 ebd0(x=1e+307, M=5.63302e+306): M/x = (r=0.563302242314621) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.13842e+307); yl+yh= 1.13842e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.37241e+306); yl+yh= 1.37241e+306 ebd0(x=1e+307, M=5.69436e+306): M/x = (r=0.56943620156475) * 2^(e=0); i=18, f=1796, fg=f*2^-(e+10)=1.75391 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=1: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=2: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=3: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 3. after ADD1(M): yl,yh = ( 0, 1.13128e+307); yl+yh= 1.13128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.32545e+306); yl+yh= 1.32545e+306 ebd0(x=1e+307, M=5.75637e+306): M/x = (r=0.575636955251782) * 2^(e=0); i=19, f=1783, fg=f*2^-(e+10)=1.74121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=1: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=2: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=3: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 3. after ADD1(M): yl,yh = ( 0, 1.13022e+307); yl+yh= 1.13022e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27915e+306); yl+yh= 1.27915e+306 ebd0(x=1e+307, M=5.81905e+306): M/x = (r=0.581905230719448) * 2^(e=0); i=21, f=1759, fg=f*2^-(e+10)=1.71777 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=1: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=2: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=3: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 3. after ADD1(M): yl,yh = ( 0, 1.12293e+307); yl+yh= 1.12293e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.23353e+306); yl+yh= 1.23353e+306 ebd0(x=1e+307, M=5.88242e+306): M/x = (r=0.588241763231733) * 2^(e=0); i=23, f=1736, fg=f*2^-(e+10)=1.69531 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=1: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=2: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=3: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 3. after ADD1(M): yl,yh = ( 0, 1.11611e+307); yl+yh= 1.11611e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.18859e+306); yl+yh= 1.18859e+306 ebd0(x=1e+307, M=5.94647e+306): M/x = (r=0.59464729605912) * 2^(e=0); i=24, f=1725, fg=f*2^-(e+10)=1.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=1: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=2: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=3: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 3. after ADD1(M): yl,yh = ( 0, 1.11616e+307); yl+yh= 1.11616e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14434e+306); yl+yh= 1.14434e+306 ebd0(x=1e+307, M=6.01123e+306): M/x = (r=0.601122580565778) * 2^(e=0); i=26, f=1702, fg=f*2^-(e+10)=1.66211 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=1: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=2: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=3: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 3. after ADD1(M): yl,yh = ( 0, 1.10921e+307); yl+yh= 1.10921e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10079e+306); yl+yh= 1.10079e+306 ebd0(x=1e+307, M=6.07668e+306): M/x = (r=0.607668376297695) * 2^(e=0); i=28, f=1680, fg=f*2^-(e+10)=1.64062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=1: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=2: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=3: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 3. after ADD1(M): yl,yh = ( 0, 1.10275e+307); yl+yh= 1.10275e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05794e+306); yl+yh= 1.05794e+306 ebd0(x=1e+307, M=6.14285e+306): M/x = (r=0.614285451071773) * 2^(e=0); i=29, f=1670, fg=f*2^-(e+10)=1.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=1: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=2: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=3: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 3. after ADD1(M): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.01581e+306); yl+yh= 1.01581e+306 ebd0(x=1e+307, M=6.20975e+306): M/x = (r=0.620974581065892) * 2^(e=0); i=31, f=1649, fg=f*2^-(e+10)=1.61035 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=1: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=2: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=3: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 3. after ADD1(M): yl,yh = ( 0, 1.09743e+307); yl+yh= 1.09743e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.74397e+305); yl+yh= 9.74397e+305 ebd0(x=1e+307, M=6.27737e+306): M/x = (r=0.627736550909953) * 2^(e=0); i=33, f=1628, fg=f*2^-(e+10)=1.58984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=1: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=2: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=3: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 3. after ADD1(M): yl,yh = ( 0, 1.09137e+307); yl+yh= 1.09137e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.33713e+305); yl+yh= 9.33713e+305 ebd0(x=1e+307, M=6.34572e+306): M/x = (r=0.634572153777919) * 2^(e=0); i=34, f=1618, fg=f*2^-(e+10)=1.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=1: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=2: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=3: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 3. after ADD1(M): yl,yh = ( 0, 1.09205e+307); yl+yh= 1.09205e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.93764e+305); yl+yh= 8.93764e+305 ebd0(x=1e+307, M=6.41482e+306): M/x = (r=0.641482191480851) * 2^(e=0); i=36, f=1598, fg=f*2^-(e+10)=1.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=1: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=2: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=3: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 3. after ADD1(M): yl,yh = ( 0, 1.08652e+307); yl+yh= 1.08652e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.5456e+305); yl+yh= 8.5456e+305 ebd0(x=1e+307, M=6.48467e+306): M/x = (r=0.648467474560957) * 2^(e=0); i=38, f=1579, fg=f*2^-(e+10)=1.54199 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=1: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=2: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=3: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 3. after ADD1(M): yl,yh = ( 0, 1.08154e+307); yl+yh= 1.08154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.16109e+305); yl+yh= 8.16109e+305 ebd0(x=1e+307, M=6.55529e+306): M/x = (r=0.655528822386676) * 2^(e=0); i=40, f=1560, fg=f*2^-(e+10)=1.52344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=1: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=2: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=3: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 3. after ADD1(M): yl,yh = ( 0, 1.0765e+307); yl+yh= 1.0765e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.78418e+305); yl+yh= 7.78418e+305 ebd0(x=1e+307, M=6.62667e+306): M/x = (r=0.662667063248778) * 2^(e=0); i=42, f=1542, fg=f*2^-(e+10)=1.50586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=1: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=2: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=3: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 3. after ADD1(M): yl,yh = ( 0, 1.07203e+307); yl+yh= 1.07203e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.41496e+305); yl+yh= 7.41496e+305 ebd0(x=1e+307, M=6.69883e+306): M/x = (r=0.669883034457535) * 2^(e=0); i=43, f=1533, fg=f*2^-(e+10)=1.49707 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=1: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=2: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=3: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 3. after ADD1(M): yl,yh = ( 0, 1.0734e+307); yl+yh= 1.0734e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05352e+305); yl+yh= 7.05352e+305 ebd0(x=1e+307, M=6.77178e+306): M/x = (r=0.677177582440924) * 2^(e=0); i=45, f=1515, fg=f*2^-(e+10)=1.47949 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=1: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=2: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=3: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 3. after ADD1(M): yl,yh = ( 0, 1.06888e+307); yl+yh= 1.06888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.69993e+305); yl+yh= 6.69993e+305 ebd0(x=1e+307, M=6.84552e+306): M/x = (r=0.684551562843922) * 2^(e=0); i=47, f=1498, fg=f*2^-(e+10)=1.46289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=1: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=2: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=3: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 3. after ADD1(M): yl,yh = ( 0, 1.06497e+307); yl+yh= 1.06497e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.35429e+305); yl+yh= 6.35429e+305 ebd0(x=1e+307, M=6.92006e+306): M/x = (r=0.692005840628868) * 2^(e=0); i=49, f=1481, fg=f*2^-(e+10)=1.44629 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=1: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=2: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=3: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 3. after ADD1(M): yl,yh = ( 0, 1.06101e+307); yl+yh= 1.06101e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.01667e+305); yl+yh= 6.01667e+305 ebd0(x=1e+307, M=6.99541e+306): M/x = (r=0.699541290176923) * 2^(e=0); i=51, f=1464, fg=f*2^-(e+10)=1.42969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=1: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=2: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=3: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 3. after ADD1(M): yl,yh = ( 0, 1.057e+307); yl+yh= 1.057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.68717e+305); yl+yh= 5.68717e+305 ebd0(x=1e+307, M=7.07159e+306): M/x = (r=0.707158795390635) * 2^(e=0); i=53, f=1448, fg=f*2^-(e+10)=1.41406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=1: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=2: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=3: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 3. after ADD1(M): yl,yh = ( 0, 1.05363e+307); yl+yh= 1.05363e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36588e+305); yl+yh= 5.36588e+305 ebd0(x=1e+307, M=7.14859e+306): M/x = (r=0.71485924979762) * 2^(e=0); i=55, f=1432, fg=f*2^-(e+10)=1.39844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=1: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=2: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=3: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 3. after ADD1(M): yl,yh = ( 0, 1.05021e+307); yl+yh= 1.05021e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.05289e+305); yl+yh= 5.05289e+305 ebd0(x=1e+307, M=7.22644e+306): M/x = (r=0.72264355665537) * 2^(e=0); i=57, f=1417, fg=f*2^-(e+10)=1.38379 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=1: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=2: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=3: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 3. after ADD1(M): yl,yh = ( 0, 1.04747e+307); yl+yh= 1.04747e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.74827e+305); yl+yh= 4.74827e+305 ebd0(x=1e+307, M=7.30513e+306): M/x = (r=0.730512629057209) * 2^(e=0); i=59, f=1402, fg=f*2^-(e+10)=1.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=1: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=2: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=3: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 3. after ADD1(M): yl,yh = ( 0, 1.0447e+307); yl+yh= 1.0447e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.45214e+305); yl+yh= 4.45214e+305 ebd0(x=1e+307, M=7.38467e+306): M/x = (r=0.738467390039392) * 2^(e=0); i=61, f=1387, fg=f*2^-(e+10)=1.35449 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=1: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=2: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=3: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 3. after ADD1(M): yl,yh = ( 0, 1.04189e+307); yl+yh= 1.04189e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.16457e+305); yl+yh= 4.16457e+305 ebd0(x=1e+307, M=7.46509e+306): M/x = (r=0.746508772689384) * 2^(e=0); i=63, f=1372, fg=f*2^-(e+10)=1.33984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=1: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=2: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=3: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 3. after ADD1(M): yl,yh = ( 0, 1.03906e+307); yl+yh= 1.03906e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88567e+305); yl+yh= 3.88567e+305 ebd0(x=1e+307, M=7.54638e+306): M/x = (r=0.754637720255303) * 2^(e=0); i=65, f=1358, fg=f*2^-(e+10)=1.32617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=1: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=2: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=3: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 3. after ADD1(M): yl,yh = ( 0, 1.03693e+307); yl+yh= 1.03693e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.61552e+305); yl+yh= 3.61552e+305 ebd0(x=1e+307, M=7.62855e+306): M/x = (r=0.762855186256566) * 2^(e=0); i=67, f=1344, fg=f*2^-(e+10)=1.3125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, 2.71935e+306); yl+yh= 2.71935e+306 j=1: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=2: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=3: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 3. after ADD1(M): yl,yh = ( 0, 1.03479e+307); yl+yh= 1.03479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.35422e+305); yl+yh= 3.35422e+305 ebd0(x=1e+307, M=7.71162e+306): M/x = (r=0.771162134595737) * 2^(e=0); i=69, f=1331, fg=f*2^-(e+10)=1.2998 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=1: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=2: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=3: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 3. after ADD1(M): yl,yh = ( 0, 1.03338e+307); yl+yh= 1.03338e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.10188e+305); yl+yh= 3.10188e+305 ebd0(x=1e+307, M=7.7956e+306): M/x = (r=0.77955953967159) * 2^(e=0); i=72, f=1311, fg=f*2^-(e+10)=1.28027 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=1: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=2: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=3: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 3. after ADD1(M): yl,yh = ( 0, 1.02664e+307); yl+yh= 1.02664e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85858e+305); yl+yh= 2.85858e+305 ebd0(x=1e+307, M=7.88048e+306): M/x = (r=0.788048386493405) * 2^(e=0); i=74, f=1298, fg=f*2^-(e+10)=1.26758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=1: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=2: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=3: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 3. after ADD1(M): yl,yh = ( 0, 1.02516e+307); yl+yh= 1.02516e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62442e+305); yl+yh= 2.62442e+305 ebd0(x=1e+307, M=7.9663e+306): M/x = (r=0.796629670796513) * 2^(e=0); i=76, f=1285, fg=f*2^-(e+10)=1.25488 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=1: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=2: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=3: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 3. after ADD1(M): yl,yh = ( 0, 1.02367e+307); yl+yh= 1.02367e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.3995e+305); yl+yh= 2.3995e+305 ebd0(x=1e+307, M=8.05304e+306): M/x = (r=0.805304399159088) * 2^(e=0); i=78, f=1273, fg=f*2^-(e+10)=1.24316 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=1: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=2: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=3: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 3. after ADD1(M): yl,yh = ( 0, 1.02296e+307); yl+yh= 1.02296e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18393e+305); yl+yh= 2.18393e+305 ebd0(x=1e+307, M=8.14074e+306): M/x = (r=0.814073589120224) * 2^(e=0); i=80, f=1260, fg=f*2^-(e+10)=1.23047 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=1: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=2: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=3: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 3. after ADD1(M): yl,yh = ( 0, 1.02147e+307); yl+yh= 1.02147e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.97781e+305); yl+yh= 1.97781e+305 ebd0(x=1e+307, M=8.22938e+306): M/x = (r=0.822938269299289) * 2^(e=0); i=83, f=1242, fg=f*2^-(e+10)=1.21289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=1: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=2: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=3: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 3. after ADD1(M): yl,yh = ( 0, 1.01595e+307); yl+yh= 1.01595e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.78124e+305); yl+yh= 1.78124e+305 ebd0(x=1e+307, M=8.31899e+306): M/x = (r=0.83189947951658) * 2^(e=0); i=85, f=1231, fg=f*2^-(e+10)=1.20215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=1: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=2: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=3: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 3. after ADD1(M): yl,yh = ( 0, 1.01601e+307); yl+yh= 1.01601e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59431e+305); yl+yh= 1.59431e+305 ebd0(x=1e+307, M=8.40958e+306): M/x = (r=0.840958270915297) * 2^(e=0); i=87, f=1219, fg=f*2^-(e+10)=1.19043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=1: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=2: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=3: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 3. after ADD1(M): yl,yh = ( 0, 1.01527e+307); yl+yh= 1.01527e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41715e+305); yl+yh= 1.41715e+305 ebd0(x=1e+307, M=8.50116e+306): M/x = (r=0.850115706084837) * 2^(e=0); i=90, f=1202, fg=f*2^-(e+10)=1.17383 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=1: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=2: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=3: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 3. after ADD1(M): yl,yh = ( 0, 1.01039e+307); yl+yh= 1.01039e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.24985e+305); yl+yh= 1.24985e+305 ebd0(x=1e+307, M=8.59373e+306): M/x = (r=0.859372859185438) * 2^(e=0); i=92, f=1192, fg=f*2^-(e+10)=1.16406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=1: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=2: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=3: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 3. after ADD1(M): yl,yh = ( 0, 1.01129e+307); yl+yh= 1.01129e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09252e+305); yl+yh= 1.09252e+305 ebd0(x=1e+307, M=8.68731e+306): M/x = (r=0.868730816074176) * 2^(e=0); i=94, f=1181, fg=f*2^-(e+10)=1.15332 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=1: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=2: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=3: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 3. after ADD1(M): yl,yh = ( 0, 1.01138e+307); yl+yh= 1.01138e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.45278e+304); yl+yh= 9.45278e+304 ebd0(x=1e+307, M=8.78191e+306): M/x = (r=0.878190674432335) * 2^(e=0); i=97, f=1165, fg=f*2^-(e+10)=1.1377 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=1: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=2: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=3: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 3. after ADD1(M): yl,yh = ( 0, 1.0072e+307); yl+yh= 1.0072e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08221e+304); yl+yh= 8.08221e+304 ebd0(x=1e+307, M=8.87754e+306): M/x = (r=0.887753543894164) * 2^(e=0); i=99, f=1155, fg=f*2^-(e+10)=1.12793 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=1: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=2: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=3: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 3. after ADD1(M): yl,yh = ( 0, 1.00814e+307); yl+yh= 1.00814e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.81466e+304); yl+yh= 6.81466e+304 ebd0(x=1e+307, M=8.97421e+306): M/x = (r=0.897420546177039) * 2^(e=0); i=102, f=1140, fg=f*2^-(e+10)=1.11328 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=1: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=2: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=3: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 3. after ADD1(M): yl,yh = ( 0, 1.00473e+307); yl+yh= 1.00473e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.65124e+304); yl+yh= 5.65124e+304 ebd0(x=1e+307, M=9.07193e+306): M/x = (r=0.907192815213034) * 2^(e=0); i=104, f=1130, fg=f*2^-(e+10)=1.10352 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=1: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=2: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=3: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 3. after ADD1(M): yl,yh = ( 0, 1.00569e+307); yl+yh= 1.00569e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.59308e+304); yl+yh= 4.59308e+304 ebd0(x=1e+307, M=9.17071e+306): M/x = (r=0.917071497281936) * 2^(e=0); i=107, f=1116, fg=f*2^-(e+10)=1.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=1: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=2: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=3: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 3. after ADD1(M): yl,yh = ( 0, 1.00311e+307); yl+yh= 1.00311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64134e+304); yl+yh= 3.64134e+304 ebd0(x=1e+307, M=9.27058e+306): M/x = (r=0.9270577511457) * 2^(e=0); i=109, f=1106, fg=f*2^-(e+10)=1.08008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=1: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=2: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=3: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 3. after ADD1(M): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79717e+304); yl+yh= 2.79717e+304 ebd0(x=1e+307, M=9.37153e+306): M/x = (r=0.937152748184372) * 2^(e=0); i=112, f=1092, fg=f*2^-(e+10)=1.06641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=1: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=2: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=3: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 3. after ADD1(M): yl,yh = ( 0, 1.00145e+307); yl+yh= 1.00145e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.06174e+304); yl+yh= 2.06174e+304 ebd0(x=1e+307, M=9.47358e+306): M/x = (r=0.947357672533489) * 2^(e=0); i=115, f=1079, fg=f*2^-(e+10)=1.05371 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=1: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=2: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=3: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 3. after ADD1(M): yl,yh = ( 0, 9.99677e+306); yl+yh= 9.99677e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 1.43624e+304); yl+yh= 1.43624e+304 ebd0(x=1e+307, M=9.57674e+306): M/x = (r=0.957673721222979) * 2^(e=0); i=117, f=1070, fg=f*2^-(e+10)=1.04492 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=1: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=2: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=3: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 3. after ADD1(M): yl,yh = ( 0, 1.00162e+307); yl+yh= 1.00162e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.21864e+303); yl+yh= 9.21864e+303 ebd0(x=1e+307, M=9.68102e+306): M/x = (r=0.968102104317573) * 2^(e=0); i=120, f=1057, fg=f*2^-(e+10)=1.03223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=1: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=2: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=3: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 3. after ADD1(M): yl,yh = ( 0, 9.99821e+306); yl+yh= 9.99821e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 5.19822e+303); yl+yh= 5.19822e+303 ebd0(x=1e+307, M=9.78644e+306): M/x = (r=0.97864404505874) * 2^(e=0); i=123, f=1044, fg=f*2^-(e+10)=1.01953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=1: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=2: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=3: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 3. after ADD1(M): yl,yh = ( 0, 9.9799e+306); yl+yh= 9.9799e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.31338e+303); yl+yh= 2.31338e+303 ebd0(x=1e+307, M=9.89301e+306): M/x = (r=0.989300780008178) * 2^(e=0); i=125, f=1036, fg=f*2^-(e+10)=1.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=1: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=2: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=3: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 3. after ADD1(M): yl,yh = ( 0, 1.00095e+307); yl+yh= 1.00095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.76482e+302); yl+yh= 5.76482e+302 ebd0(x=1e+307, M=1.00007e+307): M/x = (r=0.500036779596429) * 2^(e=1); i=0, f=2048, fg=f*2^-(e+10)=1 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 ___ fg = 1 ___ skipping further steps ebd0(x=1e+307, M=1.01096e+307): M/x = (r=0.505481823125825) * 2^(e=1); i=1, f=2032, fg=f*2^-(e+10)=0.992188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, -7.83845e+304); yl+yh= -7.83845e+304 j=1: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=2: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=3: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 3. after ADD1(M): yl,yh = ( 0, 1.00313e+307); yl+yh= 1.00313e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.96651e+302); yl+yh= 5.96651e+302 ebd0(x=1e+307, M=1.02197e+307): M/x = (r=0.510986159291777) * 2^(e=1); i=3, f=2001, fg=f*2^-(e+10)=0.977051 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, -2.32155e+305); yl+yh= -2.32155e+305 j=1: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=2: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=3: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 3. after ADD1(M): yl,yh = ( 0, 9.98757e+306); yl+yh= 9.98757e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.37913e+303); yl+yh= 2.37913e+303 ebd0(x=1e+307, M=1.0331e+307): M/x = (r=0.516550433748765) * 2^(e=1); i=4, f=1986, fg=f*2^-(e+10)=0.969727 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, -3.07394e+305); yl+yh= -3.07394e+305 j=1: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=2: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=3: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 3. after ADD1(M): yl,yh = ( 0, 1.00236e+307); yl+yh= 1.00236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36037e+303); yl+yh= 5.36037e+303 ebd0(x=1e+307, M=1.04435e+307): M/x = (r=0.522175299181986) * 2^(e=1); i=6, f=1956, fg=f*2^-(e+10)=0.955078 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=1: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=2: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=3: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 3. after ADD1(M): yl,yh = ( 0, 9.98392e+306); yl+yh= 9.98392e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 9.55343e+303); yl+yh= 9.55343e+303 ebd0(x=1e+307, M=1.05572e+307): M/x = (r=0.52786141538391) * 2^(e=1); i=7, f=1942, fg=f*2^-(e+10)=0.948242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, -5.31447e+305); yl+yh= -5.31447e+305 j=1: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=2: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=3: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 3. after ADD1(M): yl,yh = ( 0, 1.00258e+307); yl+yh= 1.00258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.49715e+304); yl+yh= 1.49715e+304 ebd0(x=1e+307, M=1.06722e+307): M/x = (r=0.533609449331681) * 2^(e=1); i=9, f=1913, fg=f*2^-(e+10)=0.934082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=1: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=2: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=3: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 3. after ADD1(M): yl,yh = ( 0, 9.99033e+306); yl+yh= 9.99033e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.16279e+304); yl+yh= 2.16279e+304 ebd0(x=1e+307, M=1.07884e+307): M/x = (r=0.539420075265344) * 2^(e=1); i=10, f=1900, fg=f*2^-(e+10)=0.927734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=1: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=2: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=3: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 3. after ADD1(M): yl,yh = ( 0, 1.00383e+307); yl+yh= 1.00383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.95362e+304); yl+yh= 2.95362e+304 ebd0(x=1e+307, M=1.09059e+307): M/x = (r=0.545293974766939) * 2^(e=1); i=12, f=1872, fg=f*2^-(e+10)=0.914062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, -8.98515e+305); yl+yh= -8.98515e+305 j=1: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=2: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=3: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 3. after ADD1(M): yl,yh = ( 0, 1.00074e+307); yl+yh= 1.00074e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.871e+304); yl+yh= 3.871e+304 ebd0(x=1e+307, M=1.10246e+307): M/x = (r=0.551231836840444) * 2^(e=1); i=13, f=1859, fg=f*2^-(e+10)=0.907715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=1: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=2: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=3: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 3. after ADD1(M): yl,yh = ( 0, 1.00564e+307); yl+yh= 1.00564e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.91629e+304); yl+yh= 4.91629e+304 ebd0(x=1e+307, M=1.11447e+307): M/x = (r=0.557234357992604) * 2^(e=1); i=15, f=1833, fg=f*2^-(e+10)=0.89502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, -1.10906e+306); yl+yh= -1.10906e+306 j=1: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=2: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=3: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 3. after ADD1(M): yl,yh = ( 0, 1.00356e+307); yl+yh= 1.00356e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.09091e+304); yl+yh= 6.09091e+304 ebd0(x=1e+307, M=1.1266e+307): M/x = (r=0.563302242314621) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=1: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=2: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=3: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 3. after ADD1(M): yl,yh = ( 0, 1.00858e+307); yl+yh= 1.00858e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.39626e+304); yl+yh= 7.39626e+304 ebd0(x=1e+307, M=1.13887e+307): M/x = (r=0.56943620156475) * 2^(e=1); i=18, f=1796, fg=f*2^-(e+10)=0.876953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=1: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=2: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=3: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 3. after ADD1(M): yl,yh = ( 0, 1.00757e+307); yl+yh= 1.00757e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.83375e+304); yl+yh= 8.83375e+304 ebd0(x=1e+307, M=1.15127e+307): M/x = (r=0.575636955251782) * 2^(e=1); i=19, f=1783, fg=f*2^-(e+10)=0.870605 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=1: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=2: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=3: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 3. after ADD1(M): yl,yh = ( 0, 1.01271e+307); yl+yh= 1.01271e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.04048e+305); yl+yh= 1.04048e+305 ebd0(x=1e+307, M=1.16381e+307): M/x = (r=0.581905230719448) * 2^(e=1); i=21, f=1759, fg=f*2^-(e+10)=0.858887 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=1: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=2: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=3: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 3. after ADD1(M): yl,yh = ( 0, 1.01169e+307); yl+yh= 1.01169e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.2111e+305); yl+yh= 1.2111e+305 ebd0(x=1e+307, M=1.17648e+307): M/x = (r=0.588241763231733) * 2^(e=1); i=23, f=1736, fg=f*2^-(e+10)=0.847656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=1: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=2: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=3: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 3. after ADD1(M): yl,yh = ( 0, 1.01121e+307); yl+yh= 1.01121e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39536e+305); yl+yh= 1.39536e+305 ebd0(x=1e+307, M=1.18929e+307): M/x = (r=0.59464729605912) * 2^(e=1); i=24, f=1725, fg=f*2^-(e+10)=0.842285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=1: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=2: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=3: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 3. after ADD1(M): yl,yh = ( 0, 1.01766e+307); yl+yh= 1.01766e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59342e+305); yl+yh= 1.59342e+305 ebd0(x=1e+307, M=1.20225e+307): M/x = (r=0.601122580565778) * 2^(e=1); i=26, f=1702, fg=f*2^-(e+10)=0.831055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=1: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=2: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=3: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 3. after ADD1(M): yl,yh = ( 0, 1.01719e+307); yl+yh= 1.01719e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.80544e+305); yl+yh= 1.80544e+305 ebd0(x=1e+307, M=1.21534e+307): M/x = (r=0.607668376297695) * 2^(e=1); i=28, f=1680, fg=f*2^-(e+10)=0.820312 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=1: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=2: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=3: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 3. after ADD1(M): yl,yh = ( 0, 1.01727e+307); yl+yh= 1.01727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.03156e+305); yl+yh= 2.03156e+305 ebd0(x=1e+307, M=1.22857e+307): M/x = (r=0.614285451071773) * 2^(e=1); i=29, f=1670, fg=f*2^-(e+10)=0.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=1: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=2: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=3: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 3. after ADD1(M): yl,yh = ( 0, 1.02453e+307); yl+yh= 1.02453e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27193e+305); yl+yh= 2.27193e+305 ebd0(x=1e+307, M=1.24195e+307): M/x = (r=0.620974581065892) * 2^(e=1); i=31, f=1649, fg=f*2^-(e+10)=0.805176 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=1: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=2: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=3: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 3. after ADD1(M): yl,yh = ( 0, 1.02525e+307); yl+yh= 1.02525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.52671e+305); yl+yh= 2.52671e+305 ebd0(x=1e+307, M=1.25547e+307): M/x = (r=0.627736550909953) * 2^(e=1); i=33, f=1628, fg=f*2^-(e+10)=0.794922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=1: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=2: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=3: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 3. after ADD1(M): yl,yh = ( 0, 1.02596e+307); yl+yh= 1.02596e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79606e+305); yl+yh= 2.79606e+305 ebd0(x=1e+307, M=1.26914e+307): M/x = (r=0.634572153777919) * 2^(e=1); i=34, f=1618, fg=f*2^-(e+10)=0.790039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=1: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=2: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=3: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 3. after ADD1(M): yl,yh = ( 0, 1.03347e+307); yl+yh= 1.03347e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.08014e+305); yl+yh= 3.08014e+305 ebd0(x=1e+307, M=1.28296e+307): M/x = (r=0.641482191480851) * 2^(e=1); i=36, f=1598, fg=f*2^-(e+10)=0.780273 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=1: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=2: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=3: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 3. after ADD1(M): yl,yh = ( 0, 1.03485e+307); yl+yh= 1.03485e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.37911e+305); yl+yh= 3.37911e+305 ebd0(x=1e+307, M=1.29693e+307): M/x = (r=0.648467474560957) * 2^(e=1); i=38, f=1579, fg=f*2^-(e+10)=0.770996 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=1: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=2: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=3: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 3. after ADD1(M): yl,yh = ( 0, 1.03686e+307); yl+yh= 1.03686e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.69312e+305); yl+yh= 3.69312e+305 ebd0(x=1e+307, M=1.31106e+307): M/x = (r=0.655528822386676) * 2^(e=1); i=40, f=1560, fg=f*2^-(e+10)=0.761719 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=1: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=2: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=3: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 3. after ADD1(M): yl,yh = ( 0, 1.03888e+307); yl+yh= 1.03888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.02235e+305); yl+yh= 4.02235e+305 ebd0(x=1e+307, M=1.32533e+307): M/x = (r=0.662667063248778) * 2^(e=1); i=42, f=1542, fg=f*2^-(e+10)=0.75293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=1: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=2: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=3: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 3. after ADD1(M): yl,yh = ( 0, 1.04155e+307); yl+yh= 1.04155e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.36695e+305); yl+yh= 4.36695e+305 ebd0(x=1e+307, M=1.33977e+307): M/x = (r=0.669883034457535) * 2^(e=1); i=43, f=1533, fg=f*2^-(e+10)=0.748535 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=1: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=2: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=3: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 3. after ADD1(M): yl,yh = ( 0, 1.05013e+307); yl+yh= 1.05013e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7271e+305); yl+yh= 4.7271e+305 ebd0(x=1e+307, M=1.35436e+307): M/x = (r=0.677177582440924) * 2^(e=1); i=45, f=1515, fg=f*2^-(e+10)=0.739746 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=1: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=2: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=3: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 3. after ADD1(M): yl,yh = ( 0, 1.05291e+307); yl+yh= 1.05291e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10297e+305); yl+yh= 5.10297e+305 ebd0(x=1e+307, M=1.3691e+307): M/x = (r=0.684551562843922) * 2^(e=1); i=47, f=1498, fg=f*2^-(e+10)=0.731445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=1: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=2: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=3: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 3. after ADD1(M): yl,yh = ( 0, 1.05637e+307); yl+yh= 1.05637e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.49473e+305); yl+yh= 5.49473e+305 ebd0(x=1e+307, M=1.38401e+307): M/x = (r=0.692005840628868) * 2^(e=1); i=49, f=1481, fg=f*2^-(e+10)=0.723145 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=1: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=2: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=3: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 3. after ADD1(M): yl,yh = ( 0, 1.05987e+307); yl+yh= 1.05987e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90254e+305); yl+yh= 5.90254e+305 ebd0(x=1e+307, M=1.39908e+307): M/x = (r=0.699541290176923) * 2^(e=1); i=51, f=1464, fg=f*2^-(e+10)=0.714844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=1: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=2: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=3: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 3. after ADD1(M): yl,yh = ( 0, 1.06339e+307); yl+yh= 1.06339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.32659e+305); yl+yh= 6.32659e+305 ebd0(x=1e+307, M=1.41432e+307): M/x = (r=0.707158795390635) * 2^(e=1); i=53, f=1448, fg=f*2^-(e+10)=0.707031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=1: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=2: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=3: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 3. after ADD1(M): yl,yh = ( 0, 1.06764e+307); yl+yh= 1.06764e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.76704e+305); yl+yh= 6.76704e+305 ebd0(x=1e+307, M=1.42972e+307): M/x = (r=0.71485924979762) * 2^(e=1); i=55, f=1432, fg=f*2^-(e+10)=0.699219 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=1: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=2: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=3: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 3. after ADD1(M): yl,yh = ( 0, 1.07193e+307); yl+yh= 1.07193e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.22409e+305); yl+yh= 7.22409e+305 ebd0(x=1e+307, M=1.44529e+307): M/x = (r=0.72264355665537) * 2^(e=1); i=57, f=1417, fg=f*2^-(e+10)=0.691895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=1: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=2: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=3: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 3. after ADD1(M): yl,yh = ( 0, 1.07697e+307); yl+yh= 1.07697e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69791e+305); yl+yh= 7.69791e+305 ebd0(x=1e+307, M=1.46103e+307): M/x = (r=0.730512629057209) * 2^(e=1); i=59, f=1402, fg=f*2^-(e+10)=0.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=1: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=2: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=3: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 3. after ADD1(M): yl,yh = ( 0, 1.08206e+307); yl+yh= 1.08206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.18868e+305); yl+yh= 8.18868e+305 ebd0(x=1e+307, M=1.47693e+307): M/x = (r=0.738467390039392) * 2^(e=1); i=61, f=1387, fg=f*2^-(e+10)=0.677246 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=1: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=2: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=3: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 3. after ADD1(M): yl,yh = ( 0, 1.08721e+307); yl+yh= 1.08721e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.69659e+305); yl+yh= 8.69659e+305 ebd0(x=1e+307, M=1.49302e+307): M/x = (r=0.746508772689384) * 2^(e=1); i=63, f=1372, fg=f*2^-(e+10)=0.669922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=1: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=2: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=3: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 3. after ADD1(M): yl,yh = ( 0, 1.09242e+307); yl+yh= 1.09242e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.22183e+305); yl+yh= 9.22183e+305 ebd0(x=1e+307, M=1.50928e+307): M/x = (r=0.754637720255303) * 2^(e=1); i=65, f=1358, fg=f*2^-(e+10)=0.663086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=1: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=2: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=3: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 3. after ADD1(M): yl,yh = ( 0, 1.09843e+307); yl+yh= 1.09843e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.76457e+305); yl+yh= 9.76457e+305 ebd0(x=1e+307, M=1.52571e+307): M/x = (r=0.762855186256566) * 2^(e=1); i=67, f=1344, fg=f*2^-(e+10)=0.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=1: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=2: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=3: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 3. after ADD1(M): yl,yh = ( 0, 1.1045e+307); yl+yh= 1.1045e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0325e+306); yl+yh= 1.0325e+306 ebd0(x=1e+307, M=1.54232e+307): M/x = (r=0.771162134595737) * 2^(e=1); i=69, f=1331, fg=f*2^-(e+10)=0.649902 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=1: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=2: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=3: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 3. after ADD1(M): yl,yh = ( 0, 1.11139e+307); yl+yh= 1.11139e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09034e+306); yl+yh= 1.09034e+306 ebd0(x=1e+307, M=1.55912e+307): M/x = (r=0.77955953967159) * 2^(e=1); i=72, f=1311, fg=f*2^-(e+10)=0.640137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=1: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=2: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=3: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 3. after ADD1(M): yl,yh = ( 0, 1.11305e+307); yl+yh= 1.11305e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14998e+306); yl+yh= 1.14998e+306 ebd0(x=1e+307, M=1.5761e+307): M/x = (r=0.788048386493405) * 2^(e=1); i=74, f=1298, fg=f*2^-(e+10)=0.633789 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, -4.56039e+306); yl+yh= -4.56039e+306 j=1: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=2: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=3: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 3. after ADD1(M): yl,yh = ( 0, 1.12006e+307); yl+yh= 1.12006e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.21145e+306); yl+yh= 1.21145e+306 ebd0(x=1e+307, M=1.59326e+307): M/x = (r=0.796629670796513) * 2^(e=1); i=76, f=1285, fg=f*2^-(e+10)=0.627441 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=1: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=2: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=3: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 3. after ADD1(M): yl,yh = ( 0, 1.12715e+307); yl+yh= 1.12715e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27478e+306); yl+yh= 1.27478e+306 ebd0(x=1e+307, M=1.61061e+307): M/x = (r=0.805304399159088) * 2^(e=1); i=78, f=1273, fg=f*2^-(e+10)=0.621582 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=1: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=2: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=3: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 3. after ADD1(M): yl,yh = ( 0, 1.13512e+307); yl+yh= 1.13512e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33997e+306); yl+yh= 1.33997e+306 ebd0(x=1e+307, M=1.62815e+307): M/x = (r=0.814073589120224) * 2^(e=1); i=80, f=1260, fg=f*2^-(e+10)=0.615234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=1: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=2: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=3: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 3. after ADD1(M): yl,yh = ( 0, 1.1424e+307); yl+yh= 1.1424e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40705e+306); yl+yh= 1.40705e+306 ebd0(x=1e+307, M=1.64588e+307): M/x = (r=0.822938269299289) * 2^(e=1); i=83, f=1242, fg=f*2^-(e+10)=0.606445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=1: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=2: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=3: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 3. after ADD1(M): yl,yh = ( 0, 1.14574e+307); yl+yh= 1.14574e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.47603e+306); yl+yh= 1.47603e+306 ebd0(x=1e+307, M=1.6638e+307): M/x = (r=0.83189947951658) * 2^(e=1); i=85, f=1231, fg=f*2^-(e+10)=0.601074 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=1: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=2: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=3: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 3. after ADD1(M): yl,yh = ( 0, 1.15476e+307); yl+yh= 1.15476e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54695e+306); yl+yh= 1.54695e+306 ebd0(x=1e+307, M=1.68192e+307): M/x = (r=0.840958270915297) * 2^(e=1); i=87, f=1219, fg=f*2^-(e+10)=0.595215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=1: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=2: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=3: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 3. after ADD1(M): yl,yh = ( 0, 1.16308e+307); yl+yh= 1.16308e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61983e+306); yl+yh= 1.61983e+306 ebd0(x=1e+307, M=1.70023e+307): M/x = (r=0.850115706084837) * 2^(e=1); i=90, f=1202, fg=f*2^-(e+10)=0.586914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=1: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=2: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=3: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 3. after ADD1(M): yl,yh = ( 0, 1.16736e+307); yl+yh= 1.16736e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69467e+306); yl+yh= 1.69467e+306 ebd0(x=1e+307, M=1.71875e+307): M/x = (r=0.859372859185438) * 2^(e=1); i=92, f=1192, fg=f*2^-(e+10)=0.582031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=1: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=2: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=3: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 3. after ADD1(M): yl,yh = ( 0, 1.17751e+307); yl+yh= 1.17751e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77151e+306); yl+yh= 1.77151e+306 ebd0(x=1e+307, M=1.73746e+307): M/x = (r=0.868730816074176) * 2^(e=1); i=94, f=1181, fg=f*2^-(e+10)=0.57666 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=1: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=2: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=3: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 3. after ADD1(M): yl,yh = ( 0, 1.18696e+307); yl+yh= 1.18696e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.85036e+306); yl+yh= 1.85036e+306 ebd0(x=1e+307, M=1.75638e+307): M/x = (r=0.878190674432335) * 2^(e=1); i=97, f=1165, fg=f*2^-(e+10)=0.568848 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=1: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=2: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=3: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 3. after ADD1(M): yl,yh = ( 0, 1.19224e+307); yl+yh= 1.19224e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.93126e+306); yl+yh= 1.93126e+306 ebd0(x=1e+307, M=1.77551e+307): M/x = (r=0.887753543894164) * 2^(e=1); i=99, f=1155, fg=f*2^-(e+10)=0.563965 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=1: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=2: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=3: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 3. after ADD1(M): yl,yh = ( 0, 1.20274e+307); yl+yh= 1.20274e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.01421e+306); yl+yh= 2.01421e+306 ebd0(x=1e+307, M=1.79484e+307): M/x = (r=0.897420546177039) * 2^(e=1); i=102, f=1140, fg=f*2^-(e+10)=0.556641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=1: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=2: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=3: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 3. after ADD1(M): yl,yh = ( 0, 1.20901e+307); yl+yh= 1.20901e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09925e+306); yl+yh= 2.09925e+306 ebd0(x=1e+307, M=1.81439e+307): M/x = (r=0.907192815213034) * 2^(e=1); i=104, f=1130, fg=f*2^-(e+10)=0.551758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=1: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=2: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=3: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 3. after ADD1(M): yl,yh = ( 0, 1.21974e+307); yl+yh= 1.21974e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18639e+306); yl+yh= 2.18639e+306 ebd0(x=1e+307, M=1.83414e+307): M/x = (r=0.917071497281936) * 2^(e=1); i=107, f=1116, fg=f*2^-(e+10)=0.544922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=1: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=2: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=3: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 3. after ADD1(M): yl,yh = ( 0, 1.22703e+307); yl+yh= 1.22703e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27566e+306); yl+yh= 2.27566e+306 ebd0(x=1e+307, M=1.85412e+307): M/x = (r=0.9270577511457) * 2^(e=1); i=109, f=1106, fg=f*2^-(e+10)=0.540039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=1: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=2: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=3: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 3. after ADD1(M): yl,yh = ( 0, 1.238e+307); yl+yh= 1.238e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.36708e+306); yl+yh= 2.36708e+306 ebd0(x=1e+307, M=1.87431e+307): M/x = (r=0.937152748184372) * 2^(e=1); i=112, f=1092, fg=f*2^-(e+10)=0.533203 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=1: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=2: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=3: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 3. after ADD1(M): yl,yh = ( 0, 1.24545e+307); yl+yh= 1.24545e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.46067e+306); yl+yh= 2.46067e+306 ebd0(x=1e+307, M=1.89472e+307): M/x = (r=0.947357672533489) * 2^(e=1); i=115, f=1079, fg=f*2^-(e+10)=0.526855 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=1: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=2: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=3: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 3. after ADD1(M): yl,yh = ( 0, 1.25389e+307); yl+yh= 1.25389e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.55647e+306); yl+yh= 2.55647e+306 ebd0(x=1e+307, M=1.91535e+307): M/x = (r=0.957673721222979) * 2^(e=1); i=117, f=1070, fg=f*2^-(e+10)=0.522461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=1: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=2: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=3: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 3. after ADD1(M): yl,yh = ( 0, 1.26614e+307); yl+yh= 1.26614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.65448e+306); yl+yh= 2.65448e+306 ebd0(x=1e+307, M=1.9362e+307): M/x = (r=0.968102104317573) * 2^(e=1); i=120, f=1057, fg=f*2^-(e+10)=0.516113 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=1: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=2: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=3: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 3. after ADD1(M): yl,yh = ( 0, 1.27478e+307); yl+yh= 1.27478e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.75475e+306); yl+yh= 2.75475e+306 ebd0(x=1e+307, M=1.95729e+307): M/x = (r=0.97864404505874) * 2^(e=1); i=123, f=1044, fg=f*2^-(e+10)=0.509766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=1: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=2: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=3: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 3. after ADD1(M): yl,yh = ( 0, 1.28349e+307); yl+yh= 1.28349e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85728e+306); yl+yh= 2.85728e+306 ebd0(x=1e+307, M=1.9786e+307): M/x = (r=0.989300780008178) * 2^(e=1); i=125, f=1036, fg=f*2^-(e+10)=0.505859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=1: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=2: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=3: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 3. after ADD1(M): yl,yh = ( 0, 1.29711e+307); yl+yh= 1.29711e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.96211e+306); yl+yh= 2.96211e+306 ebd0(x=1e+307, M=2.00015e+307): M/x = (r=0.500036779596429) * 2^(e=2); i=0, f=2048, fg=f*2^-(e+10)=0.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=1: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=2: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=3: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.307e+307); yl+yh= 1.307e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.06926e+306); yl+yh= 3.06926e+306 ebd0(x=1e+307, M=2.02193e+307): M/x = (r=0.505481823125825) * 2^(e=2); i=1, f=2032, fg=f*2^-(e+10)=0.496094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=1: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=2: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=3: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 3. after ADD1(M): yl,yh = ( 0, 1.32094e+307); yl+yh= 1.32094e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.17876e+306); yl+yh= 3.17876e+306 ebd0(x=1e+307, M=2.04394e+307): M/x = (r=0.510986159291777) * 2^(e=2); i=3, f=2001, fg=f*2^-(e+10)=0.488525 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=1: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=2: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=3: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 3. after ADD1(M): yl,yh = ( 0, 1.32758e+307); yl+yh= 1.32758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.29063e+306); yl+yh= 3.29063e+306 ebd0(x=1e+307, M=2.0662e+307): M/x = (r=0.516550433748765) * 2^(e=2); i=4, f=1986, fg=f*2^-(e+10)=0.484863 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=1: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=2: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=3: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 3. after ADD1(M): yl,yh = ( 0, 1.34232e+307); yl+yh= 1.34232e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.4049e+306); yl+yh= 3.4049e+306 ebd0(x=1e+307, M=2.0887e+307): M/x = (r=0.522175299181986) * 2^(e=2); i=6, f=1956, fg=f*2^-(e+10)=0.477539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=1: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=2: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=3: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 3. after ADD1(M): yl,yh = ( 0, 1.3496e+307); yl+yh= 1.3496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.52159e+306); yl+yh= 3.52159e+306 ebd0(x=1e+307, M=2.11145e+307): M/x = (r=0.52786141538391) * 2^(e=2); i=7, f=1942, fg=f*2^-(e+10)=0.474121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=1: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=2: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=3: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 3. after ADD1(M): yl,yh = ( 0, 1.36515e+307); yl+yh= 1.36515e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64073e+306); yl+yh= 3.64073e+306 ebd0(x=1e+307, M=2.13444e+307): M/x = (r=0.533609449331681) * 2^(e=2); i=9, f=1913, fg=f*2^-(e+10)=0.467041 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=1: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=2: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=3: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 3. after ADD1(M): yl,yh = ( 0, 1.3731e+307); yl+yh= 1.3731e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.76235e+306); yl+yh= 3.76235e+306 ebd0(x=1e+307, M=2.15768e+307): M/x = (r=0.539420075265344) * 2^(e=2); i=10, f=1900, fg=f*2^-(e+10)=0.463867 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=1: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=2: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=3: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 3. after ADD1(M): yl,yh = ( 0, 1.38952e+307); yl+yh= 1.38952e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88647e+306); yl+yh= 3.88647e+306 ebd0(x=1e+307, M=2.18118e+307): M/x = (r=0.545293974766939) * 2^(e=2); i=12, f=1872, fg=f*2^-(e+10)=0.457031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=1: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=2: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=3: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 3. after ADD1(M): yl,yh = ( 0, 1.39818e+307); yl+yh= 1.39818e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.01312e+306); yl+yh= 4.01312e+306 ebd0(x=1e+307, M=2.20493e+307): M/x = (r=0.551231836840444) * 2^(e=2); i=13, f=1859, fg=f*2^-(e+10)=0.453857 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=1: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=2: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=3: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 3. after ADD1(M): yl,yh = ( 0, 1.41496e+307); yl+yh= 1.41496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14233e+306); yl+yh= 4.14233e+306 ebd0(x=1e+307, M=2.22894e+307): M/x = (r=0.557234357992604) * 2^(e=2); i=15, f=1833, fg=f*2^-(e+10)=0.44751 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=1: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=2: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=3: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 3. after ADD1(M): yl,yh = ( 0, 1.42488e+307); yl+yh= 1.42488e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.27412e+306); yl+yh= 4.27412e+306 ebd0(x=1e+307, M=2.25321e+307): M/x = (r=0.563302242314621) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=1: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=2: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=3: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 3. after ADD1(M): yl,yh = ( 0, 1.44204e+307); yl+yh= 1.44204e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.40854e+306); yl+yh= 4.40854e+306 ebd0(x=1e+307, M=2.27774e+307): M/x = (r=0.56943620156475) * 2^(e=2); i=18, f=1796, fg=f*2^-(e+10)=0.438477 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=1: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=2: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=3: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 3. after ADD1(M): yl,yh = ( 0, 1.4533e+307); yl+yh= 1.4533e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.54559e+306); yl+yh= 4.54559e+306 ebd0(x=1e+307, M=2.30255e+307): M/x = (r=0.575636955251782) * 2^(e=2); i=19, f=1783, fg=f*2^-(e+10)=0.435303 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=1: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=2: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=3: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 3. after ADD1(M): yl,yh = ( 0, 1.47084e+307); yl+yh= 1.47084e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.68532e+306); yl+yh= 4.68532e+306 ebd0(x=1e+307, M=2.32762e+307): M/x = (r=0.581905230719448) * 2^(e=2); i=21, f=1759, fg=f*2^-(e+10)=0.429443 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=1: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=2: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=3: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 3. after ADD1(M): yl,yh = ( 0, 1.48236e+307); yl+yh= 1.48236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.82774e+306); yl+yh= 4.82774e+306 ebd0(x=1e+307, M=2.35297e+307): M/x = (r=0.588241763231733) * 2^(e=2); i=23, f=1736, fg=f*2^-(e+10)=0.423828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, -8.58424e+306); yl+yh= -8.58424e+306 j=1: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=2: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=3: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 3. after ADD1(M): yl,yh = ( 0, 1.49454e+307); yl+yh= 1.49454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.9729e+306); yl+yh= 4.9729e+306 ebd0(x=1e+307, M=2.37859e+307): M/x = (r=0.59464729605912) * 2^(e=2); i=24, f=1725, fg=f*2^-(e+10)=0.421143 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=1: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=2: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=3: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 3. after ADD1(M): yl,yh = ( 0, 1.51381e+307); yl+yh= 1.51381e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12082e+306); yl+yh= 5.12082e+306 ebd0(x=1e+307, M=2.40449e+307): M/x = (r=0.601122580565778) * 2^(e=2); i=26, f=1702, fg=f*2^-(e+10)=0.415527 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=1: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=2: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=3: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 3. after ADD1(M): yl,yh = ( 0, 1.52628e+307); yl+yh= 1.52628e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.27152e+306); yl+yh= 5.27152e+306 ebd0(x=1e+307, M=2.43067e+307): M/x = (r=0.607668376297695) * 2^(e=2); i=28, f=1680, fg=f*2^-(e+10)=0.410156 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=1: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=2: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=3: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 3. after ADD1(M): yl,yh = ( 0, 1.53946e+307); yl+yh= 1.53946e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.42505e+306); yl+yh= 5.42505e+306 ebd0(x=1e+307, M=2.45714e+307): M/x = (r=0.614285451071773) * 2^(e=2); i=29, f=1670, fg=f*2^-(e+10)=0.407715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=1: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=2: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=3: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 3. after ADD1(M): yl,yh = ( 0, 1.55996e+307); yl+yh= 1.55996e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.58143e+306); yl+yh= 5.58143e+306 ebd0(x=1e+307, M=2.4839e+307): M/x = (r=0.620974581065892) * 2^(e=2); i=31, f=1649, fg=f*2^-(e+10)=0.402588 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=1: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=2: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=3: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 3. after ADD1(M): yl,yh = ( 0, 1.57406e+307); yl+yh= 1.57406e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.74069e+306); yl+yh= 5.74069e+306 ebd0(x=1e+307, M=2.51095e+307): M/x = (r=0.627736550909953) * 2^(e=2); i=33, f=1628, fg=f*2^-(e+10)=0.397461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=1: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=2: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=3: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 3. after ADD1(M): yl,yh = ( 0, 1.58829e+307); yl+yh= 1.58829e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90287e+306); yl+yh= 5.90287e+306 ebd0(x=1e+307, M=2.53829e+307): M/x = (r=0.634572153777919) * 2^(e=2); i=34, f=1618, fg=f*2^-(e+10)=0.39502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=1: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=2: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=3: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 3. after ADD1(M): yl,yh = ( 0, 1.60947e+307); yl+yh= 1.60947e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.06799e+306); yl+yh= 6.06799e+306 ebd0(x=1e+307, M=2.56593e+307): M/x = (r=0.641482191480851) * 2^(e=2); i=36, f=1598, fg=f*2^-(e+10)=0.390137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, -9.41258e+306); yl+yh= -9.41258e+306 j=1: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=2: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=3: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 3. after ADD1(M): yl,yh = ( 0, 1.62467e+307); yl+yh= 1.62467e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.23608e+306); yl+yh= 6.23608e+306 ebd0(x=1e+307, M=2.59387e+307): M/x = (r=0.648467474560957) * 2^(e=2); i=38, f=1579, fg=f*2^-(e+10)=0.385498 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=1: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=2: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=3: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 3. after ADD1(M): yl,yh = ( 0, 1.64065e+307); yl+yh= 1.64065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.40719e+306); yl+yh= 6.40719e+306 ebd0(x=1e+307, M=2.62212e+307): M/x = (r=0.655528822386676) * 2^(e=2); i=40, f=1560, fg=f*2^-(e+10)=0.380859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=1: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=2: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=3: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 3. after ADD1(M): yl,yh = ( 0, 1.65679e+307); yl+yh= 1.65679e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.58134e+306); yl+yh= 6.58134e+306 ebd0(x=1e+307, M=2.65067e+307): M/x = (r=0.662667063248778) * 2^(e=2); i=42, f=1542, fg=f*2^-(e+10)=0.376465 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=1: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=2: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=3: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 3. after ADD1(M): yl,yh = ( 0, 1.67374e+307); yl+yh= 1.67374e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.75856e+306); yl+yh= 6.75856e+306 ebd0(x=1e+307, M=2.67953e+307): M/x = (r=0.669883034457535) * 2^(e=2); i=43, f=1533, fg=f*2^-(e+10)=0.374268 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=1: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=2: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=3: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 3. after ADD1(M): yl,yh = ( 0, 1.69675e+307); yl+yh= 1.69675e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.9389e+306); yl+yh= 6.9389e+306 ebd0(x=1e+307, M=2.70871e+307): M/x = (r=0.677177582440924) * 2^(e=2); i=45, f=1515, fg=f*2^-(e+10)=0.369873 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=1: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=2: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=3: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 3. after ADD1(M): yl,yh = ( 0, 1.71412e+307); yl+yh= 1.71412e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.12238e+306); yl+yh= 7.12238e+306 ebd0(x=1e+307, M=2.73821e+307): M/x = (r=0.684551562843922) * 2^(e=2); i=47, f=1498, fg=f*2^-(e+10)=0.365723 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=1: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=2: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=3: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 3. after ADD1(M): yl,yh = ( 0, 1.73233e+307); yl+yh= 1.73233e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.30903e+306); yl+yh= 7.30903e+306 ebd0(x=1e+307, M=2.76802e+307): M/x = (r=0.692005840628868) * 2^(e=2); i=49, f=1481, fg=f*2^-(e+10)=0.361572 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=1: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=2: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=3: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 3. after ADD1(M): yl,yh = ( 0, 1.75073e+307); yl+yh= 1.75073e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.4989e+306); yl+yh= 7.4989e+306 ebd0(x=1e+307, M=2.79817e+307): M/x = (r=0.699541290176923) * 2^(e=2); i=51, f=1464, fg=f*2^-(e+10)=0.357422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=1: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=2: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=3: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 3. after ADD1(M): yl,yh = ( 0, 1.76933e+307); yl+yh= 1.76933e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69201e+306); yl+yh= 7.69201e+306 ebd0(x=1e+307, M=2.82864e+307): M/x = (r=0.707158795390635) * 2^(e=2); i=53, f=1448, fg=f*2^-(e+10)=0.353516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=1: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=2: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=3: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 3. after ADD1(M): yl,yh = ( 0, 1.78881e+307); yl+yh= 1.78881e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.88841e+306); yl+yh= 7.88841e+306 ebd0(x=1e+307, M=2.85944e+307): M/x = (r=0.71485924979762) * 2^(e=2); i=55, f=1432, fg=f*2^-(e+10)=0.349609 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=1: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=2: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=3: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 3. after ADD1(M): yl,yh = ( 0, 1.8085e+307); yl+yh= 1.8085e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08812e+306); yl+yh= 8.08812e+306 ebd0(x=1e+307, M=2.89057e+307): M/x = (r=0.72264355665537) * 2^(e=2); i=57, f=1417, fg=f*2^-(e+10)=0.345947 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=1: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=2: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=3: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 3. after ADD1(M): yl,yh = ( 0, 1.82911e+307); yl+yh= 1.82911e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.29119e+306); yl+yh= 8.29119e+306 ebd0(x=1e+307, M=2.92205e+307): M/x = (r=0.730512629057209) * 2^(e=2); i=59, f=1402, fg=f*2^-(e+10)=0.342285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=1: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=2: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=3: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 3. after ADD1(M): yl,yh = ( 0, 1.84994e+307); yl+yh= 1.84994e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.49765e+306); yl+yh= 8.49765e+306 ebd0(x=1e+307, M=2.95387e+307): M/x = (r=0.738467390039392) * 2^(e=2); i=61, f=1387, fg=f*2^-(e+10)=0.338623 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=1: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=2: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=3: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 3. after ADD1(M): yl,yh = ( 0, 1.871e+307); yl+yh= 1.871e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.70754e+306); yl+yh= 8.70754e+306 ebd0(x=1e+307, M=2.98604e+307): M/x = (r=0.746508772689384) * 2^(e=2); i=63, f=1372, fg=f*2^-(e+10)=0.334961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=1: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=2: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=3: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 3. after ADD1(M): yl,yh = ( 0, 1.89229e+307); yl+yh= 1.89229e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.92089e+306); yl+yh= 8.92089e+306 ebd0(x=1e+307, M=3.01855e+307): M/x = (r=0.754637720255303) * 2^(e=2); i=65, f=1358, fg=f*2^-(e+10)=0.331543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=1: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=2: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=3: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 3. after ADD1(M): yl,yh = ( 0, 1.91455e+307); yl+yh= 1.91455e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.13774e+306); yl+yh= 9.13774e+306 ebd0(x=1e+307, M=3.05142e+307): M/x = (r=0.762855186256566) * 2^(e=2); i=67, f=1344, fg=f*2^-(e+10)=0.328125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=1: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=2: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=3: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 3. after ADD1(M): yl,yh = ( 0, 1.93706e+307); yl+yh= 1.93706e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.35813e+306); yl+yh= 9.35813e+306 ebd0(x=1e+307, M=3.08465e+307): M/x = (r=0.771162134595737) * 2^(e=2); i=69, f=1331, fg=f*2^-(e+10)=0.324951 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=1: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=2: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=3: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 3. after ADD1(M): yl,yh = ( 0, 1.96057e+307); yl+yh= 1.96057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.58211e+306); yl+yh= 9.58211e+306 ebd0(x=1e+307, M=3.11824e+307): M/x = (r=0.77955953967159) * 2^(e=2); i=72, f=1311, fg=f*2^-(e+10)=0.320068 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=1: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=2: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=3: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 3. after ADD1(M): yl,yh = ( 0, 1.97902e+307); yl+yh= 1.97902e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.8097e+306); yl+yh= 9.8097e+306 ebd0(x=1e+307, M=3.15219e+307): M/x = (r=0.788048386493405) * 2^(e=2); i=74, f=1298, fg=f*2^-(e+10)=0.316895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=1: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=2: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=3: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 3. after ADD1(M): yl,yh = ( 0, 2.00301e+307); yl+yh= 2.00301e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 ebd0(x=1e+307, M=3.18652e+307): M/x = (r=0.796629670796513) * 2^(e=2); i=76, f=1285, fg=f*2^-(e+10)=0.313721 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=1: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=2: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=3: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 3. after ADD1(M): yl,yh = ( 0, 2.02727e+307); yl+yh= 2.02727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.02759e+307); yl+yh= 1.02759e+307 ebd0(x=1e+307, M=3.22122e+307): M/x = (r=0.805304399159088) * 2^(e=2); i=78, f=1273, fg=f*2^-(e+10)=0.310791 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=1: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=2: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=3: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 3. after ADD1(M): yl,yh = ( 0, 2.05258e+307); yl+yh= 2.05258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05146e+307); yl+yh= 1.05146e+307 ebd0(x=1e+307, M=3.25629e+307): M/x = (r=0.814073589120224) * 2^(e=2); i=80, f=1260, fg=f*2^-(e+10)=0.307617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=1: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=2: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=3: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 3. after ADD1(M): yl,yh = ( 0, 2.0774e+307); yl+yh= 2.0774e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0757e+307); yl+yh= 1.0757e+307 ebd0(x=1e+307, M=3.29175e+307): M/x = (r=0.822938269299289) * 2^(e=2); i=83, f=1242, fg=f*2^-(e+10)=0.303223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=1: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=2: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=3: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 3. after ADD1(M): yl,yh = ( 0, 2.09847e+307); yl+yh= 2.09847e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10033e+307); yl+yh= 1.10033e+307 ebd0(x=1e+307, M=3.3276e+307): M/x = (r=0.83189947951658) * 2^(e=2); i=85, f=1231, fg=f*2^-(e+10)=0.300537 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=1: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=2: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=3: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 3. after ADD1(M): yl,yh = ( 0, 2.12541e+307); yl+yh= 2.12541e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.12535e+307); yl+yh= 1.12535e+307 ebd0(x=1e+307, M=3.36383e+307): M/x = (r=0.840958270915297) * 2^(e=2); i=87, f=1219, fg=f*2^-(e+10)=0.297607 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=1: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=2: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=3: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 3. after ADD1(M): yl,yh = ( 0, 2.15185e+307); yl+yh= 2.15185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.15075e+307); yl+yh= 1.15075e+307 ebd0(x=1e+307, M=3.40046e+307): M/x = (r=0.850115706084837) * 2^(e=2); i=90, f=1202, fg=f*2^-(e+10)=0.293457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=1: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=2: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=3: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 3. after ADD1(M): yl,yh = ( 0, 2.17444e+307); yl+yh= 2.17444e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.17655e+307); yl+yh= 1.17655e+307 ebd0(x=1e+307, M=3.43749e+307): M/x = (r=0.859372859185438) * 2^(e=2); i=92, f=1192, fg=f*2^-(e+10)=0.291016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=1: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=2: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=3: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 3. after ADD1(M): yl,yh = ( 0, 2.20311e+307); yl+yh= 2.20311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20275e+307); yl+yh= 1.20275e+307 ebd0(x=1e+307, M=3.47492e+307): M/x = (r=0.868730816074176) * 2^(e=2); i=94, f=1181, fg=f*2^-(e+10)=0.28833 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=1: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=2: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=3: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 3. after ADD1(M): yl,yh = ( 0, 2.23128e+307); yl+yh= 2.23128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.22935e+307); yl+yh= 1.22935e+307 ebd0(x=1e+307, M=3.51276e+307): M/x = (r=0.878190674432335) * 2^(e=2); i=97, f=1165, fg=f*2^-(e+10)=0.284424 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=1: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=2: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=3: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 3. after ADD1(M): yl,yh = ( 0, 2.25547e+307); yl+yh= 2.25547e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.25636e+307); yl+yh= 1.25636e+307 ebd0(x=1e+307, M=3.55101e+307): M/x = (r=0.887753543894164) * 2^(e=2); i=99, f=1155, fg=f*2^-(e+10)=0.281982 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=1: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=2: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=3: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 3. after ADD1(M): yl,yh = ( 0, 2.2851e+307); yl+yh= 2.2851e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.28378e+307); yl+yh= 1.28378e+307 ebd0(x=1e+307, M=3.58968e+307): M/x = (r=0.897420546177039) * 2^(e=2); i=102, f=1140, fg=f*2^-(e+10)=0.27832 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=1: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=2: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=3: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 3. after ADD1(M): yl,yh = ( 0, 2.3107e+307); yl+yh= 2.3107e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.31162e+307); yl+yh= 1.31162e+307 ebd0(x=1e+307, M=3.62877e+307): M/x = (r=0.907192815213034) * 2^(e=2); i=104, f=1130, fg=f*2^-(e+10)=0.275879 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=1: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=2: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=3: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 3. after ADD1(M): yl,yh = ( 0, 2.34098e+307); yl+yh= 2.34098e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33988e+307); yl+yh= 1.33988e+307 ebd0(x=1e+307, M=3.66829e+307): M/x = (r=0.917071497281936) * 2^(e=2); i=107, f=1116, fg=f*2^-(e+10)=0.272461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=1: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=2: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=3: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 3. after ADD1(M): yl,yh = ( 0, 2.36803e+307); yl+yh= 2.36803e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.36856e+307); yl+yh= 1.36856e+307 ebd0(x=1e+307, M=3.70823e+307): M/x = (r=0.9270577511457) * 2^(e=2); i=109, f=1106, fg=f*2^-(e+10)=0.27002 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=1: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=2: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=3: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 3. after ADD1(M): yl,yh = ( 0, 2.39897e+307); yl+yh= 2.39897e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39768e+307); yl+yh= 1.39768e+307 ebd0(x=1e+307, M=3.74861e+307): M/x = (r=0.937152748184372) * 2^(e=2); i=112, f=1092, fg=f*2^-(e+10)=0.266602 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=1: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=2: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=3: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 3. after ADD1(M): yl,yh = ( 0, 2.42661e+307); yl+yh= 2.42661e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42723e+307); yl+yh= 1.42723e+307 ebd0(x=1e+307, M=3.78943e+307): M/x = (r=0.947357672533489) * 2^(e=2); i=115, f=1079, fg=f*2^-(e+10)=0.263428 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=1: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=2: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=3: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 3. after ADD1(M): yl,yh = ( 0, 2.45546e+307); yl+yh= 2.45546e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.45721e+307); yl+yh= 1.45721e+307 ebd0(x=1e+307, M=3.83069e+307): M/x = (r=0.957673721222979) * 2^(e=2); i=117, f=1070, fg=f*2^-(e+10)=0.26123 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=1: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=2: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=3: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 3. after ADD1(M): yl,yh = ( 0, 2.48834e+307); yl+yh= 2.48834e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48765e+307); yl+yh= 1.48765e+307 ebd0(x=1e+307, M=3.87241e+307): M/x = (r=0.968102104317573) * 2^(e=2); i=120, f=1057, fg=f*2^-(e+10)=0.258057 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=1: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=2: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=3: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 3. after ADD1(M): yl,yh = ( 0, 2.51783e+307); yl+yh= 2.51783e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51853e+307); yl+yh= 1.51853e+307 ebd0(x=1e+307, M=3.91458e+307): M/x = (r=0.97864404505874) * 2^(e=2); i=123, f=1044, fg=f*2^-(e+10)=0.254883 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=1: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=2: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=3: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 3. after ADD1(M): yl,yh = ( 0, 2.54763e+307); yl+yh= 2.54763e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54987e+307); yl+yh= 1.54987e+307 ebd0(x=1e+307, M=3.9572e+307): M/x = (r=0.989300780008178) * 2^(e=2); i=125, f=1036, fg=f*2^-(e+10)=0.25293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=1: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=2: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=3: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 3. after ADD1(M): yl,yh = ( 0, 2.58256e+307); yl+yh= 2.58256e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.58167e+307); yl+yh= 1.58167e+307 ebd0(x=1e+307, M=4.00029e+307): M/x = (r=0.500036779596429) * 2^(e=3); i=0, f=2048, fg=f*2^-(e+10)=0.25 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=1: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=2: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=3: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 2.614e+307); yl+yh= 2.614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61393e+307); yl+yh= 1.61393e+307 bd0(x=1e+307, np=2.50018e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.52741e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.55493e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.58275e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.61088e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.63931e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.66805e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.6971e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.72647e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.75616e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.78617e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.81651e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.84718e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.87818e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.90953e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.94121e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.97324e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.00561e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.03834e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.07143e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.10487e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.13868e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.17286e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.20741e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.24234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.27764e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.31334e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.34942e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.38589e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.42276e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.46003e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.49771e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.53579e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.5743e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.61322e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.65256e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.69234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.73254e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.77319e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.81428e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.85581e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.8978e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.94024e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.98315e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.02652e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.07037e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.11469e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.1595e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.20479e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.25058e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.29686e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.34365e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.39095e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.43877e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.4871e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.53596e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.58536e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.63529e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.68576e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.73679e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.78837e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.84051e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.89322e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.9465e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.00037e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.05482e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.10986e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.1655e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.22175e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.27861e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.33609e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.3942e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.45294e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.51232e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.57234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.63302e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.69436e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.75637e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.81905e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.88242e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.94647e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.01123e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.07668e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.14285e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.20975e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.27737e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.34572e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.41482e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.48467e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.55529e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.62667e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.69883e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.77178e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.84552e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.92006e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.99541e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.07159e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.14859e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.22644e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.30513e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.38467e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.46509e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.54638e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.62855e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.71162e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.7956e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.88048e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.9663e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.05304e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.14074e+306): |x-np| not too "small" -> direct formula bd0(1e+307, 8.22938e+306): T.series w/ 152 terms -> bd0=1.78124e+305 bd0(1e+307, 8.31899e+306): T.series w/ 149 terms -> bd0=1.59431e+305 bd0(1e+307, 8.40958e+306): T.series w/ 145 terms -> bd0=1.41715e+305 bd0(1e+307, 8.50116e+306): T.series w/ 141 terms -> bd0=1.24985e+305 bd0(1e+307, 8.59373e+306): T.series w/ 137 terms -> bd0=1.09252e+305 bd0(1e+307, 8.68731e+306): T.series w/ 134 terms -> bd0=9.45278e+304 bd0(1e+307, 8.78191e+306): T.series w/ 130 terms -> bd0=8.08221e+304 bd0(1e+307, 8.87754e+306): T.series w/ 126 terms -> bd0=6.81466e+304 bd0(1e+307, 8.97421e+306): T.series w/ 122 terms -> bd0=5.65124e+304 bd0(1e+307, 9.07193e+306): T.series w/ 118 terms -> bd0=4.59308e+304 bd0(1e+307, 9.17071e+306): T.series w/ 113 terms -> bd0=3.64134e+304 bd0(1e+307, 9.27058e+306): T.series w/ 109 terms -> bd0=2.79717e+304 bd0(1e+307, 9.37153e+306): T.series w/ 104 terms -> bd0=2.06174e+304 bd0(1e+307, 9.47358e+306): T.series w/ 99 terms -> bd0=1.43624e+304 bd0(1e+307, 9.57674e+306): T.series w/ 93 terms -> bd0=9.21864e+303 bd0(1e+307, 9.68102e+306): T.series w/ 87 terms -> bd0=5.19822e+303 bd0(1e+307, 9.78644e+306): T.series w/ 79 terms -> bd0=2.31338e+303 bd0(1e+307, 9.89301e+306): T.series w/ 68 terms -> bd0=5.76482e+302 bd0(1e+307, 1.00007e+307): T.series w/ 36 terms -> bd0=2.70534e+298 bd0(1e+307, 1.01096e+307): T.series w/ 69 terms -> bd0=5.96651e+302 bd0(1e+307, 1.02197e+307): T.series w/ 79 terms -> bd0=2.37913e+303 bd0(1e+307, 1.0331e+307): T.series w/ 87 terms -> bd0=5.36037e+303 bd0(1e+307, 1.04435e+307): T.series w/ 93 terms -> bd0=9.55343e+303 bd0(1e+307, 1.05572e+307): T.series w/ 99 terms -> bd0=1.49715e+304 bd0(1e+307, 1.06722e+307): T.series w/ 104 terms -> bd0=2.16279e+304 bd0(1e+307, 1.07884e+307): T.series w/ 109 terms -> bd0=2.95362e+304 bd0(1e+307, 1.09059e+307): T.series w/ 113 terms -> bd0=3.871e+304 bd0(1e+307, 1.10246e+307): T.series w/ 118 terms -> bd0=4.91629e+304 bd0(1e+307, 1.11447e+307): T.series w/ 122 terms -> bd0=6.09091e+304 bd0(1e+307, 1.1266e+307): T.series w/ 126 terms -> bd0=7.39626e+304 bd0(1e+307, 1.13887e+307): T.series w/ 130 terms -> bd0=8.83375e+304 bd0(1e+307, 1.15127e+307): T.series w/ 134 terms -> bd0=1.04048e+305 bd0(1e+307, 1.16381e+307): T.series w/ 137 terms -> bd0=1.2111e+305 bd0(1e+307, 1.17648e+307): T.series w/ 141 terms -> bd0=1.39536e+305 bd0(1e+307, 1.18929e+307): T.series w/ 145 terms -> bd0=1.59342e+305 bd0(1e+307, 1.20225e+307): T.series w/ 148 terms -> bd0=1.80544e+305 bd0(1e+307, 1.21534e+307): T.series w/ 152 terms -> bd0=2.03156e+305 bd0(x=1e+307, np=1.22857e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.24195e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.25547e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.26914e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.28296e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.29693e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.31106e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.32533e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.33977e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.35436e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.3691e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.38401e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.39908e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.41432e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.42972e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.44529e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.46103e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.47693e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.49302e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.50928e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.52571e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.54232e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.55912e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.5761e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.59326e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.61061e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.62815e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.64588e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.6638e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.68192e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.70023e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.71875e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.73746e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.75638e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.77551e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.79484e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.81439e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.83414e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.85412e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.87431e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.89472e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.91535e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.9362e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.95729e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.9786e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.00015e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.02193e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.04394e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.0662e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.0887e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.11145e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.13444e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.15768e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.18118e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.20493e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.22894e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.25321e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.27774e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.30255e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.32762e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.35297e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.37859e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.40449e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.43067e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.45714e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.4839e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.51095e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.53829e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.56593e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.59387e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.62212e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.65067e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.67953e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.70871e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.73821e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.76802e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.79817e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.82864e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.85944e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.89057e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.92205e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.95387e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.98604e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.01855e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.05142e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.08465e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.11824e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.15219e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.18652e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.22122e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.25629e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.29175e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.3276e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.36383e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.40046e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.43749e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.47492e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.51276e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.55101e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.58968e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.62877e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.66829e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.70823e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.74861e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.78943e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.83069e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.87241e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.91458e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.9572e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.00029e+307): |x-np| not too "small" -> direct formula > stopifnot( all.equal(bd0v.7, bd0v.10, tol=0), + bd0v.7$aeq0, # even tol=0 equality ! + bd0v.7$aeq4 ) > ## ==> 256 bit gives the *same* (asNumeric() - double-prec accuracy) as 1024 bits ! > ## so, at least here > rm(bd0v.10) > showProc.time() Time (user system elapsed): 5.17 0.05 5.22 > > ##' Plot the result of bd0ver() -- i.e., relative errors for "many" bd0() versions > ##' @title > ##' @param bd0v result of bd0ver() > ##' @param dFac > ##' @param log a string, "", "x", "y", or "xy" > ##' @param type plot `type`, typically "b" or "l" > ##' @param add logical > ##' @param col.add > ##' @param smooth > ##' @param f.lowsm lowess() smoothing parameter when adding smooths' > ##' @return > ##' @author Martin Maechler > p.relE <- function(bd0v, dFac = if(max(np) >= 8e307) 1e10 else 1, + log = "x", type="b", + add = FALSE, col.add = adjustcolor(k+2, 2/3), + smooth = TRUE, f.lowsm = 1/16) + { + stopifnot(length(x <- bd0v$x) == 1 # for now + , is.numeric(x), is.numeric(np <- bd0v$np), length(np) > 1 + , is.numeric(dFac), dFac > 0, length(dFac) == 1 + , is.matrix(relE <- bd0v$relE) + , (k <- ncol(relE)) >= 1 + , sum(iOk <- local({ y <- bd0v$bd0 + ay <- apply(y, 1L, \(ro) any(is.finite(ro) & ro != 0)); ay })) > 1 + ) + np. <- np[iOk]/dFac + if(add) { ## add only lines for relE[,"bd0"] + relE <- relE[iOk, "bd0"] ##--- only (with varying delta, typically) + abs <- par("ylog") + if(abs) relE <- abs(relE) + lines(np., relE, col = col.add, lwd=3) + } else { ## full + txtRE <- "relative Errors" + if(abs <- grepl("y", log)) { + txtRE <- paste0("|", txtRE, "|") + relE <- abs(relE) + yli <- pmax(2^-54, range(relE[iOk,], finite = TRUE)) + } else + yli <- range(relE[iOk,], finite = TRUE) + ## */dFac : otherwise triggering axis() error + ## log - axis(), 'at' creation, _LARGE_ range: invalid {xy}axp or par; nint=5 + ## axp[0:1]=(1e+299,1e+308), usr[0:1]=(7.28752e+298,inf); i=9, ni=1 + pc <- 1:k + matplot(np., relE[iOk,], type=type, log=log, pch=pc, col=1+pc, + main = paste(txtRE, "WRT bd0()"), + xlim = range(np)/dFac, # show full range + ylim = yli, + xlab = paste0("np[iOk]", if(dFac != 1) sprintf("/ dFac, dFac=%g",dFac)), + ## could use sfsmisc::pretty10exp(1e10, drop.1=TRUE) + xaxt="n"); eaxis(1, sub10=3) + mtext(sprintf("bd0(x, np), x = %g", x)) + if(k >= 2) legend("topright", colnames(relE), pch=pc, lty=1:2, col=1+pc, bty="n") + if(abs) { + abline(h = 2^(-54:-51), lty = 3, lwd = c(1,1,2,1), col="gray") + axis(4, at= 2^(-54:-51), las = 1, col.axis="gray", tick = FALSE, cex = 3/4, hadj = +1/2, + expression(epsilon[C]/4, epsilon[C]/2, epsilon[C], 2*epsilon[C])) + } + } # not add + if(abs && smooth) { # add smoothed relE + if(add) { + smRE <- lowess(np., relE[iOk], f = f.lowsm)$y + lines(np., smRE, col = adjustcolor(col.add, 2/3), lwd = 2.5, lty = "dashed") + lines(np., smRE, col = adjustcolor("gray44", 1/2), lwd = 4)#lty = 1 + } else { + smRE <- apply(relE[iOk,], 2L, function(y) lowess(np., y, f = f.lowsm)$y) + matlines(np., smRE, col = adjustcolor(1+pc, 2/3), lwd = 2.5, lty = "dashed") + matlines(np., smRE, col = adjustcolor("gray44", 1/2), lwd = 4, lty = 1) + } + } + colD <- if(add) "skyblue" else 2 + jO <- if(add) 5 else 1 + delta <- bd0v$delta + inR <- abs(x - np) <= delta * (x + np) + ## ----- + rngTayl <- range(np[inR])/dFac; f.rng <- format(rngTayl, digits = 4) + message(sum(inR), " np[]/dFac values inside delta-range = [", f.rng[1],", ", f.rng[2],"]") + abline(v = rngTayl, col = adjustcolor(colD, 2/3), lwd = 2, lty = 3) + u4 <- par("usr")[3:4] %*% c(jO,64-jO)/64; yUp <- if(abs) 10^u4 else u4 + arrows(rngTayl[1], yUp, rngTayl[2], yUp, code = 3, + lwd = 2, col = adjustcolor(colD, 2/3)) + text(rngTayl[1], yUp, substitute(delta == D, list(D = delta)), col=colD, adj = c(5/4, 3/4)) + if(!add) { + rug(np[!iOk]/dFac, col=2) + axis(1, at=x/dFac, quote(x), col=2, col.axis=2, lwd=2, line=-1) + } + } > > if(do.pdf) { dev.off(); pdf("p.relE_bd0ver.pdf") } > > system.time(bd0v.7.d.40 <- bd0ver(x., mpfrPrec = 128, delta = 0.40, chkVerb = FALSE) + ) ## larger delta --> some "long taking" Taylor sums user system elapsed 0.91 0.02 0.93 > > p.relE(bd0v.7) 37 np[]/dFac values inside delta-range = [8.229e+306, 1.215e+307] > p.relE(bd0v.7, log = "xy") 37 np[]/dFac values inside delta-range = [8.229e+306, 1.215e+307] > p.relE(bd0v.7.d.40, add=TRUE, col.add = adjustcolor("steelblue", .8)) 157 np[]/dFac values inside delta-range = [4.297e+306, 2.328e+307] > > > > ## ==> NOTE: a whole small (extreme) range where bd0() is *better* than ebd0() !!! > ## correct #{digits} > with(bd0v.7, cbind(log2.lam = log2(np), np, round(-log10(abs(relE)), 1))) ## around 2^[1018, 1021] log2.lam np ebd0 ebd0C bd0 bd0.l bd0.p1l1 bd0.p1.d [1,] 1017.83203 2.50018390e+306 15.3 15.3 16.0 15.3 16.0 16.0 [2,] 1017.84766 2.52740912e+306 15.4 15.4 16.4 16.4 16.4 15.8 [3,] 1017.86328 2.55493080e+306 15.2 15.2 16.2 16.2 16.2 16.2 [4,] 1017.87891 2.58275217e+306 15.8 15.8 15.6 15.2 15.4 15.8 [5,] 1017.89453 2.61087650e+306 16.1 16.1 15.9 15.1 15.5 15.9 [6,] 1017.91016 2.63930708e+306 15.7 15.7 15.7 15.1 16.6 15.7 [7,] 1017.92578 2.66804725e+306 15.5 15.5 16.0 16.0 15.5 16.0 [8,] 1017.94141 2.69710038e+306 16.1 16.1 15.9 15.9 15.5 15.5 [9,] 1017.95703 2.72646987e+306 16.3 16.3 16.3 15.8 15.8 16.3 [10,] 1017.97266 2.75615918e+306 16.1 16.1 15.8 15.4 15.8 15.8 [11,] 1017.98828 2.78617179e+306 16.4 16.4 15.7 15.7 15.7 16.4 [12,] 1018.00391 2.81651121e+306 15.3 15.3 15.7 15.3 15.8 15.6 [13,] 1018.01953 2.84718101e+306 15.8 15.8 15.8 15.8 15.8 16.5 [14,] 1018.03516 2.87818478e+306 16.7 16.7 15.6 15.4 15.5 16.0 [15,] 1018.05078 2.90952615e+306 16.7 16.7 15.7 15.4 16.0 15.5 [16,] 1018.06641 2.94120882e+306 16.0 16.0 16.0 15.6 15.5 16.0 [17,] 1018.08203 2.97323648e+306 17.1 17.1 17.1 15.3 15.9 17.1 [18,] 1018.09766 3.00561290e+306 17.2 17.2 17.2 15.6 17.2 15.9 [19,] 1018.11328 3.03834188e+306 15.0 15.0 16.6 16.0 15.8 16.6 [20,] 1018.12891 3.07142726e+306 15.7 15.7 15.7 15.7 16.2 15.7 [21,] 1018.14453 3.10487291e+306 15.4 15.4 16.9 15.4 16.9 15.9 [22,] 1018.16016 3.13868275e+306 15.2 15.2 15.9 15.6 15.6 15.6 [23,] 1018.17578 3.17286077e+306 15.3 15.3 15.5 15.5 16.1 15.7 [24,] 1018.19141 3.20741096e+306 15.7 15.7 16.2 15.7 15.7 16.2 [25,] 1018.20703 3.24233737e+306 16.4 16.4 15.7 15.6 15.7 16.0 [26,] 1018.22266 3.27764411e+306 15.5 15.5 16.2 15.7 15.3 15.4 [27,] 1018.23828 3.31333532e+306 15.5 15.5 16.1 15.3 16.1 16.3 [28,] 1018.25391 3.34941517e+306 15.8 15.8 15.8 15.4 15.2 15.4 [29,] 1018.26953 3.38588791e+306 15.3 15.3 15.6 15.5 15.3 15.5 [30,] 1018.28516 3.42275781e+306 15.3 15.3 15.5 15.8 15.5 15.8 [31,] 1018.30078 3.46002920e+306 15.4 15.4 16.1 16.1 15.6 15.4 [32,] 1018.31641 3.49770645e+306 15.7 15.7 16.0 15.7 16.3 16.3 [33,] 1018.33203 3.53579398e+306 15.9 15.9 16.4 15.9 15.9 15.9 [34,] 1018.34766 3.57429625e+306 15.2 15.2 15.6 15.4 15.6 15.6 [35,] 1018.36328 3.61321778e+306 16.0 16.0 15.6 16.3 15.6 16.0 [36,] 1018.37891 3.65256315e+306 15.7 15.7 15.9 15.5 15.9 15.9 [37,] 1018.39453 3.69233695e+306 15.4 15.4 15.8 15.8 16.6 16.6 [38,] 1018.41016 3.73254386e+306 15.9 15.9 15.9 16.4 16.4 15.9 [39,] 1018.42578 3.77318860e+306 15.1 15.1 15.8 15.4 17.1 15.7 [40,] 1018.44141 3.81427593e+306 16.8 16.8 16.8 15.4 15.7 15.7 [41,] 1018.45703 3.85581067e+306 15.5 15.5 15.7 15.8 15.8 15.5 [42,] 1018.47266 3.89779770e+306 15.3 15.3 15.8 15.8 15.8 15.8 [43,] 1018.48828 3.94024193e+306 15.5 15.5 16.1 15.6 16.1 16.1 [44,] 1018.50391 3.98314835e+306 16.5 16.5 15.8 15.6 16.5 16.5 [45,] 1018.51953 4.02652200e+306 15.2 15.2 16.2 15.6 16.2 16.2 [46,] 1018.53516 4.07036795e+306 15.1 15.1 16.2 16.2 15.5 15.9 [47,] 1018.55078 4.11469135e+306 15.4 15.4 16.4 15.4 16.4 16.4 [48,] 1018.56641 4.15949740e+306 15.2 15.2 16.8 15.4 15.7 16.8 [49,] 1018.58203 4.20479135e+306 15.2 15.2 15.6 16.3 16.3 15.6 [50,] 1018.59766 4.25057853e+306 16.5 16.5 15.8 15.8 15.6 15.6 [51,] 1018.61328 4.29686430e+306 15.4 15.4 15.7 15.6 16.1 16.1 [52,] 1018.62891 4.34365408e+306 15.4 15.4 16.2 15.7 16.3 16.2 [53,] 1018.64453 4.39095337e+306 15.6 15.6 16.1 16.1 15.6 15.6 [54,] 1018.66016 4.43876772e+306 15.3 15.3 15.9 15.9 15.3 15.6 [55,] 1018.67578 4.48710273e+306 15.1 15.1 15.8 15.6 15.6 16.0 [56,] 1018.69141 4.53596408e+306 15.2 15.2 15.9 15.4 17.9 15.9 [57,] 1018.70703 4.58535749e+306 15.4 15.4 15.6 15.6 16.0 15.6 [58,] 1018.72266 4.63528876e+306 15.1 15.1 16.7 15.8 16.7 16.7 [59,] 1018.73828 4.68576374e+306 15.5 15.5 15.4 16.1 15.7 16.2 [60,] 1018.75391 4.73678836e+306 16.6 16.6 15.4 15.8 16.6 15.9 [61,] 1018.76953 4.78836861e+306 16.5 16.5 15.8 16.5 15.6 15.9 [62,] 1018.78516 4.84051052e+306 15.0 15.0 15.6 15.6 16.3 16.3 [63,] 1018.80078 4.89322023e+306 15.1 15.1 15.6 16.6 15.5 15.7 [64,] 1018.81641 4.94650390e+306 15.1 15.1 15.7 15.9 15.5 15.9 [65,] 1018.83203 5.00036780e+306 15.4 15.4 15.6 16.1 16.0 16.0 [66,] 1018.84766 5.05481823e+306 15.4 15.4 16.3 16.3 16.3 15.9 [67,] 1018.86328 5.10986159e+306 15.1 15.1 16.4 15.9 15.7 16.4 [68,] 1018.87891 5.16550434e+306 16.5 16.5 16.5 16.5 15.7 15.7 [69,] 1018.89453 5.22175299e+306 15.1 15.1 15.3 16.6 16.6 15.8 [70,] 1018.91016 5.27861415e+306 15.0 15.0 15.7 17.5 15.7 15.7 [71,] 1018.92578 5.33609449e+306 15.6 15.6 15.6 15.6 16.1 15.6 [72,] 1018.94141 5.39420075e+306 15.4 15.4 18.0 15.7 18.0 18.0 [73,] 1018.95703 5.45293975e+306 15.3 15.3 15.5 16.0 15.5 16.0 [74,] 1018.97266 5.51231837e+306 16.5 16.5 16.5 15.7 15.7 16.5 [75,] 1018.98828 5.57234358e+306 15.1 15.1 15.8 15.6 15.6 16.3 [76,] 1019.00391 5.63302242e+306 14.7 14.7 15.2 15.8 16.2 16.2 [77,] 1019.01953 5.69436202e+306 15.6 15.6 15.6 15.9 16.0 15.6 [78,] 1019.03516 5.75636955e+306 15.1 15.1 15.6 16.7 15.6 15.6 [79,] 1019.05078 5.81905231e+306 15.3 15.3 16.3 16.1 16.1 15.8 [80,] 1019.06641 5.88241763e+306 15.1 15.1 15.5 15.7 16.1 16.2 [81,] 1019.08203 5.94647296e+306 15.0 15.0 15.4 16.6 15.4 15.4 [82,] 1019.09766 6.01122581e+306 14.8 14.8 15.4 15.8 15.8 16.8 [83,] 1019.11328 6.07668376e+306 15.2 15.2 15.3 15.7 15.9 16.5 [84,] 1019.12891 6.14285451e+306 15.3 15.3 15.8 15.8 15.8 18.0 [85,] 1019.14453 6.20974581e+306 15.0 15.0 15.6 16.1 15.4 16.1 [86,] 1019.16016 6.27736551e+306 15.4 15.4 15.7 15.9 15.9 16.3 [87,] 1019.17578 6.34572154e+306 14.8 14.8 15.2 15.6 15.6 15.6 [88,] 1019.19141 6.41482191e+306 15.0 15.0 15.8 15.8 17.1 17.1 [89,] 1019.20703 6.48467475e+306 14.7 14.7 15.4 15.6 15.9 16.2 [90,] 1019.22266 6.55528822e+306 15.9 15.9 14.8 16.1 15.9 16.1 [91,] 1019.23828 6.62667063e+306 16.0 16.0 16.0 16.0 16.0 16.0 [92,] 1019.25391 6.69883034e+306 14.9 14.9 14.9 16.6 15.6 16.6 [93,] 1019.26953 6.77177582e+306 15.0 15.0 15.1 16.2 16.2 16.3 [94,] 1019.28516 6.84551563e+306 14.8 14.8 15.6 15.8 15.6 16.5 [95,] 1019.30078 6.92005841e+306 15.1 15.1 14.9 15.9 15.6 15.9 [96,] 1019.31641 6.99541290e+306 15.0 15.0 14.9 16.1 15.3 15.7 [97,] 1019.33203 7.07158795e+306 17.0 17.0 14.6 15.8 15.9 15.8 [98,] 1019.34766 7.14859250e+306 14.5 14.5 15.4 15.6 16.1 15.6 [99,] 1019.36328 7.22643557e+306 15.1 15.1 15.1 16.3 15.9 16.3 [100,] 1019.37891 7.30512629e+306 16.0 16.0 16.0 16.2 16.0 16.0 [101,] 1019.39453 7.38467390e+306 14.9 14.9 14.8 15.7 16.8 16.8 [102,] 1019.41016 7.46508773e+306 15.1 15.1 14.4 16.7 15.7 15.7 [103,] 1019.42578 7.54637720e+306 14.9 14.9 14.9 16.0 16.0 15.5 [104,] 1019.44141 7.62855186e+306 15.2 15.2 14.5 16.1 16.5 15.8 [105,] 1019.45703 7.71162135e+306 15.1 15.1 14.3 15.9 15.9 15.3 [106,] 1019.47266 7.79559540e+306 15.0 15.0 15.0 15.8 16.0 16.0 [107,] 1019.48828 7.88048386e+306 15.1 15.1 15.1 15.9 15.9 15.6 [108,] 1019.50391 7.96629671e+306 14.8 14.8 14.8 15.9 15.9 16.7 [109,] 1019.51953 8.05304399e+306 14.6 14.6 14.5 16.5 16.5 16.5 [110,] 1019.53516 8.14073589e+306 14.9 14.9 14.3 15.9 15.5 15.5 [111,] 1019.55078 8.22938269e+306 14.8 14.8 16.2 15.8 15.6 16.2 [112,] 1019.56641 8.31899480e+306 14.5 14.5 17.1 15.9 15.9 15.9 [113,] 1019.58203 8.40958271e+306 14.4 14.4 15.9 15.8 15.8 15.5 [114,] 1019.59766 8.50115706e+306 14.7 14.7 16.3 16.3 15.7 16.3 [115,] 1019.61328 8.59372859e+306 14.6 14.6 15.9 16.3 15.9 16.3 [116,] 1019.62891 8.68730816e+306 14.5 14.5 15.3 15.9 15.5 15.5 [117,] 1019.64453 8.78190674e+306 14.5 14.5 15.8 16.6 16.0 15.8 [118,] 1019.66016 8.87753544e+306 14.5 14.5 15.6 15.8 15.9 15.9 [119,] 1019.67578 8.97420546e+306 14.7 14.7 15.7 16.9 16.9 15.7 [120,] 1019.69141 9.07192815e+306 14.5 14.5 15.9 15.5 15.9 16.1 [121,] 1019.70703 9.17071497e+306 13.7 13.7 18.0 15.9 15.9 15.9 [122,] 1019.72266 9.27057751e+306 13.4 13.4 15.8 15.7 15.5 15.5 [123,] 1019.73828 9.37152748e+306 13.8 13.8 16.0 15.9 15.7 15.7 [124,] 1019.75391 9.47357673e+306 14.1 14.1 15.9 15.7 15.9 15.9 [125,] 1019.76953 9.57673721e+306 13.6 13.6 16.1 16.2 16.2 15.3 [126,] 1019.78516 9.68102104e+306 13.3 13.3 16.0 15.9 16.7 15.4 [127,] 1019.80078 9.78644045e+306 12.8 12.8 16.4 16.4 16.4 15.4 [128,] 1019.81641 9.89300780e+306 11.8 11.8 15.8 15.8 15.8 16.9 [129,] 1019.83203 1.00007356e+307 15.7 15.7 16.8 15.7 16.8 15.8 [130,] 1019.84766 1.01096365e+307 11.8 11.8 15.9 18.1 18.1 15.9 [131,] 1019.86328 1.02197232e+307 12.5 12.5 16.1 15.7 16.3 16.3 [132,] 1019.87891 1.03310087e+307 13.4 13.4 16.8 16.0 15.7 15.7 [133,] 1019.89453 1.04435060e+307 12.9 12.9 15.7 15.7 16.0 16.0 [134,] 1019.91016 1.05572283e+307 13.0 13.0 15.9 15.5 15.9 16.4 [135,] 1019.92578 1.06721890e+307 13.8 13.8 16.5 15.8 16.5 16.5 [136,] 1019.94141 1.07884015e+307 14.2 14.2 17.0 15.8 15.8 15.8 [137,] 1019.95703 1.09058795e+307 15.3 15.3 15.7 16.4 16.4 15.5 [138,] 1019.97266 1.10246367e+307 13.8 13.8 15.9 16.1 16.1 16.1 [139,] 1019.98828 1.11446872e+307 14.0 14.0 15.9 16.3 15.9 16.3 [140,] 1020.00391 1.12660448e+307 13.8 13.8 16.6 16.6 16.0 16.0 [141,] 1020.01953 1.13887240e+307 13.9 13.9 16.3 15.4 15.8 16.3 [142,] 1020.03516 1.15127391e+307 14.8 14.8 15.3 15.6 16.0 15.6 [143,] 1020.05078 1.16381046e+307 14.7 14.7 15.9 16.7 15.9 15.9 [144,] 1020.06641 1.17648353e+307 13.9 13.9 15.8 15.8 16.6 16.6 [145,] 1020.08203 1.18929459e+307 14.7 14.7 16.0 16.0 16.8 15.6 [146,] 1020.09766 1.20224516e+307 14.3 14.3 15.6 16.6 16.6 15.6 [147,] 1020.11328 1.21533675e+307 15.0 15.0 16.4 16.4 15.8 16.4 [148,] 1020.12891 1.22857090e+307 16.3 16.3 14.3 15.7 15.9 16.3 [149,] 1020.14453 1.24194916e+307 15.1 15.1 15.1 16.2 16.0 16.2 [150,] 1020.16016 1.25547310e+307 14.9 14.9 14.9 15.6 16.1 16.3 [151,] 1020.17578 1.26914431e+307 14.7 14.7 14.6 16.9 15.9 15.9 [152,] 1020.19141 1.28296438e+307 16.2 16.2 16.2 15.8 16.2 15.8 [153,] 1020.20703 1.29693495e+307 14.5 14.5 15.6 15.8 16.4 16.4 [154,] 1020.22266 1.31105764e+307 14.9 14.9 14.9 17.1 15.4 17.1 [155,] 1020.23828 1.32533413e+307 14.9 14.9 14.9 15.5 16.4 16.4 [156,] 1020.25391 1.33976607e+307 15.1 15.1 14.5 16.0 16.2 16.2 [157,] 1020.26953 1.35435516e+307 15.6 15.6 14.6 16.2 15.7 16.2 [158,] 1020.28516 1.36910313e+307 15.3 15.3 15.3 16.2 16.2 15.6 [159,] 1020.30078 1.38401168e+307 16.7 16.7 14.7 15.9 15.2 15.4 [160,] 1020.31641 1.39908258e+307 14.7 14.7 15.7 16.2 15.8 15.5 [161,] 1020.33203 1.41431759e+307 14.9 14.9 15.2 15.6 16.6 15.6 [162,] 1020.34766 1.42971850e+307 15.0 15.0 15.0 16.4 15.8 16.4 [163,] 1020.36328 1.44528711e+307 15.9 15.9 15.9 16.0 15.9 16.0 [164,] 1020.37891 1.46102526e+307 15.0 15.0 15.3 15.6 16.1 15.5 [165,] 1020.39453 1.47693478e+307 15.6 15.6 14.8 16.0 15.6 15.6 [166,] 1020.41016 1.49301755e+307 15.3 15.3 15.1 16.7 15.8 15.8 [167,] 1020.42578 1.50927544e+307 15.0 15.0 15.4 16.0 15.4 15.6 [168,] 1020.44141 1.52571037e+307 15.0 15.0 15.6 16.1 16.1 16.1 [169,] 1020.45703 1.54232427e+307 15.0 15.0 15.0 16.1 15.7 16.1 [170,] 1020.47266 1.55911908e+307 15.4 15.4 15.2 15.9 15.9 15.9 [171,] 1020.48828 1.57609677e+307 15.3 15.3 15.3 15.8 15.8 16.6 [172,] 1020.50391 1.59325934e+307 14.8 14.8 15.5 16.6 16.0 15.8 [173,] 1020.51953 1.61060880e+307 16.0 16.0 14.8 16.8 16.8 15.5 [174,] 1020.53516 1.62814718e+307 15.4 15.4 14.9 15.8 16.3 15.6 [175,] 1020.55078 1.64587654e+307 15.1 15.1 16.0 16.0 15.5 15.5 [176,] 1020.56641 1.66379896e+307 15.2 15.2 15.7 16.8 15.7 15.7 [177,] 1020.58203 1.68191654e+307 15.9 15.9 15.2 15.9 15.6 15.6 [178,] 1020.59766 1.70023141e+307 15.2 15.2 16.0 15.6 15.6 15.6 [179,] 1020.61328 1.71874572e+307 15.4 15.4 15.4 16.3 16.3 15.6 [180,] 1020.62891 1.73746163e+307 15.6 15.6 15.6 16.1 15.6 16.1 [181,] 1020.64453 1.75638135e+307 15.3 15.3 14.9 15.6 16.2 16.2 [182,] 1020.66016 1.77550709e+307 15.3 15.3 15.0 16.4 15.5 16.4 [183,] 1020.67578 1.79484109e+307 15.0 15.0 15.1 16.9 15.8 15.9 [184,] 1020.69141 1.81438563e+307 15.5 15.5 15.5 16.9 15.6 15.6 [185,] 1020.70703 1.83414299e+307 17.0 17.0 15.3 17.0 15.9 15.4 [186,] 1020.72266 1.85411550e+307 15.2 15.2 15.4 17.0 15.6 15.8 [187,] 1020.73828 1.87430550e+307 15.4 15.4 16.2 16.2 15.7 15.4 [188,] 1020.75391 1.89471535e+307 15.4 15.4 15.9 17.0 15.6 15.4 [189,] 1020.76953 1.91534744e+307 15.1 15.1 15.4 16.1 15.3 15.8 [190,] 1020.78516 1.93620421e+307 15.6 15.6 15.7 15.5 15.6 15.6 [191,] 1020.80078 1.95728809e+307 15.5 15.5 15.5 16.1 15.4 15.4 [192,] 1020.81641 1.97860156e+307 17.0 17.0 15.4 17.0 15.7 17.0 [193,] 1020.83203 2.00014712e+307 16.2 16.2 16.2 16.2 16.2 15.9 [194,] 1020.84766 2.02192729e+307 15.9 15.9 15.3 15.6 15.5 15.9 [195,] 1020.86328 2.04394464e+307 16.1 16.1 16.1 16.0 15.3 15.3 [196,] 1020.87891 2.06620173e+307 15.5 15.5 16.2 16.2 15.4 15.6 [197,] 1020.89453 2.08870120e+307 15.3 15.3 15.8 15.8 15.7 15.8 [198,] 1020.91016 2.11144566e+307 15.8 15.8 15.7 17.1 17.1 17.1 [199,] 1020.92578 2.13443780e+307 16.6 16.6 15.2 15.7 15.7 15.7 [200,] 1020.94141 2.15768030e+307 15.6 15.6 15.4 16.1 16.1 15.6 [201,] 1020.95703 2.18117590e+307 16.0 16.0 15.7 15.4 16.0 15.2 [202,] 1020.97266 2.20492735e+307 15.4 15.4 15.6 15.4 15.6 15.7 [203,] 1020.98828 2.22893743e+307 16.6 16.6 15.6 15.6 15.6 15.6 [204,] 1021.00391 2.25320897e+307 15.8 15.8 15.8 15.9 15.9 15.9 [205,] 1021.01953 2.27774481e+307 15.9 15.9 15.4 15.9 17.1 15.9 [206,] 1021.03516 2.30254782e+307 15.9 15.9 15.9 15.9 15.9 15.9 [207,] 1021.05078 2.32762092e+307 15.7 15.7 15.7 15.5 15.5 15.5 [208,] 1021.06641 2.35296705e+307 15.6 15.6 15.6 15.9 15.4 15.6 [209,] 1021.08203 2.37858918e+307 15.5 15.5 15.8 16.5 15.4 15.4 [210,] 1021.09766 2.40449032e+307 16.6 16.6 15.7 16.6 15.8 15.6 [211,] 1021.11328 2.43067351e+307 15.4 15.4 16.3 16.3 15.4 15.3 [212,] 1021.12891 2.45714180e+307 16.1 16.1 15.8 16.1 16.1 15.8 [213,] 1021.14453 2.48389832e+307 15.5 15.5 15.9 16.0 15.3 15.5 [214,] 1021.16016 2.51094620e+307 15.6 15.6 15.4 15.6 16.9 15.4 [215,] 1021.17578 2.53828862e+307 15.8 15.8 16.4 15.8 15.1 15.4 [216,] 1021.19141 2.56592877e+307 15.9 15.9 16.2 15.6 15.6 16.2 [217,] 1021.20703 2.59386990e+307 16.1 16.1 16.0 16.1 16.1 16.0 [218,] 1021.22266 2.62211529e+307 15.8 15.8 15.8 15.8 15.8 15.8 [219,] 1021.23828 2.65066825e+307 16.4 16.4 15.8 15.8 15.5 15.5 [220,] 1021.25391 2.67953214e+307 15.8 15.8 15.8 16.8 15.7 15.3 [221,] 1021.26953 2.70871033e+307 16.3 16.3 15.9 16.3 15.4 16.3 [222,] 1021.28516 2.73820625e+307 15.6 15.6 16.2 16.2 16.2 16.2 [223,] 1021.30078 2.76802336e+307 16.2 16.2 16.0 16.2 15.1 15.1 [224,] 1021.31641 2.79816516e+307 15.9 15.9 15.7 15.7 15.7 15.7 [225,] 1021.33203 2.82863518e+307 16.4 16.4 16.4 15.6 15.9 16.4 [226,] 1021.34766 2.85943700e+307 16.8 16.8 15.9 16.8 15.8 15.5 [227,] 1021.36328 2.89057423e+307 16.2 16.2 16.1 16.2 15.3 15.4 [228,] 1021.37891 2.92205052e+307 16.3 16.3 16.0 15.6 15.7 15.5 [229,] 1021.39453 2.95386956e+307 15.9 15.9 15.9 15.8 15.4 15.6 [230,] 1021.41016 2.98603509e+307 17.4 17.4 17.4 15.9 15.4 15.8 [231,] 1021.42578 3.01855088e+307 15.5 15.5 17.0 15.8 15.2 15.0 [232,] 1021.44141 3.05142075e+307 16.2 16.2 16.1 15.7 15.7 15.3 [233,] 1021.45703 3.08464854e+307 16.2 16.2 16.2 16.2 15.7 16.1 [234,] 1021.47266 3.11823816e+307 15.6 15.6 15.9 15.6 15.6 15.6 [235,] 1021.48828 3.15219355e+307 15.9 15.9 15.9 15.6 15.4 15.6 [236,] 1021.50391 3.18651868e+307 17.7 17.7 17.7 15.6 15.3 15.4 [237,] 1021.51953 3.22121760e+307 15.7 15.7 16.5 16.1 15.8 15.4 [238,] 1021.53516 3.25629436e+307 17.1 17.1 16.0 17.1 15.9 15.7 [239,] 1021.55078 3.29175308e+307 16.2 16.2 15.8 16.2 16.3 16.2 [240,] 1021.56641 3.32759792e+307 15.5 15.5 15.9 15.9 15.5 16.0 [241,] 1021.58203 3.36383308e+307 15.7 15.7 16.7 15.6 16.7 15.3 [242,] 1021.59766 3.40046282e+307 15.6 15.6 16.3 15.8 15.6 16.3 [243,] 1021.61328 3.43749144e+307 15.7 15.7 15.7 17.2 17.2 17.2 [244,] 1021.62891 3.47492326e+307 15.5 15.5 16.0 16.0 16.0 15.5 [245,] 1021.64453 3.51276270e+307 15.4 15.4 15.5 15.8 15.5 15.8 [246,] 1021.66016 3.55101418e+307 15.6 15.6 15.8 16.4 15.4 15.4 [247,] 1021.67578 3.58968218e+307 15.6 15.6 16.2 16.2 15.5 15.9 [248,] 1021.69141 3.62877126e+307 16.0 16.0 15.6 16.1 15.5 16.0 [249,] 1021.70703 3.66828599e+307 15.8 15.8 15.7 15.7 15.3 15.3 [250,] 1021.72266 3.70823100e+307 16.2 16.2 16.2 16.2 15.2 15.0 [251,] 1021.73828 3.74861099e+307 16.4 16.4 15.5 15.9 15.9 16.4 [252,] 1021.75391 3.78943069e+307 15.7 15.7 15.9 15.9 15.0 15.1 [253,] 1021.76953 3.83069488e+307 15.5 15.5 16.3 16.3 15.0 14.9 [254,] 1021.78516 3.87240842e+307 16.1 16.1 16.1 16.1 16.1 16.1 [255,] 1021.80078 3.91457618e+307 15.8 15.8 15.8 17.4 17.4 15.8 [256,] 1021.81641 3.95720312e+307 15.5 15.5 15.5 16.5 15.3 15.5 [257,] 1021.83203 4.00029424e+307 16.2 16.2 16.2 16.0 15.1 15.1 bd0.p1.d1 [1,] 16.0 [2,] 16.4 [3,] 16.2 [4,] 15.4 [5,] 15.5 [6,] 16.6 [7,] 15.5 [8,] 15.5 [9,] 15.8 [10,] 15.8 [11,] 15.7 [12,] 15.8 [13,] 15.8 [14,] 15.5 [15,] 16.0 [16,] 15.5 [17,] 15.9 [18,] 17.2 [19,] 15.8 [20,] 16.2 [21,] 16.9 [22,] 15.6 [23,] 16.1 [24,] 15.7 [25,] 15.7 [26,] 15.3 [27,] 16.1 [28,] 15.2 [29,] 15.3 [30,] 15.5 [31,] 15.6 [32,] 16.3 [33,] 15.9 [34,] 15.6 [35,] 15.6 [36,] 15.9 [37,] 16.6 [38,] 16.4 [39,] 17.1 [40,] 15.7 [41,] 15.8 [42,] 15.8 [43,] 16.1 [44,] 16.5 [45,] 16.2 [46,] 15.5 [47,] 16.4 [48,] 15.7 [49,] 16.3 [50,] 15.6 [51,] 16.1 [52,] 16.3 [53,] 15.6 [54,] 15.3 [55,] 15.6 [56,] 17.9 [57,] 16.0 [58,] 16.7 [59,] 15.7 [60,] 16.6 [61,] 15.6 [62,] 16.3 [63,] 15.5 [64,] 15.5 [65,] 16.0 [66,] 16.3 [67,] 15.7 [68,] 15.7 [69,] 16.6 [70,] 15.7 [71,] 16.1 [72,] 18.0 [73,] 15.5 [74,] 15.7 [75,] 15.6 [76,] 16.2 [77,] 16.0 [78,] 15.6 [79,] 16.1 [80,] 16.1 [81,] 15.4 [82,] 15.8 [83,] 15.9 [84,] 15.8 [85,] 15.4 [86,] 15.9 [87,] 15.6 [88,] 17.1 [89,] 15.9 [90,] 15.9 [91,] 16.0 [92,] 15.6 [93,] 16.2 [94,] 15.6 [95,] 15.6 [96,] 15.3 [97,] 15.9 [98,] 16.1 [99,] 15.9 [100,] 16.0 [101,] 16.8 [102,] 15.7 [103,] 16.0 [104,] 16.5 [105,] 15.9 [106,] 16.0 [107,] 15.9 [108,] 15.9 [109,] 16.5 [110,] 15.5 [111,] 15.6 [112,] 15.9 [113,] 15.8 [114,] 15.7 [115,] 15.9 [116,] 15.5 [117,] 16.0 [118,] 15.9 [119,] 16.9 [120,] 15.9 [121,] 15.9 [122,] 15.5 [123,] 15.5 [124,] 15.9 [125,] 15.5 [126,] 15.4 [127,] 15.6 [128,] 15.8 [129,] 16.8 [130,] 18.1 [131,] 16.3 [132,] 15.4 [133,] 16.0 [134,] 15.4 [135,] 15.6 [136,] 15.8 [137,] 16.4 [138,] 16.1 [139,] 15.9 [140,] 16.0 [141,] 15.8 [142,] 16.0 [143,] 15.9 [144,] 16.6 [145,] 16.8 [146,] 16.6 [147,] 15.8 [148,] 15.9 [149,] 16.0 [150,] 16.1 [151,] 15.9 [152,] 16.2 [153,] 16.4 [154,] 15.4 [155,] 16.4 [156,] 16.2 [157,] 15.7 [158,] 16.2 [159,] 15.2 [160,] 15.8 [161,] 16.6 [162,] 15.8 [163,] 15.9 [164,] 16.1 [165,] 15.6 [166,] 15.8 [167,] 15.4 [168,] 16.1 [169,] 15.7 [170,] 15.9 [171,] 15.8 [172,] 16.0 [173,] 16.8 [174,] 16.3 [175,] 15.5 [176,] 15.7 [177,] 15.6 [178,] 15.6 [179,] 16.3 [180,] 15.6 [181,] 16.2 [182,] 15.5 [183,] 15.8 [184,] 15.6 [185,] 15.9 [186,] 15.6 [187,] 15.7 [188,] 15.6 [189,] 15.3 [190,] 15.6 [191,] 15.4 [192,] 15.7 [193,] 16.2 [194,] 15.5 [195,] 15.3 [196,] 15.4 [197,] 15.7 [198,] 17.1 [199,] 15.7 [200,] 16.1 [201,] 16.0 [202,] 15.6 [203,] 15.6 [204,] 15.9 [205,] 17.1 [206,] 15.9 [207,] 15.5 [208,] 15.4 [209,] 15.4 [210,] 15.8 [211,] 15.4 [212,] 16.1 [213,] 15.3 [214,] 16.9 [215,] 15.1 [216,] 15.6 [217,] 16.1 [218,] 15.8 [219,] 15.5 [220,] 15.7 [221,] 15.4 [222,] 16.2 [223,] 15.1 [224,] 15.7 [225,] 15.9 [226,] 15.8 [227,] 15.3 [228,] 15.7 [229,] 15.4 [230,] 15.4 [231,] 15.2 [232,] 15.7 [233,] 15.7 [234,] 15.6 [235,] 15.4 [236,] 15.3 [237,] 15.8 [238,] 15.9 [239,] 16.3 [240,] 15.5 [241,] 16.7 [242,] 15.6 [243,] 17.2 [244,] 16.0 [245,] 15.5 [246,] 15.4 [247,] 15.5 [248,] 15.5 [249,] 15.3 [250,] 15.2 [251,] 15.9 [252,] 15.0 [253,] 15.0 [254,] 16.1 [255,] 17.4 [256,] 15.3 [257,] 15.1 > > > with(bd0v.7, stopifnot(yhl[["yl"]] == 0)) # which is not really good and should maybe change ! > ## Fixed now : both have 4 x Inf and then are equal {but do Note relE difference above!} > stopifnot(all.equal(bd0v.7$ebd0[["yh"]], + bd0v.7$bd0[,"bd0"], tolerance = 4 * .Machine$double.eps)) > showProc.time() Time (user system elapsed): 1.06 0.02 1.08 > > > ## bd0() and ebd0() are _Inf_ for first three lambda's .. but they *must* be as truly > DBL_MAX > ## At the 4th value, Llam = 2^993, bd0() no longer overflows; _FIXME_ ebd0() shld *not* overflow: yM = 1.7598e+308 > summary(Llam <- 2^c(990:1023, 1024 - 1e-12)) Min. 1st Qu. Median Mean 3rd Qu. Max. 1.04640e+298 4.01816e+300 1.37153e+303 1.02725e+307 5.26668e+305 1.79769e+308 > bd0M <- bd0ver(x., Llam, mpfrPrec = 256, keepMpfr=TRUE) ebd0(x=1e+307, M=1.0464e+298): M/x = (r=0.561779104644474) * 2^(e=-29); i=16, f=1820, fg=f*2^-(e+10)=9.54204e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=2.09279e+298): M/x = (r=0.561779104644474) * 2^(e=-28); i=16, f=1820, fg=f*2^-(e+10)=4.77102e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=4.18558e+298): M/x = (r=0.561779104644474) * 2^(e=-27); i=16, f=1820, fg=f*2^-(e+10)=2.38551e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=8.37116e+298): M/x = (r=0.561779104644474) * 2^(e=-26); i=16, f=1820, fg=f*2^-(e+10)=1.19276e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( NaN, Inf); yl+yh= NaN non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=1.67423e+299): M/x = (r=0.561779104644474) * 2^(e=-25); i=16, f=1820, fg=f*2^-(e+10)=5.96378e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=2: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=3: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=4: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 3. after ADD1(M): yl,yh = ( 0, 1.79038e+308); yl+yh= 1.79038e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69053e+308); yl+yh= 1.69053e+308 ebd0(x=1e+307, M=3.34846e+299): M/x = (r=0.561779104644474) * 2^(e=-24); i=16, f=1820, fg=f*2^-(e+10)=2.98189e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=2: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=3: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=4: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 3. after ADD1(M): yl,yh = ( 0, 1.72107e+308); yl+yh= 1.72107e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.62122e+308); yl+yh= 1.62122e+308 ebd0(x=1e+307, M=6.69693e+299): M/x = (r=0.561779104644474) * 2^(e=-23); i=16, f=1820, fg=f*2^-(e+10)=1.49094e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=2: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=3: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=4: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 3. after ADD1(M): yl,yh = ( 0, 1.65175e+308); yl+yh= 1.65175e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.5519e+308); yl+yh= 1.5519e+308 ebd0(x=1e+307, M=1.33939e+300): M/x = (r=0.561779104644474) * 2^(e=-22); i=16, f=1820, fg=f*2^-(e+10)=7.45472e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=2: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=3: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=4: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 3. after ADD1(M): yl,yh = ( 0, 1.58244e+308); yl+yh= 1.58244e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48259e+308); yl+yh= 1.48259e+308 ebd0(x=1e+307, M=2.67877e+300): M/x = (r=0.561779104644474) * 2^(e=-21); i=16, f=1820, fg=f*2^-(e+10)=3.72736e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=2: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=3: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=4: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 3. after ADD1(M): yl,yh = ( 0, 1.51312e+308); yl+yh= 1.51312e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41327e+308); yl+yh= 1.41327e+308 ebd0(x=1e+307, M=5.35754e+300): M/x = (r=0.561779104644474) * 2^(e=-20); i=16, f=1820, fg=f*2^-(e+10)=1.86368e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=2: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=3: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=4: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 3. after ADD1(M): yl,yh = ( 0, 1.44381e+308); yl+yh= 1.44381e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.34396e+308); yl+yh= 1.34396e+308 ebd0(x=1e+307, M=1.07151e+301): M/x = (r=0.561779104644474) * 2^(e=-19); i=16, f=1820, fg=f*2^-(e+10)=931840 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=2: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=3: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=4: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 3. after ADD1(M): yl,yh = ( 0, 1.37449e+308); yl+yh= 1.37449e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27464e+308); yl+yh= 1.27464e+308 ebd0(x=1e+307, M=2.14302e+301): M/x = (r=0.561779104644474) * 2^(e=-18); i=16, f=1820, fg=f*2^-(e+10)=465920 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=2: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=3: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=4: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 3. after ADD1(M): yl,yh = ( 0, 1.30518e+308); yl+yh= 1.30518e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20533e+308); yl+yh= 1.20533e+308 ebd0(x=1e+307, M=4.28603e+301): M/x = (r=0.561779104644474) * 2^(e=-17); i=16, f=1820, fg=f*2^-(e+10)=232960 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=2: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=3: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=4: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 3. after ADD1(M): yl,yh = ( 0, 1.23586e+308); yl+yh= 1.23586e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.13602e+308); yl+yh= 1.13602e+308 ebd0(x=1e+307, M=8.57207e+301): M/x = (r=0.561779104644474) * 2^(e=-16); i=16, f=1820, fg=f*2^-(e+10)=116480 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=2: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=3: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=4: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 3. after ADD1(M): yl,yh = ( 0, 1.16655e+308); yl+yh= 1.16655e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0667e+308); yl+yh= 1.0667e+308 ebd0(x=1e+307, M=1.71441e+302): M/x = (r=0.561779104644474) * 2^(e=-15); i=16, f=1820, fg=f*2^-(e+10)=58240 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=2: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=3: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=4: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 3. after ADD1(M): yl,yh = ( 0, 1.09723e+308); yl+yh= 1.09723e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 9.97387e+307); yl+yh= 9.97387e+307 ebd0(x=1e+307, M=3.42883e+302): M/x = (r=0.561779104644474) * 2^(e=-14); i=16, f=1820, fg=f*2^-(e+10)=29120 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=2: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=3: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=4: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 3. after ADD1(M): yl,yh = ( 0, 1.02792e+308); yl+yh= 1.02792e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 9.28074e+307); yl+yh= 9.28074e+307 ebd0(x=1e+307, M=6.85766e+302): M/x = (r=0.561779104644474) * 2^(e=-13); i=16, f=1820, fg=f*2^-(e+10)=14560 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=2: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=3: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=4: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 3. after ADD1(M): yl,yh = ( 0, 9.5861e+307); yl+yh= 9.5861e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.58763e+307); yl+yh= 8.58763e+307 ebd0(x=1e+307, M=1.37153e+303): M/x = (r=0.561779104644474) * 2^(e=-12); i=16, f=1820, fg=f*2^-(e+10)=7280 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=2: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=3: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=4: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 3. after ADD1(M): yl,yh = ( 0, 8.89302e+307); yl+yh= 8.89302e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.89455e+307); yl+yh= 7.89455e+307 ebd0(x=1e+307, M=2.74306e+303): M/x = (r=0.561779104644474) * 2^(e=-11); i=16, f=1820, fg=f*2^-(e+10)=3640 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=2: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=3: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=4: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 3. after ADD1(M): yl,yh = ( 0, 8.20001e+307); yl+yh= 8.20001e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.20154e+307); yl+yh= 7.20154e+307 ebd0(x=1e+307, M=5.48612e+303): M/x = (r=0.561779104644474) * 2^(e=-10); i=16, f=1820, fg=f*2^-(e+10)=1820 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=2: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=3: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=4: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 3. after ADD1(M): yl,yh = ( 0, 7.50714e+307); yl+yh= 7.50714e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.50867e+307); yl+yh= 6.50867e+307 ebd0(x=1e+307, M=1.09722e+304): M/x = (r=0.561779104644474) * 2^(e=-9); i=16, f=1820, fg=f*2^-(e+10)=910 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=2: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=3: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=4: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 3. after ADD1(M): yl,yh = ( 0, 6.81454e+307); yl+yh= 6.81454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.81607e+307); yl+yh= 5.81607e+307 ebd0(x=1e+307, M=2.19445e+304): M/x = (r=0.561779104644474) * 2^(e=-8); i=16, f=1820, fg=f*2^-(e+10)=455 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=2: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=3: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=4: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 3. after ADD1(M): yl,yh = ( 0, 6.12249e+307); yl+yh= 6.12249e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12402e+307); yl+yh= 5.12402e+307 ebd0(x=1e+307, M=4.3889e+304): M/x = (r=0.561779104644474) * 2^(e=-7); i=16, f=1820, fg=f*2^-(e+10)=227.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=2: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=3: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=4: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 3. after ADD1(M): yl,yh = ( 0, 5.43154e+307); yl+yh= 5.43154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43307e+307); yl+yh= 4.43307e+307 ebd0(x=1e+307, M=8.7778e+304): M/x = (r=0.561779104644474) * 2^(e=-6); i=16, f=1820, fg=f*2^-(e+10)=113.75 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=2: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=3: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=4: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 3. after ADD1(M): yl,yh = ( 0, 4.74278e+307); yl+yh= 4.74278e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.74431e+307); yl+yh= 3.74431e+307 ebd0(x=1e+307, M=1.75556e+305): M/x = (r=0.561779104644474) * 2^(e=-5); i=16, f=1820, fg=f*2^-(e+10)=56.875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=2: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=3: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=4: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 3. after ADD1(M): yl,yh = ( 0, 4.05841e+307); yl+yh= 4.05841e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05994e+307); yl+yh= 3.05994e+307 ebd0(x=1e+307, M=3.51112e+305): M/x = (r=0.561779104644474) * 2^(e=-4); i=16, f=1820, fg=f*2^-(e+10)=28.4375 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=2: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=3: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=4: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 3. after ADD1(M): yl,yh = ( 0, 3.38282e+307); yl+yh= 3.38282e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38435e+307); yl+yh= 2.38435e+307 ebd0(x=1e+307, M=7.02224e+305): M/x = (r=0.561779104644474) * 2^(e=-3); i=16, f=1820, fg=f*2^-(e+10)=14.2188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=2: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=3: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=4: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 3. after ADD1(M): yl,yh = ( 0, 2.72479e+307); yl+yh= 2.72479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.72631e+307); yl+yh= 1.72631e+307 ebd0(x=1e+307, M=1.40445e+306): M/x = (r=0.561779104644474) * 2^(e=-2); i=16, f=1820, fg=f*2^-(e+10)=7.10938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=2: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=3: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=4: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 3. after ADD1(M): yl,yh = ( 0, 2.10186e+307); yl+yh= 2.10186e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 ebd0(x=1e+307, M=2.8089e+306): M/x = (r=0.561779104644474) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=4: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54916e+307); yl+yh= 1.54916e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.50683e+306); yl+yh= 5.50683e+306 ebd0(x=1e+307, M=5.61779e+306): M/x = (r=0.561779104644474) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=4: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.1369e+307); yl+yh= 1.1369e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.38426e+306); yl+yh= 1.38426e+306 ebd0(x=1e+307, M=1.12356e+307): M/x = (r=0.561779104644474) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=2: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=3: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=4: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 3. after ADD1(M): yl,yh = ( 0, 1.00553e+307); yl+yh= 1.00553e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05759e+304); yl+yh= 7.05759e+304 ebd0(x=1e+307, M=2.24712e+307): M/x = (r=0.561779104644474) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=2: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=3: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=4: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 3. after ADD1(M): yl,yh = ( 0, 1.43594e+307); yl+yh= 1.43594e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.37469e+306); yl+yh= 4.37469e+306 ebd0(x=1e+307, M=4.49423e+307): M/x = (r=0.561779104644474) * 2^(e=3); i=16, f=1820, fg=f*2^-(e+10)=0.222168 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=2: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=3: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=4: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 3. after ADD1(M): yl,yh = ( 0, 2.98991e+307); yl+yh= 2.98991e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.99144e+307); yl+yh= 1.99144e+307 ebd0(x=1e+307, M=8.98847e+307): M/x = (r=0.561779104644474) * 2^(e=4); i=16, f=1820, fg=f*2^-(e+10)=0.111084 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=2: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=3: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=4: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 3. after ADD1(M): yl,yh = ( 0, 6.791e+307); yl+yh= 6.791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.79252e+307); yl+yh= 5.79252e+307 ebd0(x=1e+307, M=1.79769e+308): M/x = (r=0.561779104644075) * 2^(e=5); i=16, f=1820, fg=f*2^-(e+10)=0.055542 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419480256795 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=2: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=3: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=4: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 3. after ADD1(M): yl,yh = ( 0, 1.50863e+308); yl+yh= 1.50863e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40878e+308); yl+yh= 1.40878e+308 dpq_ebd0(x[1:1], np[1:35], ... ): ebd0(x=1e+307, M=4.18558e+298): M/x = (r=0.561779104644474) * 2^(e=-27); i=16, f=1820, fg=f*2^-(e+10)=2.38551e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( nan, inf); yl+yh= nan non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=8.37116e+298): M/x = (r=0.561779104644474) * 2^(e=-26); i=16, f=1820, fg=f*2^-(e+10)=1.19276e+08 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( nan, inf); yl+yh= nan non-finite yh --> return((yh=Inf, yl=0)) ebd0(x=1e+307, M=1.67423e+299): M/x = (r=0.561779104644474) * 2^(e=-25); i=16, f=1820, fg=f*2^-(e+10)=5.96378e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=1: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=2: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 j=3: ( 0, 1.79038e+308); ( 0, 1.79038e+308); yl+yh= 1.79038e+308 3. after ADD1(M): yl,yh = ( 0, 1.79038e+308); yl+yh= 1.79038e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69053e+308); yl+yh= 1.69053e+308 ebd0(x=1e+307, M=3.34846e+299): M/x = (r=0.561779104644474) * 2^(e=-24); i=16, f=1820, fg=f*2^-(e+10)=2.98189e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=1: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=2: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 j=3: ( 0, 1.72107e+308); ( 0, 1.72107e+308); yl+yh= 1.72107e+308 3. after ADD1(M): yl,yh = ( 0, 1.72107e+308); yl+yh= 1.72107e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.62122e+308); yl+yh= 1.62122e+308 ebd0(x=1e+307, M=6.69693e+299): M/x = (r=0.561779104644474) * 2^(e=-23); i=16, f=1820, fg=f*2^-(e+10)=1.49094e+07 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=1: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=2: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 j=3: ( 0, 1.65175e+308); ( 0, 1.65175e+308); yl+yh= 1.65175e+308 3. after ADD1(M): yl,yh = ( 0, 1.65175e+308); yl+yh= 1.65175e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.5519e+308); yl+yh= 1.5519e+308 ebd0(x=1e+307, M=1.33939e+300): M/x = (r=0.561779104644474) * 2^(e=-22); i=16, f=1820, fg=f*2^-(e+10)=7.45472e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=1: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=2: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 j=3: ( 0, 1.58244e+308); ( 0, 1.58244e+308); yl+yh= 1.58244e+308 3. after ADD1(M): yl,yh = ( 0, 1.58244e+308); yl+yh= 1.58244e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48259e+308); yl+yh= 1.48259e+308 ebd0(x=1e+307, M=2.67877e+300): M/x = (r=0.561779104644474) * 2^(e=-21); i=16, f=1820, fg=f*2^-(e+10)=3.72736e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=1: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=2: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 j=3: ( 0, 1.51312e+308); ( 0, 1.51312e+308); yl+yh= 1.51312e+308 3. after ADD1(M): yl,yh = ( 0, 1.51312e+308); yl+yh= 1.51312e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41327e+308); yl+yh= 1.41327e+308 ebd0(x=1e+307, M=5.35754e+300): M/x = (r=0.561779104644474) * 2^(e=-20); i=16, f=1820, fg=f*2^-(e+10)=1.86368e+06 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=1: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=2: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 j=3: ( 0, 1.44381e+308); ( 0, 1.44381e+308); yl+yh= 1.44381e+308 3. after ADD1(M): yl,yh = ( 0, 1.44381e+308); yl+yh= 1.44381e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.34396e+308); yl+yh= 1.34396e+308 ebd0(x=1e+307, M=1.07151e+301): M/x = (r=0.561779104644474) * 2^(e=-19); i=16, f=1820, fg=f*2^-(e+10)=931840 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=1: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=2: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 j=3: ( 0, 1.37449e+308); ( 0, 1.37449e+308); yl+yh= 1.37449e+308 3. after ADD1(M): yl,yh = ( 0, 1.37449e+308); yl+yh= 1.37449e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27464e+308); yl+yh= 1.27464e+308 ebd0(x=1e+307, M=2.14302e+301): M/x = (r=0.561779104644474) * 2^(e=-18); i=16, f=1820, fg=f*2^-(e+10)=465920 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=1: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=2: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 j=3: ( 0, 1.30518e+308); ( 0, 1.30518e+308); yl+yh= 1.30518e+308 3. after ADD1(M): yl,yh = ( 0, 1.30518e+308); yl+yh= 1.30518e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20533e+308); yl+yh= 1.20533e+308 ebd0(x=1e+307, M=4.28603e+301): M/x = (r=0.561779104644474) * 2^(e=-17); i=16, f=1820, fg=f*2^-(e+10)=232960 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=1: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=2: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 j=3: ( 0, 1.23586e+308); ( 0, 1.23586e+308); yl+yh= 1.23586e+308 3. after ADD1(M): yl,yh = ( 0, 1.23586e+308); yl+yh= 1.23586e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.13602e+308); yl+yh= 1.13602e+308 ebd0(x=1e+307, M=8.57207e+301): M/x = (r=0.561779104644474) * 2^(e=-16); i=16, f=1820, fg=f*2^-(e+10)=116480 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=1: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=2: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 j=3: ( 0, 1.16655e+308); ( 0, 1.16655e+308); yl+yh= 1.16655e+308 3. after ADD1(M): yl,yh = ( 0, 1.16655e+308); yl+yh= 1.16655e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0667e+308); yl+yh= 1.0667e+308 ebd0(x=1e+307, M=1.71441e+302): M/x = (r=0.561779104644474) * 2^(e=-15); i=16, f=1820, fg=f*2^-(e+10)=58240 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=1: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=2: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 j=3: ( 0, 1.09723e+308); ( 0, 1.09723e+308); yl+yh= 1.09723e+308 3. after ADD1(M): yl,yh = ( 0, 1.09723e+308); yl+yh= 1.09723e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 9.97387e+307); yl+yh= 9.97387e+307 ebd0(x=1e+307, M=3.42883e+302): M/x = (r=0.561779104644474) * 2^(e=-14); i=16, f=1820, fg=f*2^-(e+10)=29120 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=1: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=2: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 j=3: ( 0, 1.02792e+308); ( 0, 1.02792e+308); yl+yh= 1.02792e+308 3. after ADD1(M): yl,yh = ( 0, 1.02792e+308); yl+yh= 1.02792e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 9.28074e+307); yl+yh= 9.28074e+307 ebd0(x=1e+307, M=6.85766e+302): M/x = (r=0.561779104644474) * 2^(e=-13); i=16, f=1820, fg=f*2^-(e+10)=14560 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=1: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=2: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 j=3: ( 0, 9.58603e+307); ( 0, 9.58603e+307); yl+yh= 9.58603e+307 3. after ADD1(M): yl,yh = ( 0, 9.5861e+307); yl+yh= 9.5861e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.58763e+307); yl+yh= 8.58763e+307 ebd0(x=1e+307, M=1.37153e+303): M/x = (r=0.561779104644474) * 2^(e=-12); i=16, f=1820, fg=f*2^-(e+10)=7280 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=1: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=2: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 j=3: ( 0, 8.89289e+307); ( 0, 8.89289e+307); yl+yh= 8.89289e+307 3. after ADD1(M): yl,yh = ( 0, 8.89302e+307); yl+yh= 8.89302e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.89455e+307); yl+yh= 7.89455e+307 ebd0(x=1e+307, M=2.74306e+303): M/x = (r=0.561779104644474) * 2^(e=-11); i=16, f=1820, fg=f*2^-(e+10)=3640 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=1: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=2: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 j=3: ( 0, 8.19974e+307); ( 0, 8.19974e+307); yl+yh= 8.19974e+307 3. after ADD1(M): yl,yh = ( 0, 8.20001e+307); yl+yh= 8.20001e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.20154e+307); yl+yh= 7.20154e+307 ebd0(x=1e+307, M=5.48612e+303): M/x = (r=0.561779104644474) * 2^(e=-10); i=16, f=1820, fg=f*2^-(e+10)=1820 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=1: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=2: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 j=3: ( 0, 7.50659e+307); ( 0, 7.50659e+307); yl+yh= 7.50659e+307 3. after ADD1(M): yl,yh = ( 0, 7.50714e+307); yl+yh= 7.50714e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.50867e+307); yl+yh= 6.50867e+307 ebd0(x=1e+307, M=1.09722e+304): M/x = (r=0.561779104644474) * 2^(e=-9); i=16, f=1820, fg=f*2^-(e+10)=910 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=1: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=2: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 j=3: ( 0, 6.81345e+307); ( 0, 6.81345e+307); yl+yh= 6.81345e+307 3. after ADD1(M): yl,yh = ( 0, 6.81454e+307); yl+yh= 6.81454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.81607e+307); yl+yh= 5.81607e+307 ebd0(x=1e+307, M=2.19445e+304): M/x = (r=0.561779104644474) * 2^(e=-8); i=16, f=1820, fg=f*2^-(e+10)=455 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=1: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=2: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 j=3: ( 0, 6.1203e+307); ( 0, 6.1203e+307); yl+yh= 6.1203e+307 3. after ADD1(M): yl,yh = ( 0, 6.12249e+307); yl+yh= 6.12249e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12402e+307); yl+yh= 5.12402e+307 ebd0(x=1e+307, M=4.3889e+304): M/x = (r=0.561779104644474) * 2^(e=-7); i=16, f=1820, fg=f*2^-(e+10)=227.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=1: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=2: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 j=3: ( 0, 5.42715e+307); ( 0, 5.42715e+307); yl+yh= 5.42715e+307 3. after ADD1(M): yl,yh = ( 0, 5.43154e+307); yl+yh= 5.43154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43307e+307); yl+yh= 4.43307e+307 ebd0(x=1e+307, M=8.7778e+304): M/x = (r=0.561779104644474) * 2^(e=-6); i=16, f=1820, fg=f*2^-(e+10)=113.75 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=1: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=2: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 j=3: ( 0, 4.734e+307); ( 0, 4.734e+307); yl+yh= 4.734e+307 3. after ADD1(M): yl,yh = ( 0, 4.74278e+307); yl+yh= 4.74278e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.74431e+307); yl+yh= 3.74431e+307 ebd0(x=1e+307, M=1.75556e+305): M/x = (r=0.561779104644474) * 2^(e=-5); i=16, f=1820, fg=f*2^-(e+10)=56.875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=1: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=2: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 j=3: ( 0, 4.04086e+307); ( 0, 4.04086e+307); yl+yh= 4.04086e+307 3. after ADD1(M): yl,yh = ( 0, 4.05841e+307); yl+yh= 4.05841e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05994e+307); yl+yh= 3.05994e+307 ebd0(x=1e+307, M=3.51112e+305): M/x = (r=0.561779104644474) * 2^(e=-4); i=16, f=1820, fg=f*2^-(e+10)=28.4375 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=1: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=2: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 j=3: ( 0, 3.34771e+307); ( 0, 3.34771e+307); yl+yh= 3.34771e+307 3. after ADD1(M): yl,yh = ( 0, 3.38282e+307); yl+yh= 3.38282e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38435e+307); yl+yh= 2.38435e+307 ebd0(x=1e+307, M=7.02224e+305): M/x = (r=0.561779104644474) * 2^(e=-3); i=16, f=1820, fg=f*2^-(e+10)=14.2188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=1: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=2: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 j=3: ( 0, 2.65456e+307); ( 0, 2.65456e+307); yl+yh= 2.65456e+307 3. after ADD1(M): yl,yh = ( 0, 2.72479e+307); yl+yh= 2.72479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.72631e+307); yl+yh= 1.72631e+307 ebd0(x=1e+307, M=1.40445e+306): M/x = (r=0.561779104644474) * 2^(e=-2); i=16, f=1820, fg=f*2^-(e+10)=7.10938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=1: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=2: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 j=3: ( 0, 1.96142e+307); ( 0, 1.96142e+307); yl+yh= 1.96142e+307 3. after ADD1(M): yl,yh = ( 0, 2.10186e+307); yl+yh= 2.10186e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 ebd0(x=1e+307, M=2.8089e+306): M/x = (r=0.561779104644474) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=1: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54916e+307); yl+yh= 1.54916e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.50683e+306); yl+yh= 5.50683e+306 ebd0(x=1e+307, M=5.61779e+306): M/x = (r=0.561779104644474) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.1369e+307); yl+yh= 1.1369e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.38426e+306); yl+yh= 1.38426e+306 ebd0(x=1e+307, M=1.12356e+307): M/x = (r=0.561779104644474) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=1: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=2: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 j=3: ( 0, -1.18026e+306); ( 0, -1.18026e+306); yl+yh= -1.18026e+306 3. after ADD1(M): yl,yh = ( 0, 1.00553e+307); yl+yh= 1.00553e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05759e+304); yl+yh= 7.05759e+304 ebd0(x=1e+307, M=2.24712e+307): M/x = (r=0.561779104644474) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=1: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=2: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 j=3: ( 0, -8.11173e+306); ( 0, -8.11173e+306); yl+yh= -8.11173e+306 3. after ADD1(M): yl,yh = ( 0, 1.43594e+307); yl+yh= 1.43594e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.37469e+306); yl+yh= 4.37469e+306 ebd0(x=1e+307, M=4.49423e+307): M/x = (r=0.561779104644474) * 2^(e=3); i=16, f=1820, fg=f*2^-(e+10)=0.222168 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=1: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=2: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 j=3: ( 0, -1.50432e+307); ( 0, -1.50432e+307); yl+yh= -1.50432e+307 3. after ADD1(M): yl,yh = ( 0, 2.98991e+307); yl+yh= 2.98991e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.99144e+307); yl+yh= 1.99144e+307 ebd0(x=1e+307, M=8.98847e+307): M/x = (r=0.561779104644474) * 2^(e=4); i=16, f=1820, fg=f*2^-(e+10)=0.111084 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419479548646 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=1: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=2: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 j=3: ( 0, -2.19747e+307); ( 0, -2.19747e+307); yl+yh= -2.19747e+307 3. after ADD1(M): yl,yh = ( 0, 6.791e+307); yl+yh= 6.791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.79252e+307); yl+yh= 5.79252e+307 ebd0(x=1e+307, M=1.79769e+308): M/x = (r=0.561779104644075) * 2^(e=5); i=16, f=1820, fg=f*2^-(e+10)=0.055542 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001525419480256795 1a. before adding -x * log1pmx(.) = -x * -1.16464e-06 = 1.16464e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.16464e+301); yl+yh= 1.16464e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=1: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=2: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 j=3: ( 0, -2.89061e+307); ( 0, -2.89061e+307); yl+yh= -2.89061e+307 3. after ADD1(M): yl,yh = ( 0, 1.50863e+308); yl+yh= 1.50863e+308 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40878e+308); yl+yh= 1.40878e+308 bd0(x=1e+307, np=1.0464e+298): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.09279e+298): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.18558e+298): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.37116e+298): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.67423e+299): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.34846e+299): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.69693e+299): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.33939e+300): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.67877e+300): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.35754e+300): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.07151e+301): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.14302e+301): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.28603e+301): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.57207e+301): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.71441e+302): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.42883e+302): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.85766e+302): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.37153e+303): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.74306e+303): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.48612e+303): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.09722e+304): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.19445e+304): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.3889e+304): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.7778e+304): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.75556e+305): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.51112e+305): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.02224e+305): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.40445e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.8089e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.61779e+306): |x-np| not too "small" -> direct formula bd0(1e+307, 1.12356e+307): T.series w/ 32 terms -> bd0=7.05759e+304 bd0(x=1e+307, np=2.24712e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.49423e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.98847e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.79769e+308): |x-np| not too "small" -> direct formula > with(bd0M, data.frame(log2.L = log2(np), bd0 = bd0, ebd0, bd0M. = format(bd0M, digits=8))) log2.L bd0.bd0 bd0.bd0.l bd0.bd0.p1l1 bd0.bd0.p1.d 1 990 Inf Inf Inf Inf 2 991 Inf Inf Inf Inf 3 992 Inf Inf Inf Inf 4 993 1.75984733e+308 1.75984733e+308 1.75984733e+308 1.75984733e+308 5 994 1.69053261e+308 1.69053261e+308 1.69053261e+308 1.69053261e+308 6 995 1.62121789e+308 1.62121789e+308 1.62121789e+308 1.62121789e+308 7 996 1.55190318e+308 1.55190318e+308 1.55190318e+308 1.55190318e+308 8 997 1.48258847e+308 1.48258847e+308 1.48258847e+308 1.48258847e+308 9 998 1.41327376e+308 1.41327376e+308 1.41327376e+308 1.41327376e+308 10 999 1.34395907e+308 1.34395907e+308 1.34395907e+308 1.34395907e+308 11 1000 1.27464441e+308 1.27464441e+308 1.27464441e+308 1.27464441e+308 12 1001 1.20532980e+308 1.20532980e+308 1.20532980e+308 1.20532980e+308 13 1002 1.13601529e+308 1.13601529e+308 1.13601529e+308 1.13601529e+308 14 1003 1.06670100e+308 1.06670100e+308 1.06670100e+308 1.06670100e+308 15 1004 9.97387141e+307 9.97387141e+307 9.97387141e+307 9.97387141e+307 16 1005 9.28074137e+307 9.28074137e+307 9.28074137e+307 9.28074137e+307 17 1006 8.58762848e+307 8.58762848e+307 8.58762848e+307 8.58762848e+307 18 1007 7.89454988e+307 7.89454988e+307 7.89454988e+307 7.89454988e+307 19 1008 7.20153985e+307 7.20153985e+307 7.20153985e+307 7.20153985e+307 20 1009 6.50866698e+307 6.50866698e+307 6.50866698e+307 6.50866698e+307 21 1010 5.81606841e+307 5.81606841e+307 5.81606841e+307 5.81606841e+307 22 1011 5.12401845e+307 5.12401845e+307 5.12401845e+307 5.12401845e+307 23 1012 4.43306572e+307 4.43306572e+307 4.43306572e+307 4.43306572e+307 24 1013 3.74430744e+307 3.74430744e+307 3.74430744e+307 3.74430744e+307 25 1014 3.05993806e+307 3.05993806e+307 3.05993806e+307 3.05993806e+307 26 1015 2.38434647e+307 2.38434647e+307 2.38434647e+307 2.38434647e+307 27 1016 1.72631049e+307 1.72631049e+307 1.72631049e+307 1.72631049e+307 28 1017 1.10338570e+307 1.10338570e+307 1.10338570e+307 1.10338570e+307 29 1018 5.50683291e+306 5.50683291e+306 5.50683291e+306 5.50683291e+306 30 1019 1.38425663e+306 1.38425663e+306 1.38425663e+306 1.38425663e+306 31 1020 7.05758732e+304 7.05758732e+304 7.05758732e+304 7.05758732e+304 32 1021 4.37468616e+306 4.37468616e+306 4.37468616e+306 4.37468616e+306 33 1022 1.99143785e+307 1.99143785e+307 1.99143785e+307 1.99143785e+307 34 1023 5.79252351e+307 5.79252351e+307 5.79252351e+307 5.79252351e+307 35 1024 1.40878420e+308 1.40878420e+308 1.40878420e+308 1.40878420e+308 bd0.bd0.p1.d1 yh yl bd0M. 1 Inf Inf 0 1.9677915e+308 2 Inf Inf 0 1.8984768e+308 3 Inf Inf 0 1.8291620e+308 4 1.75984733e+308 Inf 0 1.7598473e+308 5 1.69053261e+308 1.69053261e+308 0 1.6905326e+308 6 1.62121789e+308 1.62121789e+308 0 1.6212179e+308 7 1.55190318e+308 1.55190318e+308 0 1.5519032e+308 8 1.48258847e+308 1.48258847e+308 0 1.4825885e+308 9 1.41327376e+308 1.41327376e+308 0 1.4132738e+308 10 1.34395907e+308 1.34395907e+308 0 1.3439591e+308 11 1.27464441e+308 1.27464441e+308 0 1.2746444e+308 12 1.20532980e+308 1.20532980e+308 0 1.2053298e+308 13 1.13601529e+308 1.13601529e+308 0 1.1360153e+308 14 1.06670100e+308 1.06670100e+308 0 1.0667010e+308 15 9.97387141e+307 9.97387141e+307 0 9.9738714e+307 16 9.28074137e+307 9.28074137e+307 0 9.2807414e+307 17 8.58762848e+307 8.58762848e+307 0 8.5876285e+307 18 7.89454988e+307 7.89454988e+307 0 7.8945499e+307 19 7.20153985e+307 7.20153985e+307 0 7.2015399e+307 20 6.50866698e+307 6.50866698e+307 0 6.5086670e+307 21 5.81606841e+307 5.81606841e+307 0 5.8160684e+307 22 5.12401845e+307 5.12401845e+307 0 5.1240185e+307 23 4.43306572e+307 4.43306572e+307 0 4.4330657e+307 24 3.74430744e+307 3.74430744e+307 0 3.7443074e+307 25 3.05993806e+307 3.05993806e+307 0 3.0599381e+307 26 2.38434647e+307 2.38434647e+307 0 2.3843465e+307 27 1.72631049e+307 1.72631049e+307 0 1.7263105e+307 28 1.10338570e+307 1.10338570e+307 0 1.1033857e+307 29 5.50683291e+306 5.50683291e+306 0 5.5068329e+306 30 1.38425663e+306 1.38425663e+306 0 1.3842566e+306 31 7.05758732e+304 7.05758732e+304 0 7.0575873e+304 32 4.37468616e+306 4.37468616e+306 0 4.3746862e+306 33 1.99143785e+307 1.99143785e+307 0 1.9914379e+307 34 5.79252351e+307 5.79252351e+307 0 5.7925235e+307 35 1.40878420e+308 1.40878420e+308 0 1.4087842e+308 > > matplot(log2(Llam), with(bd0M, cbind(bd0 = bd0/x., yh=ebd0[["yh"]]/x., asNumeric(bd0M/x.))), + type="o", ylab = "*bd0*(x., L) / x.", pch=1:3, + main= paste("ebd0(x., Lam) and bd0(*) for x=",format(x.)," *and* larg Lam")) > abline(h=0, lty=3, col=adjustcolor("gray20", 1/2)) > axis(1, at=log2(x.), labels="log2(x.)", line=-1, tck=-1/16, col=2, col.axis=2) > legend("topright", c("bd0()", "ebd0()", "MPFR bd0()"), bty="n", lty=1:3, pch=1:3, col=1:3) > dMax <- .Machine$double.xmax > abline(h = dMax / x., col=4, lty=3) ; ux <- par("usr")[1:2] > text(c(ux %*% c(3,1))/4, dMax/x., pos=3, + sprintf("bd0(.) > DBL_MAX = %.5g", dMax), col=4) > showProc.time() Time (user system elapsed): 0.13 0.01 0.14 > > bd0.2 <- bd0ver(x., mpfrPrec = 512, delta = 0.25, keepMpfr=TRUE) ebd0(x=1e+307, M=2.50018e+306): M/x = (r=0.500036779596429) * 2^(e=-1); i=0, f=2048, fg=f*2^-(e+10)=4 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=2: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=3: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=4: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 1.63631e+307); yl+yh= 1.63631e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.36239e+306); yl+yh= 6.36239e+306 ebd0(x=1e+307, M=2.52741e+306): M/x = (r=0.505481823125825) * 2^(e=-1); i=1, f=2032, fg=f*2^-(e+10)=3.96875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=2: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=3: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=4: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 3. after ADD1(M): yl,yh = ( 0, 1.6312e+307); yl+yh= 1.6312e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.28131e+306); yl+yh= 6.28131e+306 ebd0(x=1e+307, M=2.55493e+306): M/x = (r=0.510986159291777) * 2^(e=-1); i=3, f=2001, fg=f*2^-(e+10)=3.9082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=2: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=3: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=4: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 3. after ADD1(M): yl,yh = ( 0, 1.61857e+307); yl+yh= 1.61857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.20053e+306); yl+yh= 6.20053e+306 ebd0(x=1e+307, M=2.58275e+306): M/x = (r=0.516550433748765) * 2^(e=-1); i=4, f=1986, fg=f*2^-(e+10)=3.87891 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=2: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=3: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=4: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 3. after ADD1(M): yl,yh = ( 0, 1.61383e+307); yl+yh= 1.61383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.12005e+306); yl+yh= 6.12005e+306 ebd0(x=1e+307, M=2.61088e+306): M/x = (r=0.522175299181986) * 2^(e=-1); i=6, f=1956, fg=f*2^-(e+10)=3.82031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=2: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=3: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=4: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 3. after ADD1(M): yl,yh = ( 0, 1.60142e+307); yl+yh= 1.60142e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.03987e+306); yl+yh= 6.03987e+306 ebd0(x=1e+307, M=2.63931e+306): M/x = (r=0.52786141538391) * 2^(e=-1); i=7, f=1942, fg=f*2^-(e+10)=3.79297 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=2: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=3: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=4: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 3. after ADD1(M): yl,yh = ( 0, 1.59708e+307); yl+yh= 1.59708e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.95999e+306); yl+yh= 5.95999e+306 ebd0(x=1e+307, M=2.66805e+306): M/x = (r=0.533609449331681) * 2^(e=-1); i=9, f=1913, fg=f*2^-(e+10)=3.73633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=2: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=3: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=4: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 3. after ADD1(M): yl,yh = ( 0, 1.58491e+307); yl+yh= 1.58491e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.88043e+306); yl+yh= 5.88043e+306 ebd0(x=1e+307, M=2.6971e+306): M/x = (r=0.539420075265344) * 2^(e=-1); i=10, f=1900, fg=f*2^-(e+10)=3.71094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=2: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=3: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=4: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 3. after ADD1(M): yl,yh = ( 0, 1.58099e+307); yl+yh= 1.58099e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.80118e+306); yl+yh= 5.80118e+306 ebd0(x=1e+307, M=2.72647e+306): M/x = (r=0.545293974766939) * 2^(e=-1); i=12, f=1872, fg=f*2^-(e+10)=3.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=2: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=3: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=4: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 3. after ADD1(M): yl,yh = ( 0, 1.56909e+307); yl+yh= 1.56909e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.72224e+306); yl+yh= 5.72224e+306 ebd0(x=1e+307, M=2.75616e+306): M/x = (r=0.551231836840444) * 2^(e=-1); i=13, f=1859, fg=f*2^-(e+10)=3.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=2: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=3: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=4: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 3. after ADD1(M): yl,yh = ( 0, 1.56509e+307); yl+yh= 1.56509e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.64363e+306); yl+yh= 5.64363e+306 ebd0(x=1e+307, M=2.78617e+306): M/x = (r=0.557234357992604) * 2^(e=-1); i=15, f=1833, fg=f*2^-(e+10)=3.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=2: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=3: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=4: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 3. after ADD1(M): yl,yh = ( 0, 1.55401e+307); yl+yh= 1.55401e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.56534e+306); yl+yh= 5.56534e+306 ebd0(x=1e+307, M=2.81651e+306): M/x = (r=0.563302242314621) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=4: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54992e+307); yl+yh= 1.54992e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.48737e+306); yl+yh= 5.48737e+306 ebd0(x=1e+307, M=2.84718e+306): M/x = (r=0.56943620156475) * 2^(e=-1); i=18, f=1796, fg=f*2^-(e+10)=3.50781 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=2: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=3: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=4: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 3. after ADD1(M): yl,yh = ( 0, 1.53971e+307); yl+yh= 1.53971e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.40974e+306); yl+yh= 5.40974e+306 ebd0(x=1e+307, M=2.87818e+306): M/x = (r=0.575636955251782) * 2^(e=-1); i=19, f=1783, fg=f*2^-(e+10)=3.48242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=2: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=3: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=4: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 3. after ADD1(M): yl,yh = ( 0, 1.53555e+307); yl+yh= 1.53555e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.33244e+306); yl+yh= 5.33244e+306 ebd0(x=1e+307, M=2.90953e+306): M/x = (r=0.581905230719448) * 2^(e=-1); i=21, f=1759, fg=f*2^-(e+10)=3.43555 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=2: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=3: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=4: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 3. after ADD1(M): yl,yh = ( 0, 1.52513e+307); yl+yh= 1.52513e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.25547e+306); yl+yh= 5.25547e+306 ebd0(x=1e+307, M=2.94121e+306): M/x = (r=0.588241763231733) * 2^(e=-1); i=23, f=1736, fg=f*2^-(e+10)=3.39062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=2: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=3: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=4: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 3. after ADD1(M): yl,yh = ( 0, 1.51514e+307); yl+yh= 1.51514e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.17885e+306); yl+yh= 5.17885e+306 ebd0(x=1e+307, M=2.97324e+306): M/x = (r=0.59464729605912) * 2^(e=-1); i=24, f=1725, fg=f*2^-(e+10)=3.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=2: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=3: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=4: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 3. after ADD1(M): yl,yh = ( 0, 1.51198e+307); yl+yh= 1.51198e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10258e+306); yl+yh= 5.10258e+306 ebd0(x=1e+307, M=3.00561e+306): M/x = (r=0.601122580565778) * 2^(e=-1); i=26, f=1702, fg=f*2^-(e+10)=3.32422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=2: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=3: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=4: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 3. after ADD1(M): yl,yh = ( 0, 1.5018e+307); yl+yh= 1.5018e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.02665e+306); yl+yh= 5.02665e+306 ebd0(x=1e+307, M=3.03834e+306): M/x = (r=0.607668376297695) * 2^(e=-1); i=28, f=1680, fg=f*2^-(e+10)=3.28125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=2: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=3: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=4: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 3. after ADD1(M): yl,yh = ( 0, 1.49206e+307); yl+yh= 1.49206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.95107e+306); yl+yh= 4.95107e+306 ebd0(x=1e+307, M=3.07143e+306): M/x = (r=0.614285451071773) * 2^(e=-1); i=29, f=1670, fg=f*2^-(e+10)=3.26172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=2: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=3: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=4: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 3. after ADD1(M): yl,yh = ( 0, 1.4894e+307); yl+yh= 1.4894e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.87585e+306); yl+yh= 4.87585e+306 ebd0(x=1e+307, M=3.10487e+306): M/x = (r=0.620974581065892) * 2^(e=-1); i=31, f=1649, fg=f*2^-(e+10)=3.2207 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=2: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=3: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=4: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 3. after ADD1(M): yl,yh = ( 0, 1.48009e+307); yl+yh= 1.48009e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.801e+306); yl+yh= 4.801e+306 ebd0(x=1e+307, M=3.13868e+306): M/x = (r=0.627736550909953) * 2^(e=-1); i=33, f=1628, fg=f*2^-(e+10)=3.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=2: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=3: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=4: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 3. after ADD1(M): yl,yh = ( 0, 1.47065e+307); yl+yh= 1.47065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7265e+306); yl+yh= 4.7265e+306 ebd0(x=1e+307, M=3.17286e+306): M/x = (r=0.634572153777919) * 2^(e=-1); i=34, f=1618, fg=f*2^-(e+10)=3.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=2: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=3: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=4: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 3. after ADD1(M): yl,yh = ( 0, 1.46791e+307); yl+yh= 1.46791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.65238e+306); yl+yh= 4.65238e+306 ebd0(x=1e+307, M=3.20741e+306): M/x = (r=0.641482191480851) * 2^(e=-1); i=36, f=1598, fg=f*2^-(e+10)=3.12109 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=2: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=3: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=4: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 3. after ADD1(M): yl,yh = ( 0, 1.45893e+307); yl+yh= 1.45893e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.57862e+306); yl+yh= 4.57862e+306 ebd0(x=1e+307, M=3.24234e+306): M/x = (r=0.648467474560957) * 2^(e=-1); i=38, f=1579, fg=f*2^-(e+10)=3.08398 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=2: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=3: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=4: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 3. after ADD1(M): yl,yh = ( 0, 1.45046e+307); yl+yh= 1.45046e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.50524e+306); yl+yh= 4.50524e+306 ebd0(x=1e+307, M=3.27764e+306): M/x = (r=0.655528822386676) * 2^(e=-1); i=40, f=1560, fg=f*2^-(e+10)=3.04688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=2: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=3: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=4: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 3. after ADD1(M): yl,yh = ( 0, 1.44188e+307); yl+yh= 1.44188e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43225e+306); yl+yh= 4.43225e+306 ebd0(x=1e+307, M=3.31334e+306): M/x = (r=0.662667063248778) * 2^(e=-1); i=42, f=1542, fg=f*2^-(e+10)=3.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=2: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=3: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=4: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 3. after ADD1(M): yl,yh = ( 0, 1.43385e+307); yl+yh= 1.43385e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.35963e+306); yl+yh= 4.35963e+306 ebd0(x=1e+307, M=3.34942e+306): M/x = (r=0.669883034457535) * 2^(e=-1); i=43, f=1533, fg=f*2^-(e+10)=2.99414 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=2: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=3: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=4: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 3. after ADD1(M): yl,yh = ( 0, 1.4316e+307); yl+yh= 1.4316e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.28741e+306); yl+yh= 4.28741e+306 ebd0(x=1e+307, M=3.38589e+306): M/x = (r=0.677177582440924) * 2^(e=-1); i=45, f=1515, fg=f*2^-(e+10)=2.95898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=2: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=3: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=4: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 3. after ADD1(M): yl,yh = ( 0, 1.42344e+307); yl+yh= 1.42344e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.21558e+306); yl+yh= 4.21558e+306 ebd0(x=1e+307, M=3.42276e+306): M/x = (r=0.684551562843922) * 2^(e=-1); i=47, f=1498, fg=f*2^-(e+10)=2.92578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=2: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=3: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=4: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 3. after ADD1(M): yl,yh = ( 0, 1.41584e+307); yl+yh= 1.41584e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14414e+306); yl+yh= 4.14414e+306 ebd0(x=1e+307, M=3.46003e+306): M/x = (r=0.692005840628868) * 2^(e=-1); i=49, f=1481, fg=f*2^-(e+10)=2.89258 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=2: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=3: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=4: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 3. after ADD1(M): yl,yh = ( 0, 1.40815e+307); yl+yh= 1.40815e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.07311e+306); yl+yh= 4.07311e+306 ebd0(x=1e+307, M=3.49771e+306): M/x = (r=0.699541290176923) * 2^(e=-1); i=51, f=1464, fg=f*2^-(e+10)=2.85938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=2: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=3: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=4: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 3. after ADD1(M): yl,yh = ( 0, 1.40037e+307); yl+yh= 1.40037e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.00248e+306); yl+yh= 4.00248e+306 ebd0(x=1e+307, M=3.53579e+306): M/x = (r=0.707158795390635) * 2^(e=-1); i=53, f=1448, fg=f*2^-(e+10)=2.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=2: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=3: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=4: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 3. after ADD1(M): yl,yh = ( 0, 1.39319e+307); yl+yh= 1.39319e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.93227e+306); yl+yh= 3.93227e+306 ebd0(x=1e+307, M=3.5743e+306): M/x = (r=0.71485924979762) * 2^(e=-1); i=55, f=1432, fg=f*2^-(e+10)=2.79688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=2: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=3: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=4: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 3. after ADD1(M): yl,yh = ( 0, 1.38593e+307); yl+yh= 1.38593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.86246e+306); yl+yh= 3.86246e+306 ebd0(x=1e+307, M=3.61322e+306): M/x = (r=0.72264355665537) * 2^(e=-1); i=57, f=1417, fg=f*2^-(e+10)=2.76758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=2: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=3: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=4: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 3. after ADD1(M): yl,yh = ( 0, 1.37929e+307); yl+yh= 1.37929e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.79308e+306); yl+yh= 3.79308e+306 ebd0(x=1e+307, M=3.65256e+306): M/x = (r=0.730512629057209) * 2^(e=-1); i=59, f=1402, fg=f*2^-(e+10)=2.73828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=2: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=3: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=4: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 3. after ADD1(M): yl,yh = ( 0, 1.37259e+307); yl+yh= 1.37259e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.72412e+306); yl+yh= 3.72412e+306 ebd0(x=1e+307, M=3.69234e+306): M/x = (r=0.738467390039392) * 2^(e=-1); i=61, f=1387, fg=f*2^-(e+10)=2.70898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=2: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=3: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=4: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 3. after ADD1(M): yl,yh = ( 0, 1.36581e+307); yl+yh= 1.36581e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.65559e+306); yl+yh= 3.65559e+306 ebd0(x=1e+307, M=3.73254e+306): M/x = (r=0.746508772689384) * 2^(e=-1); i=63, f=1372, fg=f*2^-(e+10)=2.67969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=2: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=3: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=4: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 3. after ADD1(M): yl,yh = ( 0, 1.35895e+307); yl+yh= 1.35895e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.58749e+306); yl+yh= 3.58749e+306 ebd0(x=1e+307, M=3.77319e+306): M/x = (r=0.754637720255303) * 2^(e=-1); i=65, f=1358, fg=f*2^-(e+10)=2.65234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=2: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=3: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=4: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 3. after ADD1(M): yl,yh = ( 0, 1.35276e+307); yl+yh= 1.35276e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.51984e+306); yl+yh= 3.51984e+306 ebd0(x=1e+307, M=3.81428e+306): M/x = (r=0.762855186256566) * 2^(e=-1); i=67, f=1344, fg=f*2^-(e+10)=2.625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=2: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=3: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=4: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 3. after ADD1(M): yl,yh = ( 0, 1.34651e+307); yl+yh= 1.34651e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.45262e+306); yl+yh= 3.45262e+306 ebd0(x=1e+307, M=3.85581e+306): M/x = (r=0.771162134595737) * 2^(e=-1); i=69, f=1331, fg=f*2^-(e+10)=2.59961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=2: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=3: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=4: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 3. after ADD1(M): yl,yh = ( 0, 1.34095e+307); yl+yh= 1.34095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.38585e+306); yl+yh= 3.38585e+306 ebd0(x=1e+307, M=3.8978e+306): M/x = (r=0.77955953967159) * 2^(e=-1); i=72, f=1311, fg=f*2^-(e+10)=2.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=2: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=3: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=4: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 3. after ADD1(M): yl,yh = ( 0, 1.33e+307); yl+yh= 1.33e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.31953e+306); yl+yh= 3.31953e+306 ebd0(x=1e+307, M=3.94024e+306): M/x = (r=0.788048386493405) * 2^(e=-1); i=74, f=1298, fg=f*2^-(e+10)=2.53516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=2: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=3: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=4: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 3. after ADD1(M): yl,yh = ( 0, 1.32428e+307); yl+yh= 1.32428e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.25367e+306); yl+yh= 3.25367e+306 ebd0(x=1e+307, M=3.98315e+306): M/x = (r=0.796629670796513) * 2^(e=-1); i=76, f=1285, fg=f*2^-(e+10)=2.50977 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=2: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=3: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=4: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 3. after ADD1(M): yl,yh = ( 0, 1.3185e+307); yl+yh= 1.3185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.18827e+306); yl+yh= 3.18827e+306 ebd0(x=1e+307, M=4.02652e+306): M/x = (r=0.805304399159088) * 2^(e=-1); i=78, f=1273, fg=f*2^-(e+10)=2.48633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=2: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=3: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=4: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 3. after ADD1(M): yl,yh = ( 0, 1.31346e+307); yl+yh= 1.31346e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.12334e+306); yl+yh= 3.12334e+306 ebd0(x=1e+307, M=4.07037e+306): M/x = (r=0.814073589120224) * 2^(e=-1); i=80, f=1260, fg=f*2^-(e+10)=2.46094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=2: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=3: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=4: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 3. after ADD1(M): yl,yh = ( 0, 1.30758e+307); yl+yh= 1.30758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05888e+306); yl+yh= 3.05888e+306 ebd0(x=1e+307, M=4.11469e+306): M/x = (r=0.822938269299289) * 2^(e=-1); i=83, f=1242, fg=f*2^-(e+10)=2.42578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=2: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=3: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=4: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 3. after ADD1(M): yl,yh = ( 0, 1.29762e+307); yl+yh= 1.29762e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.9949e+306); yl+yh= 2.9949e+306 ebd0(x=1e+307, M=4.1595e+306): M/x = (r=0.83189947951658) * 2^(e=-1); i=85, f=1231, fg=f*2^-(e+10)=2.4043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, 8.77257e+306); yl+yh= 8.77257e+306 j=2: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=3: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=4: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 3. after ADD1(M): yl,yh = ( 0, 1.29321e+307); yl+yh= 1.29321e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.93141e+306); yl+yh= 2.93141e+306 ebd0(x=1e+307, M=4.20479e+306): M/x = (r=0.840958270915297) * 2^(e=-1); i=87, f=1219, fg=f*2^-(e+10)=2.38086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=2: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=3: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=4: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 3. after ADD1(M): yl,yh = ( 0, 1.28794e+307); yl+yh= 1.28794e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.8684e+306); yl+yh= 2.8684e+306 ebd0(x=1e+307, M=4.25058e+306): M/x = (r=0.850115706084837) * 2^(e=-1); i=90, f=1202, fg=f*2^-(e+10)=2.34766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=2: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=3: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=4: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 3. after ADD1(M): yl,yh = ( 0, 1.27848e+307); yl+yh= 1.27848e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.80588e+306); yl+yh= 2.80588e+306 ebd0(x=1e+307, M=4.29686e+306): M/x = (r=0.859372859185438) * 2^(e=-1); i=92, f=1192, fg=f*2^-(e+10)=2.32812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=2: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=3: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=4: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 3. after ADD1(M): yl,yh = ( 0, 1.27475e+307); yl+yh= 1.27475e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.74386e+306); yl+yh= 2.74386e+306 ebd0(x=1e+307, M=4.34365e+306): M/x = (r=0.868730816074176) * 2^(e=-1); i=94, f=1181, fg=f*2^-(e+10)=2.30664 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=2: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=3: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=4: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 3. after ADD1(M): yl,yh = ( 0, 1.27016e+307); yl+yh= 1.27016e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.68235e+306); yl+yh= 2.68235e+306 ebd0(x=1e+307, M=4.39095e+306): M/x = (r=0.878190674432335) * 2^(e=-1); i=97, f=1165, fg=f*2^-(e+10)=2.27539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=2: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=3: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=4: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 3. after ADD1(M): yl,yh = ( 0, 1.26125e+307); yl+yh= 1.26125e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62134e+306); yl+yh= 2.62134e+306 ebd0(x=1e+307, M=4.43877e+306): M/x = (r=0.887753543894164) * 2^(e=-1); i=99, f=1155, fg=f*2^-(e+10)=2.25586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=2: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=3: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=4: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 3. after ADD1(M): yl,yh = ( 0, 1.25741e+307); yl+yh= 1.25741e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.56085e+306); yl+yh= 2.56085e+306 ebd0(x=1e+307, M=4.4871e+306): M/x = (r=0.897420546177039) * 2^(e=-1); i=102, f=1140, fg=f*2^-(e+10)=2.22656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=2: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=3: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=4: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 3. after ADD1(M): yl,yh = ( 0, 1.24917e+307); yl+yh= 1.24917e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.50088e+306); yl+yh= 2.50088e+306 ebd0(x=1e+307, M=4.53596e+306): M/x = (r=0.907192815213034) * 2^(e=-1); i=104, f=1130, fg=f*2^-(e+10)=2.20703 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=2: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=3: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=4: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 3. after ADD1(M): yl,yh = ( 0, 1.24525e+307); yl+yh= 1.24525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.44144e+306); yl+yh= 2.44144e+306 ebd0(x=1e+307, M=4.58536e+306): M/x = (r=0.917071497281936) * 2^(e=-1); i=107, f=1116, fg=f*2^-(e+10)=2.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=2: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=3: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=4: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 3. after ADD1(M): yl,yh = ( 0, 1.23772e+307); yl+yh= 1.23772e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38253e+306); yl+yh= 2.38253e+306 ebd0(x=1e+307, M=4.63529e+306): M/x = (r=0.9270577511457) * 2^(e=-1); i=109, f=1106, fg=f*2^-(e+10)=2.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=2: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=3: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=4: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 3. after ADD1(M): yl,yh = ( 0, 1.23371e+307); yl+yh= 1.23371e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.32415e+306); yl+yh= 2.32415e+306 ebd0(x=1e+307, M=4.68576e+306): M/x = (r=0.937152748184372) * 2^(e=-1); i=112, f=1092, fg=f*2^-(e+10)=2.13281 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=2: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=3: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=4: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 3. after ADD1(M): yl,yh = ( 0, 1.22602e+307); yl+yh= 1.22602e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.26633e+306); yl+yh= 2.26633e+306 ebd0(x=1e+307, M=4.73679e+306): M/x = (r=0.947357672533489) * 2^(e=-1); i=115, f=1079, fg=f*2^-(e+10)=2.10742 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=2: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=3: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=4: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 3. after ADD1(M): yl,yh = ( 0, 1.21915e+307); yl+yh= 1.21915e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.20905e+306); yl+yh= 2.20905e+306 ebd0(x=1e+307, M=4.78837e+306): M/x = (r=0.957673721222979) * 2^(e=-1); i=117, f=1070, fg=f*2^-(e+10)=2.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=2: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=3: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=4: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 3. after ADD1(M): yl,yh = ( 0, 1.21593e+307); yl+yh= 1.21593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.15232e+306); yl+yh= 2.15232e+306 ebd0(x=1e+307, M=4.84051e+306): M/x = (r=0.968102104317573) * 2^(e=-1); i=120, f=1057, fg=f*2^-(e+10)=2.06445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=2: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=3: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=4: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 3. after ADD1(M): yl,yh = ( 0, 1.20892e+307); yl+yh= 1.20892e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09616e+306); yl+yh= 2.09616e+306 ebd0(x=1e+307, M=4.89322e+306): M/x = (r=0.97864404505874) * 2^(e=-1); i=123, f=1044, fg=f*2^-(e+10)=2.03906 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=2: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=3: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=4: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 3. after ADD1(M): yl,yh = ( 0, 1.20181e+307); yl+yh= 1.20181e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.04056e+306); yl+yh= 2.04056e+306 ebd0(x=1e+307, M=4.9465e+306): M/x = (r=0.989300780008178) * 2^(e=-1); i=125, f=1036, fg=f*2^-(e+10)=2.02344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=2: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=3: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=4: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 3. after ADD1(M): yl,yh = ( 0, 1.19945e+307); yl+yh= 1.19945e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.98554e+306); yl+yh= 1.98554e+306 ebd0(x=1e+307, M=5.00037e+306): M/x = (r=0.500036779596429) * 2^(e=0); i=0, f=2048, fg=f*2^-(e+10)=2 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=2: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=3: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=4: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.19318e+307); yl+yh= 1.19318e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.9311e+306); yl+yh= 1.9311e+306 ebd0(x=1e+307, M=5.05482e+306): M/x = (r=0.505481823125825) * 2^(e=0); i=1, f=2032, fg=f*2^-(e+10)=1.98438 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=2: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=3: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=4: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 3. after ADD1(M): yl,yh = ( 0, 1.19079e+307); yl+yh= 1.19079e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.87725e+306); yl+yh= 1.87725e+306 ebd0(x=1e+307, M=5.10986e+306): M/x = (r=0.510986159291777) * 2^(e=0); i=3, f=2001, fg=f*2^-(e+10)=1.9541 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=2: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=3: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=4: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 3. after ADD1(M): yl,yh = ( 0, 1.18092e+307); yl+yh= 1.18092e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.82399e+306); yl+yh= 1.82399e+306 ebd0(x=1e+307, M=5.1655e+306): M/x = (r=0.516550433748765) * 2^(e=0); i=4, f=1986, fg=f*2^-(e+10)=1.93945 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=2: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=3: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=4: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 3. after ADD1(M): yl,yh = ( 0, 1.17896e+307); yl+yh= 1.17896e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77133e+306); yl+yh= 1.77133e+306 ebd0(x=1e+307, M=5.22175e+306): M/x = (r=0.522175299181986) * 2^(e=0); i=6, f=1956, fg=f*2^-(e+10)=1.91016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=2: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=3: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=4: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 3. after ADD1(M): yl,yh = ( 0, 1.16936e+307); yl+yh= 1.16936e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.71927e+306); yl+yh= 1.71927e+306 ebd0(x=1e+307, M=5.27861e+306): M/x = (r=0.52786141538391) * 2^(e=0); i=7, f=1942, fg=f*2^-(e+10)=1.89648 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=2: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=3: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=4: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 3. after ADD1(M): yl,yh = ( 0, 1.16786e+307); yl+yh= 1.16786e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.66783e+306); yl+yh= 1.66783e+306 ebd0(x=1e+307, M=5.33609e+306): M/x = (r=0.533609449331681) * 2^(e=0); i=9, f=1913, fg=f*2^-(e+10)=1.86816 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=2: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=3: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=4: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 3. after ADD1(M): yl,yh = ( 0, 1.15857e+307); yl+yh= 1.15857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61701e+306); yl+yh= 1.61701e+306 ebd0(x=1e+307, M=5.3942e+306): M/x = (r=0.539420075265344) * 2^(e=0); i=10, f=1900, fg=f*2^-(e+10)=1.85547 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=2: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=3: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=4: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 3. after ADD1(M): yl,yh = ( 0, 1.15756e+307); yl+yh= 1.15756e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.56681e+306); yl+yh= 1.56681e+306 ebd0(x=1e+307, M=5.45294e+306): M/x = (r=0.545293974766939) * 2^(e=0); i=12, f=1872, fg=f*2^-(e+10)=1.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=2: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=3: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=4: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 3. after ADD1(M): yl,yh = ( 0, 1.14859e+307); yl+yh= 1.14859e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51724e+306); yl+yh= 1.51724e+306 ebd0(x=1e+307, M=5.51232e+306): M/x = (r=0.551231836840444) * 2^(e=0); i=13, f=1859, fg=f*2^-(e+10)=1.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=2: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=3: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=4: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 3. after ADD1(M): yl,yh = ( 0, 1.14755e+307); yl+yh= 1.14755e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.46832e+306); yl+yh= 1.46832e+306 ebd0(x=1e+307, M=5.57234e+306): M/x = (r=0.557234357992604) * 2^(e=0); i=15, f=1833, fg=f*2^-(e+10)=1.79004 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=2: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=3: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=4: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 3. after ADD1(M): yl,yh = ( 0, 1.13948e+307); yl+yh= 1.13948e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42004e+306); yl+yh= 1.42004e+306 ebd0(x=1e+307, M=5.63302e+306): M/x = (r=0.563302242314621) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=4: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.13842e+307); yl+yh= 1.13842e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.37241e+306); yl+yh= 1.37241e+306 ebd0(x=1e+307, M=5.69436e+306): M/x = (r=0.56943620156475) * 2^(e=0); i=18, f=1796, fg=f*2^-(e+10)=1.75391 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=2: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=3: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=4: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 3. after ADD1(M): yl,yh = ( 0, 1.13128e+307); yl+yh= 1.13128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.32545e+306); yl+yh= 1.32545e+306 ebd0(x=1e+307, M=5.75637e+306): M/x = (r=0.575636955251782) * 2^(e=0); i=19, f=1783, fg=f*2^-(e+10)=1.74121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=2: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=3: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=4: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 3. after ADD1(M): yl,yh = ( 0, 1.13022e+307); yl+yh= 1.13022e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27915e+306); yl+yh= 1.27915e+306 ebd0(x=1e+307, M=5.81905e+306): M/x = (r=0.581905230719448) * 2^(e=0); i=21, f=1759, fg=f*2^-(e+10)=1.71777 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=2: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=3: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=4: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 3. after ADD1(M): yl,yh = ( 0, 1.12293e+307); yl+yh= 1.12293e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.23353e+306); yl+yh= 1.23353e+306 ebd0(x=1e+307, M=5.88242e+306): M/x = (r=0.588241763231733) * 2^(e=0); i=23, f=1736, fg=f*2^-(e+10)=1.69531 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=2: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=3: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=4: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 3. after ADD1(M): yl,yh = ( 0, 1.11611e+307); yl+yh= 1.11611e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.18859e+306); yl+yh= 1.18859e+306 ebd0(x=1e+307, M=5.94647e+306): M/x = (r=0.59464729605912) * 2^(e=0); i=24, f=1725, fg=f*2^-(e+10)=1.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=2: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=3: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=4: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 3. after ADD1(M): yl,yh = ( 0, 1.11616e+307); yl+yh= 1.11616e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14434e+306); yl+yh= 1.14434e+306 ebd0(x=1e+307, M=6.01123e+306): M/x = (r=0.601122580565778) * 2^(e=0); i=26, f=1702, fg=f*2^-(e+10)=1.66211 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=2: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=3: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=4: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 3. after ADD1(M): yl,yh = ( 0, 1.10921e+307); yl+yh= 1.10921e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10079e+306); yl+yh= 1.10079e+306 ebd0(x=1e+307, M=6.07668e+306): M/x = (r=0.607668376297695) * 2^(e=0); i=28, f=1680, fg=f*2^-(e+10)=1.64062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=2: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=3: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=4: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 3. after ADD1(M): yl,yh = ( 0, 1.10275e+307); yl+yh= 1.10275e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05794e+306); yl+yh= 1.05794e+306 ebd0(x=1e+307, M=6.14285e+306): M/x = (r=0.614285451071773) * 2^(e=0); i=29, f=1670, fg=f*2^-(e+10)=1.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=2: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=3: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=4: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 3. after ADD1(M): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.01581e+306); yl+yh= 1.01581e+306 ebd0(x=1e+307, M=6.20975e+306): M/x = (r=0.620974581065892) * 2^(e=0); i=31, f=1649, fg=f*2^-(e+10)=1.61035 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=2: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=3: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=4: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 3. after ADD1(M): yl,yh = ( 0, 1.09743e+307); yl+yh= 1.09743e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.74397e+305); yl+yh= 9.74397e+305 ebd0(x=1e+307, M=6.27737e+306): M/x = (r=0.627736550909953) * 2^(e=0); i=33, f=1628, fg=f*2^-(e+10)=1.58984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=2: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=3: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=4: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 3. after ADD1(M): yl,yh = ( 0, 1.09137e+307); yl+yh= 1.09137e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.33713e+305); yl+yh= 9.33713e+305 ebd0(x=1e+307, M=6.34572e+306): M/x = (r=0.634572153777919) * 2^(e=0); i=34, f=1618, fg=f*2^-(e+10)=1.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=2: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=3: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=4: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 3. after ADD1(M): yl,yh = ( 0, 1.09205e+307); yl+yh= 1.09205e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.93764e+305); yl+yh= 8.93764e+305 ebd0(x=1e+307, M=6.41482e+306): M/x = (r=0.641482191480851) * 2^(e=0); i=36, f=1598, fg=f*2^-(e+10)=1.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=2: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=3: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=4: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 3. after ADD1(M): yl,yh = ( 0, 1.08652e+307); yl+yh= 1.08652e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.5456e+305); yl+yh= 8.5456e+305 ebd0(x=1e+307, M=6.48467e+306): M/x = (r=0.648467474560957) * 2^(e=0); i=38, f=1579, fg=f*2^-(e+10)=1.54199 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=2: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=3: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=4: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 3. after ADD1(M): yl,yh = ( 0, 1.08154e+307); yl+yh= 1.08154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.16109e+305); yl+yh= 8.16109e+305 ebd0(x=1e+307, M=6.55529e+306): M/x = (r=0.655528822386676) * 2^(e=0); i=40, f=1560, fg=f*2^-(e+10)=1.52344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=2: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=3: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=4: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 3. after ADD1(M): yl,yh = ( 0, 1.0765e+307); yl+yh= 1.0765e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.78418e+305); yl+yh= 7.78418e+305 ebd0(x=1e+307, M=6.62667e+306): M/x = (r=0.662667063248778) * 2^(e=0); i=42, f=1542, fg=f*2^-(e+10)=1.50586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=2: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=3: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=4: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 3. after ADD1(M): yl,yh = ( 0, 1.07203e+307); yl+yh= 1.07203e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.41496e+305); yl+yh= 7.41496e+305 ebd0(x=1e+307, M=6.69883e+306): M/x = (r=0.669883034457535) * 2^(e=0); i=43, f=1533, fg=f*2^-(e+10)=1.49707 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=2: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=3: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=4: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 3. after ADD1(M): yl,yh = ( 0, 1.0734e+307); yl+yh= 1.0734e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05352e+305); yl+yh= 7.05352e+305 ebd0(x=1e+307, M=6.77178e+306): M/x = (r=0.677177582440924) * 2^(e=0); i=45, f=1515, fg=f*2^-(e+10)=1.47949 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=2: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=3: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=4: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 3. after ADD1(M): yl,yh = ( 0, 1.06888e+307); yl+yh= 1.06888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.69993e+305); yl+yh= 6.69993e+305 ebd0(x=1e+307, M=6.84552e+306): M/x = (r=0.684551562843922) * 2^(e=0); i=47, f=1498, fg=f*2^-(e+10)=1.46289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=2: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=3: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=4: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 3. after ADD1(M): yl,yh = ( 0, 1.06497e+307); yl+yh= 1.06497e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.35429e+305); yl+yh= 6.35429e+305 ebd0(x=1e+307, M=6.92006e+306): M/x = (r=0.692005840628868) * 2^(e=0); i=49, f=1481, fg=f*2^-(e+10)=1.44629 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=2: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=3: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=4: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 3. after ADD1(M): yl,yh = ( 0, 1.06101e+307); yl+yh= 1.06101e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.01667e+305); yl+yh= 6.01667e+305 ebd0(x=1e+307, M=6.99541e+306): M/x = (r=0.699541290176923) * 2^(e=0); i=51, f=1464, fg=f*2^-(e+10)=1.42969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=2: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=3: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=4: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 3. after ADD1(M): yl,yh = ( 0, 1.057e+307); yl+yh= 1.057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.68717e+305); yl+yh= 5.68717e+305 ebd0(x=1e+307, M=7.07159e+306): M/x = (r=0.707158795390635) * 2^(e=0); i=53, f=1448, fg=f*2^-(e+10)=1.41406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=2: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=3: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=4: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 3. after ADD1(M): yl,yh = ( 0, 1.05363e+307); yl+yh= 1.05363e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36588e+305); yl+yh= 5.36588e+305 ebd0(x=1e+307, M=7.14859e+306): M/x = (r=0.71485924979762) * 2^(e=0); i=55, f=1432, fg=f*2^-(e+10)=1.39844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=2: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=3: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=4: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 3. after ADD1(M): yl,yh = ( 0, 1.05021e+307); yl+yh= 1.05021e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.05289e+305); yl+yh= 5.05289e+305 ebd0(x=1e+307, M=7.22644e+306): M/x = (r=0.72264355665537) * 2^(e=0); i=57, f=1417, fg=f*2^-(e+10)=1.38379 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=2: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=3: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=4: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 3. after ADD1(M): yl,yh = ( 0, 1.04747e+307); yl+yh= 1.04747e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.74827e+305); yl+yh= 4.74827e+305 ebd0(x=1e+307, M=7.30513e+306): M/x = (r=0.730512629057209) * 2^(e=0); i=59, f=1402, fg=f*2^-(e+10)=1.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=2: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=3: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=4: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 3. after ADD1(M): yl,yh = ( 0, 1.0447e+307); yl+yh= 1.0447e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.45214e+305); yl+yh= 4.45214e+305 ebd0(x=1e+307, M=7.38467e+306): M/x = (r=0.738467390039392) * 2^(e=0); i=61, f=1387, fg=f*2^-(e+10)=1.35449 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=2: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=3: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=4: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 3. after ADD1(M): yl,yh = ( 0, 1.04189e+307); yl+yh= 1.04189e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.16457e+305); yl+yh= 4.16457e+305 ebd0(x=1e+307, M=7.46509e+306): M/x = (r=0.746508772689384) * 2^(e=0); i=63, f=1372, fg=f*2^-(e+10)=1.33984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=2: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=3: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=4: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 3. after ADD1(M): yl,yh = ( 0, 1.03906e+307); yl+yh= 1.03906e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88567e+305); yl+yh= 3.88567e+305 ebd0(x=1e+307, M=7.54638e+306): M/x = (r=0.754637720255303) * 2^(e=0); i=65, f=1358, fg=f*2^-(e+10)=1.32617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=2: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=3: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=4: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 3. after ADD1(M): yl,yh = ( 0, 1.03693e+307); yl+yh= 1.03693e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.61552e+305); yl+yh= 3.61552e+305 ebd0(x=1e+307, M=7.62855e+306): M/x = (r=0.762855186256566) * 2^(e=0); i=67, f=1344, fg=f*2^-(e+10)=1.3125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, 2.71935e+306); yl+yh= 2.71935e+306 j=2: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=3: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=4: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 3. after ADD1(M): yl,yh = ( 0, 1.03479e+307); yl+yh= 1.03479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.35422e+305); yl+yh= 3.35422e+305 ebd0(x=1e+307, M=7.71162e+306): M/x = (r=0.771162134595737) * 2^(e=0); i=69, f=1331, fg=f*2^-(e+10)=1.2998 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=2: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=3: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=4: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 3. after ADD1(M): yl,yh = ( 0, 1.03338e+307); yl+yh= 1.03338e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.10188e+305); yl+yh= 3.10188e+305 ebd0(x=1e+307, M=7.7956e+306): M/x = (r=0.77955953967159) * 2^(e=0); i=72, f=1311, fg=f*2^-(e+10)=1.28027 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=2: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=3: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=4: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 3. after ADD1(M): yl,yh = ( 0, 1.02664e+307); yl+yh= 1.02664e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85858e+305); yl+yh= 2.85858e+305 ebd0(x=1e+307, M=7.88048e+306): M/x = (r=0.788048386493405) * 2^(e=0); i=74, f=1298, fg=f*2^-(e+10)=1.26758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=2: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=3: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=4: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 3. after ADD1(M): yl,yh = ( 0, 1.02516e+307); yl+yh= 1.02516e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62442e+305); yl+yh= 2.62442e+305 ebd0(x=1e+307, M=7.9663e+306): M/x = (r=0.796629670796513) * 2^(e=0); i=76, f=1285, fg=f*2^-(e+10)=1.25488 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=2: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=3: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=4: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 3. after ADD1(M): yl,yh = ( 0, 1.02367e+307); yl+yh= 1.02367e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.3995e+305); yl+yh= 2.3995e+305 ebd0(x=1e+307, M=8.05304e+306): M/x = (r=0.805304399159088) * 2^(e=0); i=78, f=1273, fg=f*2^-(e+10)=1.24316 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=2: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=3: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=4: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 3. after ADD1(M): yl,yh = ( 0, 1.02296e+307); yl+yh= 1.02296e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18393e+305); yl+yh= 2.18393e+305 ebd0(x=1e+307, M=8.14074e+306): M/x = (r=0.814073589120224) * 2^(e=0); i=80, f=1260, fg=f*2^-(e+10)=1.23047 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=2: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=3: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=4: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 3. after ADD1(M): yl,yh = ( 0, 1.02147e+307); yl+yh= 1.02147e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.97781e+305); yl+yh= 1.97781e+305 ebd0(x=1e+307, M=8.22938e+306): M/x = (r=0.822938269299289) * 2^(e=0); i=83, f=1242, fg=f*2^-(e+10)=1.21289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=2: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=3: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=4: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 3. after ADD1(M): yl,yh = ( 0, 1.01595e+307); yl+yh= 1.01595e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.78124e+305); yl+yh= 1.78124e+305 ebd0(x=1e+307, M=8.31899e+306): M/x = (r=0.83189947951658) * 2^(e=0); i=85, f=1231, fg=f*2^-(e+10)=1.20215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=2: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=3: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=4: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 3. after ADD1(M): yl,yh = ( 0, 1.01601e+307); yl+yh= 1.01601e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59431e+305); yl+yh= 1.59431e+305 ebd0(x=1e+307, M=8.40958e+306): M/x = (r=0.840958270915297) * 2^(e=0); i=87, f=1219, fg=f*2^-(e+10)=1.19043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=2: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=3: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=4: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 3. after ADD1(M): yl,yh = ( 0, 1.01527e+307); yl+yh= 1.01527e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41715e+305); yl+yh= 1.41715e+305 ebd0(x=1e+307, M=8.50116e+306): M/x = (r=0.850115706084837) * 2^(e=0); i=90, f=1202, fg=f*2^-(e+10)=1.17383 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=2: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=3: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=4: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 3. after ADD1(M): yl,yh = ( 0, 1.01039e+307); yl+yh= 1.01039e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.24985e+305); yl+yh= 1.24985e+305 ebd0(x=1e+307, M=8.59373e+306): M/x = (r=0.859372859185438) * 2^(e=0); i=92, f=1192, fg=f*2^-(e+10)=1.16406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=2: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=3: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=4: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 3. after ADD1(M): yl,yh = ( 0, 1.01129e+307); yl+yh= 1.01129e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09252e+305); yl+yh= 1.09252e+305 ebd0(x=1e+307, M=8.68731e+306): M/x = (r=0.868730816074176) * 2^(e=0); i=94, f=1181, fg=f*2^-(e+10)=1.15332 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=2: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=3: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=4: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 3. after ADD1(M): yl,yh = ( 0, 1.01138e+307); yl+yh= 1.01138e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.45278e+304); yl+yh= 9.45278e+304 ebd0(x=1e+307, M=8.78191e+306): M/x = (r=0.878190674432335) * 2^(e=0); i=97, f=1165, fg=f*2^-(e+10)=1.1377 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=2: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=3: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=4: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 3. after ADD1(M): yl,yh = ( 0, 1.0072e+307); yl+yh= 1.0072e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08221e+304); yl+yh= 8.08221e+304 ebd0(x=1e+307, M=8.87754e+306): M/x = (r=0.887753543894164) * 2^(e=0); i=99, f=1155, fg=f*2^-(e+10)=1.12793 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=2: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=3: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=4: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 3. after ADD1(M): yl,yh = ( 0, 1.00814e+307); yl+yh= 1.00814e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.81466e+304); yl+yh= 6.81466e+304 ebd0(x=1e+307, M=8.97421e+306): M/x = (r=0.897420546177039) * 2^(e=0); i=102, f=1140, fg=f*2^-(e+10)=1.11328 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=2: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=3: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=4: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 3. after ADD1(M): yl,yh = ( 0, 1.00473e+307); yl+yh= 1.00473e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.65124e+304); yl+yh= 5.65124e+304 ebd0(x=1e+307, M=9.07193e+306): M/x = (r=0.907192815213034) * 2^(e=0); i=104, f=1130, fg=f*2^-(e+10)=1.10352 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=2: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=3: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=4: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 3. after ADD1(M): yl,yh = ( 0, 1.00569e+307); yl+yh= 1.00569e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.59308e+304); yl+yh= 4.59308e+304 ebd0(x=1e+307, M=9.17071e+306): M/x = (r=0.917071497281936) * 2^(e=0); i=107, f=1116, fg=f*2^-(e+10)=1.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=2: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=3: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=4: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 3. after ADD1(M): yl,yh = ( 0, 1.00311e+307); yl+yh= 1.00311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64134e+304); yl+yh= 3.64134e+304 ebd0(x=1e+307, M=9.27058e+306): M/x = (r=0.9270577511457) * 2^(e=0); i=109, f=1106, fg=f*2^-(e+10)=1.08008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=2: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=3: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=4: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 3. after ADD1(M): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79717e+304); yl+yh= 2.79717e+304 ebd0(x=1e+307, M=9.37153e+306): M/x = (r=0.937152748184372) * 2^(e=0); i=112, f=1092, fg=f*2^-(e+10)=1.06641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=2: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=3: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=4: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 3. after ADD1(M): yl,yh = ( 0, 1.00145e+307); yl+yh= 1.00145e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.06174e+304); yl+yh= 2.06174e+304 ebd0(x=1e+307, M=9.47358e+306): M/x = (r=0.947357672533489) * 2^(e=0); i=115, f=1079, fg=f*2^-(e+10)=1.05371 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=2: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=3: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=4: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 3. after ADD1(M): yl,yh = ( 0, 9.99677e+306); yl+yh= 9.99677e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 1.43624e+304); yl+yh= 1.43624e+304 ebd0(x=1e+307, M=9.57674e+306): M/x = (r=0.957673721222979) * 2^(e=0); i=117, f=1070, fg=f*2^-(e+10)=1.04492 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=2: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=3: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=4: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 3. after ADD1(M): yl,yh = ( 0, 1.00162e+307); yl+yh= 1.00162e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.21864e+303); yl+yh= 9.21864e+303 ebd0(x=1e+307, M=9.68102e+306): M/x = (r=0.968102104317573) * 2^(e=0); i=120, f=1057, fg=f*2^-(e+10)=1.03223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=2: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=3: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=4: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 3. after ADD1(M): yl,yh = ( 0, 9.99821e+306); yl+yh= 9.99821e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 5.19822e+303); yl+yh= 5.19822e+303 ebd0(x=1e+307, M=9.78644e+306): M/x = (r=0.97864404505874) * 2^(e=0); i=123, f=1044, fg=f*2^-(e+10)=1.01953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=2: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=3: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=4: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 3. after ADD1(M): yl,yh = ( 0, 9.9799e+306); yl+yh= 9.9799e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.31338e+303); yl+yh= 2.31338e+303 ebd0(x=1e+307, M=9.89301e+306): M/x = (r=0.989300780008178) * 2^(e=0); i=125, f=1036, fg=f*2^-(e+10)=1.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=2: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=3: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=4: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 3. after ADD1(M): yl,yh = ( 0, 1.00095e+307); yl+yh= 1.00095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.76482e+302); yl+yh= 5.76482e+302 ebd0(x=1e+307, M=1.00007e+307): M/x = (r=0.500036779596429) * 2^(e=1); i=0, f=2048, fg=f*2^-(e+10)=1 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 ___ fg = 1 ___ skipping further steps ebd0(x=1e+307, M=1.01096e+307): M/x = (r=0.505481823125825) * 2^(e=1); i=1, f=2032, fg=f*2^-(e+10)=0.992188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, -7.83845e+304); yl+yh= -7.83845e+304 j=2: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=3: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=4: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 3. after ADD1(M): yl,yh = ( 0, 1.00313e+307); yl+yh= 1.00313e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.96651e+302); yl+yh= 5.96651e+302 ebd0(x=1e+307, M=1.02197e+307): M/x = (r=0.510986159291777) * 2^(e=1); i=3, f=2001, fg=f*2^-(e+10)=0.977051 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, -2.32155e+305); yl+yh= -2.32155e+305 j=2: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=3: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=4: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 3. after ADD1(M): yl,yh = ( 0, 9.98757e+306); yl+yh= 9.98757e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.37913e+303); yl+yh= 2.37913e+303 ebd0(x=1e+307, M=1.0331e+307): M/x = (r=0.516550433748765) * 2^(e=1); i=4, f=1986, fg=f*2^-(e+10)=0.969727 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, -3.07394e+305); yl+yh= -3.07394e+305 j=2: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=3: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=4: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 3. after ADD1(M): yl,yh = ( 0, 1.00236e+307); yl+yh= 1.00236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36037e+303); yl+yh= 5.36037e+303 ebd0(x=1e+307, M=1.04435e+307): M/x = (r=0.522175299181986) * 2^(e=1); i=6, f=1956, fg=f*2^-(e+10)=0.955078 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=2: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=3: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=4: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 3. after ADD1(M): yl,yh = ( 0, 9.98392e+306); yl+yh= 9.98392e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 9.55343e+303); yl+yh= 9.55343e+303 ebd0(x=1e+307, M=1.05572e+307): M/x = (r=0.52786141538391) * 2^(e=1); i=7, f=1942, fg=f*2^-(e+10)=0.948242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, -5.31447e+305); yl+yh= -5.31447e+305 j=2: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=3: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=4: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 3. after ADD1(M): yl,yh = ( 0, 1.00258e+307); yl+yh= 1.00258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.49715e+304); yl+yh= 1.49715e+304 ebd0(x=1e+307, M=1.06722e+307): M/x = (r=0.533609449331681) * 2^(e=1); i=9, f=1913, fg=f*2^-(e+10)=0.934082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=2: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=3: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=4: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 3. after ADD1(M): yl,yh = ( 0, 9.99033e+306); yl+yh= 9.99033e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.16279e+304); yl+yh= 2.16279e+304 ebd0(x=1e+307, M=1.07884e+307): M/x = (r=0.539420075265344) * 2^(e=1); i=10, f=1900, fg=f*2^-(e+10)=0.927734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=2: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=3: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=4: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 3. after ADD1(M): yl,yh = ( 0, 1.00383e+307); yl+yh= 1.00383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.95362e+304); yl+yh= 2.95362e+304 ebd0(x=1e+307, M=1.09059e+307): M/x = (r=0.545293974766939) * 2^(e=1); i=12, f=1872, fg=f*2^-(e+10)=0.914062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, -8.98515e+305); yl+yh= -8.98515e+305 j=2: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=3: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=4: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 3. after ADD1(M): yl,yh = ( 0, 1.00074e+307); yl+yh= 1.00074e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.871e+304); yl+yh= 3.871e+304 ebd0(x=1e+307, M=1.10246e+307): M/x = (r=0.551231836840444) * 2^(e=1); i=13, f=1859, fg=f*2^-(e+10)=0.907715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=2: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=3: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=4: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 3. after ADD1(M): yl,yh = ( 0, 1.00564e+307); yl+yh= 1.00564e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.91629e+304); yl+yh= 4.91629e+304 ebd0(x=1e+307, M=1.11447e+307): M/x = (r=0.557234357992604) * 2^(e=1); i=15, f=1833, fg=f*2^-(e+10)=0.89502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, -1.10906e+306); yl+yh= -1.10906e+306 j=2: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=3: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=4: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 3. after ADD1(M): yl,yh = ( 0, 1.00356e+307); yl+yh= 1.00356e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.09091e+304); yl+yh= 6.09091e+304 ebd0(x=1e+307, M=1.1266e+307): M/x = (r=0.563302242314621) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=2: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=3: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=4: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 3. after ADD1(M): yl,yh = ( 0, 1.00858e+307); yl+yh= 1.00858e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.39626e+304); yl+yh= 7.39626e+304 ebd0(x=1e+307, M=1.13887e+307): M/x = (r=0.56943620156475) * 2^(e=1); i=18, f=1796, fg=f*2^-(e+10)=0.876953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=2: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=3: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=4: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 3. after ADD1(M): yl,yh = ( 0, 1.00757e+307); yl+yh= 1.00757e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.83375e+304); yl+yh= 8.83375e+304 ebd0(x=1e+307, M=1.15127e+307): M/x = (r=0.575636955251782) * 2^(e=1); i=19, f=1783, fg=f*2^-(e+10)=0.870605 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=2: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=3: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=4: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 3. after ADD1(M): yl,yh = ( 0, 1.01271e+307); yl+yh= 1.01271e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.04048e+305); yl+yh= 1.04048e+305 ebd0(x=1e+307, M=1.16381e+307): M/x = (r=0.581905230719448) * 2^(e=1); i=21, f=1759, fg=f*2^-(e+10)=0.858887 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=2: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=3: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=4: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 3. after ADD1(M): yl,yh = ( 0, 1.01169e+307); yl+yh= 1.01169e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.2111e+305); yl+yh= 1.2111e+305 ebd0(x=1e+307, M=1.17648e+307): M/x = (r=0.588241763231733) * 2^(e=1); i=23, f=1736, fg=f*2^-(e+10)=0.847656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=2: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=3: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=4: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 3. after ADD1(M): yl,yh = ( 0, 1.01121e+307); yl+yh= 1.01121e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39536e+305); yl+yh= 1.39536e+305 ebd0(x=1e+307, M=1.18929e+307): M/x = (r=0.59464729605912) * 2^(e=1); i=24, f=1725, fg=f*2^-(e+10)=0.842285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=2: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=3: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=4: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 3. after ADD1(M): yl,yh = ( 0, 1.01766e+307); yl+yh= 1.01766e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59342e+305); yl+yh= 1.59342e+305 ebd0(x=1e+307, M=1.20225e+307): M/x = (r=0.601122580565778) * 2^(e=1); i=26, f=1702, fg=f*2^-(e+10)=0.831055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=2: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=3: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=4: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 3. after ADD1(M): yl,yh = ( 0, 1.01719e+307); yl+yh= 1.01719e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.80544e+305); yl+yh= 1.80544e+305 ebd0(x=1e+307, M=1.21534e+307): M/x = (r=0.607668376297695) * 2^(e=1); i=28, f=1680, fg=f*2^-(e+10)=0.820312 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=2: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=3: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=4: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 3. after ADD1(M): yl,yh = ( 0, 1.01727e+307); yl+yh= 1.01727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.03156e+305); yl+yh= 2.03156e+305 ebd0(x=1e+307, M=1.22857e+307): M/x = (r=0.614285451071773) * 2^(e=1); i=29, f=1670, fg=f*2^-(e+10)=0.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=2: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=3: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=4: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 3. after ADD1(M): yl,yh = ( 0, 1.02453e+307); yl+yh= 1.02453e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27193e+305); yl+yh= 2.27193e+305 ebd0(x=1e+307, M=1.24195e+307): M/x = (r=0.620974581065892) * 2^(e=1); i=31, f=1649, fg=f*2^-(e+10)=0.805176 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=2: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=3: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=4: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 3. after ADD1(M): yl,yh = ( 0, 1.02525e+307); yl+yh= 1.02525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.52671e+305); yl+yh= 2.52671e+305 ebd0(x=1e+307, M=1.25547e+307): M/x = (r=0.627736550909953) * 2^(e=1); i=33, f=1628, fg=f*2^-(e+10)=0.794922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=2: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=3: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=4: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 3. after ADD1(M): yl,yh = ( 0, 1.02596e+307); yl+yh= 1.02596e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79606e+305); yl+yh= 2.79606e+305 ebd0(x=1e+307, M=1.26914e+307): M/x = (r=0.634572153777919) * 2^(e=1); i=34, f=1618, fg=f*2^-(e+10)=0.790039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=2: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=3: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=4: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 3. after ADD1(M): yl,yh = ( 0, 1.03347e+307); yl+yh= 1.03347e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.08014e+305); yl+yh= 3.08014e+305 ebd0(x=1e+307, M=1.28296e+307): M/x = (r=0.641482191480851) * 2^(e=1); i=36, f=1598, fg=f*2^-(e+10)=0.780273 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=2: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=3: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=4: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 3. after ADD1(M): yl,yh = ( 0, 1.03485e+307); yl+yh= 1.03485e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.37911e+305); yl+yh= 3.37911e+305 ebd0(x=1e+307, M=1.29693e+307): M/x = (r=0.648467474560957) * 2^(e=1); i=38, f=1579, fg=f*2^-(e+10)=0.770996 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=2: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=3: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=4: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 3. after ADD1(M): yl,yh = ( 0, 1.03686e+307); yl+yh= 1.03686e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.69312e+305); yl+yh= 3.69312e+305 ebd0(x=1e+307, M=1.31106e+307): M/x = (r=0.655528822386676) * 2^(e=1); i=40, f=1560, fg=f*2^-(e+10)=0.761719 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=2: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=3: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=4: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 3. after ADD1(M): yl,yh = ( 0, 1.03888e+307); yl+yh= 1.03888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.02235e+305); yl+yh= 4.02235e+305 ebd0(x=1e+307, M=1.32533e+307): M/x = (r=0.662667063248778) * 2^(e=1); i=42, f=1542, fg=f*2^-(e+10)=0.75293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=2: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=3: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=4: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 3. after ADD1(M): yl,yh = ( 0, 1.04155e+307); yl+yh= 1.04155e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.36695e+305); yl+yh= 4.36695e+305 ebd0(x=1e+307, M=1.33977e+307): M/x = (r=0.669883034457535) * 2^(e=1); i=43, f=1533, fg=f*2^-(e+10)=0.748535 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=2: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=3: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=4: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 3. after ADD1(M): yl,yh = ( 0, 1.05013e+307); yl+yh= 1.05013e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7271e+305); yl+yh= 4.7271e+305 ebd0(x=1e+307, M=1.35436e+307): M/x = (r=0.677177582440924) * 2^(e=1); i=45, f=1515, fg=f*2^-(e+10)=0.739746 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=2: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=3: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=4: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 3. after ADD1(M): yl,yh = ( 0, 1.05291e+307); yl+yh= 1.05291e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10297e+305); yl+yh= 5.10297e+305 ebd0(x=1e+307, M=1.3691e+307): M/x = (r=0.684551562843922) * 2^(e=1); i=47, f=1498, fg=f*2^-(e+10)=0.731445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=2: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=3: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=4: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 3. after ADD1(M): yl,yh = ( 0, 1.05637e+307); yl+yh= 1.05637e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.49473e+305); yl+yh= 5.49473e+305 ebd0(x=1e+307, M=1.38401e+307): M/x = (r=0.692005840628868) * 2^(e=1); i=49, f=1481, fg=f*2^-(e+10)=0.723145 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=2: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=3: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=4: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 3. after ADD1(M): yl,yh = ( 0, 1.05987e+307); yl+yh= 1.05987e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90254e+305); yl+yh= 5.90254e+305 ebd0(x=1e+307, M=1.39908e+307): M/x = (r=0.699541290176923) * 2^(e=1); i=51, f=1464, fg=f*2^-(e+10)=0.714844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=2: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=3: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=4: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 3. after ADD1(M): yl,yh = ( 0, 1.06339e+307); yl+yh= 1.06339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.32659e+305); yl+yh= 6.32659e+305 ebd0(x=1e+307, M=1.41432e+307): M/x = (r=0.707158795390635) * 2^(e=1); i=53, f=1448, fg=f*2^-(e+10)=0.707031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=2: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=3: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=4: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 3. after ADD1(M): yl,yh = ( 0, 1.06764e+307); yl+yh= 1.06764e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.76704e+305); yl+yh= 6.76704e+305 ebd0(x=1e+307, M=1.42972e+307): M/x = (r=0.71485924979762) * 2^(e=1); i=55, f=1432, fg=f*2^-(e+10)=0.699219 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=2: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=3: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=4: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 3. after ADD1(M): yl,yh = ( 0, 1.07193e+307); yl+yh= 1.07193e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.22409e+305); yl+yh= 7.22409e+305 ebd0(x=1e+307, M=1.44529e+307): M/x = (r=0.72264355665537) * 2^(e=1); i=57, f=1417, fg=f*2^-(e+10)=0.691895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=2: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=3: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=4: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 3. after ADD1(M): yl,yh = ( 0, 1.07697e+307); yl+yh= 1.07697e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69791e+305); yl+yh= 7.69791e+305 ebd0(x=1e+307, M=1.46103e+307): M/x = (r=0.730512629057209) * 2^(e=1); i=59, f=1402, fg=f*2^-(e+10)=0.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=2: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=3: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=4: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 3. after ADD1(M): yl,yh = ( 0, 1.08206e+307); yl+yh= 1.08206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.18868e+305); yl+yh= 8.18868e+305 ebd0(x=1e+307, M=1.47693e+307): M/x = (r=0.738467390039392) * 2^(e=1); i=61, f=1387, fg=f*2^-(e+10)=0.677246 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=2: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=3: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=4: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 3. after ADD1(M): yl,yh = ( 0, 1.08721e+307); yl+yh= 1.08721e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.69659e+305); yl+yh= 8.69659e+305 ebd0(x=1e+307, M=1.49302e+307): M/x = (r=0.746508772689384) * 2^(e=1); i=63, f=1372, fg=f*2^-(e+10)=0.669922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=2: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=3: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=4: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 3. after ADD1(M): yl,yh = ( 0, 1.09242e+307); yl+yh= 1.09242e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.22183e+305); yl+yh= 9.22183e+305 ebd0(x=1e+307, M=1.50928e+307): M/x = (r=0.754637720255303) * 2^(e=1); i=65, f=1358, fg=f*2^-(e+10)=0.663086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=2: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=3: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=4: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 3. after ADD1(M): yl,yh = ( 0, 1.09843e+307); yl+yh= 1.09843e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.76457e+305); yl+yh= 9.76457e+305 ebd0(x=1e+307, M=1.52571e+307): M/x = (r=0.762855186256566) * 2^(e=1); i=67, f=1344, fg=f*2^-(e+10)=0.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=2: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=3: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=4: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 3. after ADD1(M): yl,yh = ( 0, 1.1045e+307); yl+yh= 1.1045e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0325e+306); yl+yh= 1.0325e+306 ebd0(x=1e+307, M=1.54232e+307): M/x = (r=0.771162134595737) * 2^(e=1); i=69, f=1331, fg=f*2^-(e+10)=0.649902 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=2: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=3: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=4: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 3. after ADD1(M): yl,yh = ( 0, 1.11139e+307); yl+yh= 1.11139e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09034e+306); yl+yh= 1.09034e+306 ebd0(x=1e+307, M=1.55912e+307): M/x = (r=0.77955953967159) * 2^(e=1); i=72, f=1311, fg=f*2^-(e+10)=0.640137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=2: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=3: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=4: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 3. after ADD1(M): yl,yh = ( 0, 1.11305e+307); yl+yh= 1.11305e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14998e+306); yl+yh= 1.14998e+306 ebd0(x=1e+307, M=1.5761e+307): M/x = (r=0.788048386493405) * 2^(e=1); i=74, f=1298, fg=f*2^-(e+10)=0.633789 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, -4.56039e+306); yl+yh= -4.56039e+306 j=2: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=3: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=4: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 3. after ADD1(M): yl,yh = ( 0, 1.12006e+307); yl+yh= 1.12006e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.21145e+306); yl+yh= 1.21145e+306 ebd0(x=1e+307, M=1.59326e+307): M/x = (r=0.796629670796513) * 2^(e=1); i=76, f=1285, fg=f*2^-(e+10)=0.627441 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=2: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=3: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=4: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 3. after ADD1(M): yl,yh = ( 0, 1.12715e+307); yl+yh= 1.12715e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27478e+306); yl+yh= 1.27478e+306 ebd0(x=1e+307, M=1.61061e+307): M/x = (r=0.805304399159088) * 2^(e=1); i=78, f=1273, fg=f*2^-(e+10)=0.621582 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=2: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=3: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=4: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 3. after ADD1(M): yl,yh = ( 0, 1.13512e+307); yl+yh= 1.13512e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33997e+306); yl+yh= 1.33997e+306 ebd0(x=1e+307, M=1.62815e+307): M/x = (r=0.814073589120224) * 2^(e=1); i=80, f=1260, fg=f*2^-(e+10)=0.615234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=2: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=3: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=4: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 3. after ADD1(M): yl,yh = ( 0, 1.1424e+307); yl+yh= 1.1424e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40705e+306); yl+yh= 1.40705e+306 ebd0(x=1e+307, M=1.64588e+307): M/x = (r=0.822938269299289) * 2^(e=1); i=83, f=1242, fg=f*2^-(e+10)=0.606445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=2: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=3: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=4: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 3. after ADD1(M): yl,yh = ( 0, 1.14574e+307); yl+yh= 1.14574e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.47603e+306); yl+yh= 1.47603e+306 ebd0(x=1e+307, M=1.6638e+307): M/x = (r=0.83189947951658) * 2^(e=1); i=85, f=1231, fg=f*2^-(e+10)=0.601074 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=2: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=3: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=4: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 3. after ADD1(M): yl,yh = ( 0, 1.15476e+307); yl+yh= 1.15476e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54695e+306); yl+yh= 1.54695e+306 ebd0(x=1e+307, M=1.68192e+307): M/x = (r=0.840958270915297) * 2^(e=1); i=87, f=1219, fg=f*2^-(e+10)=0.595215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=2: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=3: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=4: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 3. after ADD1(M): yl,yh = ( 0, 1.16308e+307); yl+yh= 1.16308e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61983e+306); yl+yh= 1.61983e+306 ebd0(x=1e+307, M=1.70023e+307): M/x = (r=0.850115706084837) * 2^(e=1); i=90, f=1202, fg=f*2^-(e+10)=0.586914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=2: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=3: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=4: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 3. after ADD1(M): yl,yh = ( 0, 1.16736e+307); yl+yh= 1.16736e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69467e+306); yl+yh= 1.69467e+306 ebd0(x=1e+307, M=1.71875e+307): M/x = (r=0.859372859185438) * 2^(e=1); i=92, f=1192, fg=f*2^-(e+10)=0.582031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=2: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=3: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=4: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 3. after ADD1(M): yl,yh = ( 0, 1.17751e+307); yl+yh= 1.17751e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77151e+306); yl+yh= 1.77151e+306 ebd0(x=1e+307, M=1.73746e+307): M/x = (r=0.868730816074176) * 2^(e=1); i=94, f=1181, fg=f*2^-(e+10)=0.57666 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=2: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=3: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=4: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 3. after ADD1(M): yl,yh = ( 0, 1.18696e+307); yl+yh= 1.18696e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.85036e+306); yl+yh= 1.85036e+306 ebd0(x=1e+307, M=1.75638e+307): M/x = (r=0.878190674432335) * 2^(e=1); i=97, f=1165, fg=f*2^-(e+10)=0.568848 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=2: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=3: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=4: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 3. after ADD1(M): yl,yh = ( 0, 1.19224e+307); yl+yh= 1.19224e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.93126e+306); yl+yh= 1.93126e+306 ebd0(x=1e+307, M=1.77551e+307): M/x = (r=0.887753543894164) * 2^(e=1); i=99, f=1155, fg=f*2^-(e+10)=0.563965 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=2: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=3: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=4: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 3. after ADD1(M): yl,yh = ( 0, 1.20274e+307); yl+yh= 1.20274e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.01421e+306); yl+yh= 2.01421e+306 ebd0(x=1e+307, M=1.79484e+307): M/x = (r=0.897420546177039) * 2^(e=1); i=102, f=1140, fg=f*2^-(e+10)=0.556641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=2: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=3: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=4: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 3. after ADD1(M): yl,yh = ( 0, 1.20901e+307); yl+yh= 1.20901e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09925e+306); yl+yh= 2.09925e+306 ebd0(x=1e+307, M=1.81439e+307): M/x = (r=0.907192815213034) * 2^(e=1); i=104, f=1130, fg=f*2^-(e+10)=0.551758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=2: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=3: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=4: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 3. after ADD1(M): yl,yh = ( 0, 1.21974e+307); yl+yh= 1.21974e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18639e+306); yl+yh= 2.18639e+306 ebd0(x=1e+307, M=1.83414e+307): M/x = (r=0.917071497281936) * 2^(e=1); i=107, f=1116, fg=f*2^-(e+10)=0.544922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=2: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=3: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=4: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 3. after ADD1(M): yl,yh = ( 0, 1.22703e+307); yl+yh= 1.22703e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27566e+306); yl+yh= 2.27566e+306 ebd0(x=1e+307, M=1.85412e+307): M/x = (r=0.9270577511457) * 2^(e=1); i=109, f=1106, fg=f*2^-(e+10)=0.540039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=2: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=3: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=4: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 3. after ADD1(M): yl,yh = ( 0, 1.238e+307); yl+yh= 1.238e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.36708e+306); yl+yh= 2.36708e+306 ebd0(x=1e+307, M=1.87431e+307): M/x = (r=0.937152748184372) * 2^(e=1); i=112, f=1092, fg=f*2^-(e+10)=0.533203 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=2: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=3: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=4: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 3. after ADD1(M): yl,yh = ( 0, 1.24545e+307); yl+yh= 1.24545e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.46067e+306); yl+yh= 2.46067e+306 ebd0(x=1e+307, M=1.89472e+307): M/x = (r=0.947357672533489) * 2^(e=1); i=115, f=1079, fg=f*2^-(e+10)=0.526855 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=2: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=3: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=4: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 3. after ADD1(M): yl,yh = ( 0, 1.25389e+307); yl+yh= 1.25389e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.55647e+306); yl+yh= 2.55647e+306 ebd0(x=1e+307, M=1.91535e+307): M/x = (r=0.957673721222979) * 2^(e=1); i=117, f=1070, fg=f*2^-(e+10)=0.522461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=2: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=3: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=4: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 3. after ADD1(M): yl,yh = ( 0, 1.26614e+307); yl+yh= 1.26614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.65448e+306); yl+yh= 2.65448e+306 ebd0(x=1e+307, M=1.9362e+307): M/x = (r=0.968102104317573) * 2^(e=1); i=120, f=1057, fg=f*2^-(e+10)=0.516113 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=2: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=3: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=4: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 3. after ADD1(M): yl,yh = ( 0, 1.27478e+307); yl+yh= 1.27478e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.75475e+306); yl+yh= 2.75475e+306 ebd0(x=1e+307, M=1.95729e+307): M/x = (r=0.97864404505874) * 2^(e=1); i=123, f=1044, fg=f*2^-(e+10)=0.509766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=2: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=3: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=4: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 3. after ADD1(M): yl,yh = ( 0, 1.28349e+307); yl+yh= 1.28349e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85728e+306); yl+yh= 2.85728e+306 ebd0(x=1e+307, M=1.9786e+307): M/x = (r=0.989300780008178) * 2^(e=1); i=125, f=1036, fg=f*2^-(e+10)=0.505859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=2: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=3: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=4: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 3. after ADD1(M): yl,yh = ( 0, 1.29711e+307); yl+yh= 1.29711e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.96211e+306); yl+yh= 2.96211e+306 ebd0(x=1e+307, M=2.00015e+307): M/x = (r=0.500036779596429) * 2^(e=2); i=0, f=2048, fg=f*2^-(e+10)=0.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=2: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=3: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=4: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.307e+307); yl+yh= 1.307e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.06926e+306); yl+yh= 3.06926e+306 ebd0(x=1e+307, M=2.02193e+307): M/x = (r=0.505481823125825) * 2^(e=2); i=1, f=2032, fg=f*2^-(e+10)=0.496094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.85309e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=2: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=3: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=4: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 3. after ADD1(M): yl,yh = ( 0, 1.32094e+307); yl+yh= 1.32094e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.17876e+306); yl+yh= 3.17876e+306 ebd0(x=1e+307, M=2.04394e+307): M/x = (r=0.510986159291777) * 2^(e=2); i=3, f=2001, fg=f*2^-(e+10)=0.488525 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.69932e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=2: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=3: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=4: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 3. after ADD1(M): yl,yh = ( 0, 1.32758e+307); yl+yh= 1.32758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.29063e+306); yl+yh= 3.29063e+306 ebd0(x=1e+307, M=2.0662e+307): M/x = (r=0.516550433748765) * 2^(e=2); i=4, f=1986, fg=f*2^-(e+10)=0.484863 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.62408e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=2: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=3: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=4: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 3. after ADD1(M): yl,yh = ( 0, 1.34232e+307); yl+yh= 1.34232e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.4049e+306); yl+yh= 3.4049e+306 ebd0(x=1e+307, M=2.0887e+307): M/x = (r=0.522175299181986) * 2^(e=2); i=6, f=1956, fg=f*2^-(e+10)=0.477539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.47188e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=2: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=3: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=4: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 3. after ADD1(M): yl,yh = ( 0, 1.3496e+307); yl+yh= 1.3496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.52159e+306); yl+yh= 3.52159e+306 ebd0(x=1e+307, M=2.11145e+307): M/x = (r=0.52786141538391) * 2^(e=2); i=7, f=1942, fg=f*2^-(e+10)=0.474121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.40002e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=2: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=3: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=4: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 3. after ADD1(M): yl,yh = ( 0, 1.36515e+307); yl+yh= 1.36515e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64073e+306); yl+yh= 3.64073e+306 ebd0(x=1e+307, M=2.13444e+307): M/x = (r=0.533609449331681) * 2^(e=2); i=9, f=1913, fg=f*2^-(e+10)=0.467041 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.24961e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=2: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=3: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=4: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 3. after ADD1(M): yl,yh = ( 0, 1.3731e+307); yl+yh= 1.3731e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.76235e+306); yl+yh= 3.76235e+306 ebd0(x=1e+307, M=2.15768e+307): M/x = (r=0.539420075265344) * 2^(e=2); i=10, f=1900, fg=f*2^-(e+10)=0.463867 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.18138e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=2: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=3: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=4: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 3. after ADD1(M): yl,yh = ( 0, 1.38952e+307); yl+yh= 1.38952e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88647e+306); yl+yh= 3.88647e+306 ebd0(x=1e+307, M=2.18118e+307): M/x = (r=0.545293974766939) * 2^(e=2); i=12, f=1872, fg=f*2^-(e+10)=0.457031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.03296e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=2: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=3: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=4: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 3. after ADD1(M): yl,yh = ( 0, 1.39818e+307); yl+yh= 1.39818e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.01312e+306); yl+yh= 4.01312e+306 ebd0(x=1e+307, M=2.20493e+307): M/x = (r=0.551231836840444) * 2^(e=2); i=13, f=1859, fg=f*2^-(e+10)=0.453857 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.96322e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=2: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=3: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=4: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 3. after ADD1(M): yl,yh = ( 0, 1.41496e+307); yl+yh= 1.41496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14233e+306); yl+yh= 4.14233e+306 ebd0(x=1e+307, M=2.22894e+307): M/x = (r=0.557234357992604) * 2^(e=2); i=15, f=1833, fg=f*2^-(e+10)=0.44751 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.82241e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=2: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=3: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=4: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 3. after ADD1(M): yl,yh = ( 0, 1.42488e+307); yl+yh= 1.42488e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.27412e+306); yl+yh= 4.27412e+306 ebd0(x=1e+307, M=2.25321e+307): M/x = (r=0.563302242314621) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.75121e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=2: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=3: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=4: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 3. after ADD1(M): yl,yh = ( 0, 1.44204e+307); yl+yh= 1.44204e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.40854e+306); yl+yh= 4.40854e+306 ebd0(x=1e+307, M=2.27774e+307): M/x = (r=0.56943620156475) * 2^(e=2); i=18, f=1796, fg=f*2^-(e+10)=0.438477 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.61846e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=2: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=3: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=4: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 3. after ADD1(M): yl,yh = ( 0, 1.4533e+307); yl+yh= 1.4533e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.54559e+306); yl+yh= 4.54559e+306 ebd0(x=1e+307, M=2.30255e+307): M/x = (r=0.575636955251782) * 2^(e=2); i=19, f=1783, fg=f*2^-(e+10)=0.435303 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.54583e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=2: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=3: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=4: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 3. after ADD1(M): yl,yh = ( 0, 1.47084e+307); yl+yh= 1.47084e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.68532e+306); yl+yh= 4.68532e+306 ebd0(x=1e+307, M=2.32762e+307): M/x = (r=0.581905230719448) * 2^(e=2); i=21, f=1759, fg=f*2^-(e+10)=0.429443 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.41029e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=2: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=3: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=4: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 3. after ADD1(M): yl,yh = ( 0, 1.48236e+307); yl+yh= 1.48236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.82774e+306); yl+yh= 4.82774e+306 ebd0(x=1e+307, M=2.35297e+307): M/x = (r=0.588241763231733) * 2^(e=2); i=23, f=1736, fg=f*2^-(e+10)=0.423828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.27871e+306); ( 0, -8.58424e+306); yl+yh= -8.58424e+306 j=2: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=3: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=4: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 3. after ADD1(M): yl,yh = ( 0, 1.49454e+307); yl+yh= 1.49454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.9729e+306); yl+yh= 4.9729e+306 ebd0(x=1e+307, M=2.37859e+307): M/x = (r=0.59464729605912) * 2^(e=2); i=24, f=1725, fg=f*2^-(e+10)=0.421143 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.21512e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=2: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=3: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=4: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 3. after ADD1(M): yl,yh = ( 0, 1.51381e+307); yl+yh= 1.51381e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12082e+306); yl+yh= 5.12082e+306 ebd0(x=1e+307, M=2.40449e+307): M/x = (r=0.601122580565778) * 2^(e=2); i=26, f=1702, fg=f*2^-(e+10)=0.415527 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.08088e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=2: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=3: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=4: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 3. after ADD1(M): yl,yh = ( 0, 1.52628e+307); yl+yh= 1.52628e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.27152e+306); yl+yh= 5.27152e+306 ebd0(x=1e+307, M=2.43067e+307): M/x = (r=0.607668376297695) * 2^(e=2); i=28, f=1680, fg=f*2^-(e+10)=0.410156 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.95082e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=2: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=3: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=4: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 3. after ADD1(M): yl,yh = ( 0, 1.53946e+307); yl+yh= 1.53946e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.42505e+306); yl+yh= 5.42505e+306 ebd0(x=1e+307, M=2.45714e+307): M/x = (r=0.614285451071773) * 2^(e=2); i=29, f=1670, fg=f*2^-(e+10)=0.407715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.89109e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=2: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=3: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=4: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 3. after ADD1(M): yl,yh = ( 0, 1.55996e+307); yl+yh= 1.55996e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.58143e+306); yl+yh= 5.58143e+306 ebd0(x=1e+307, M=2.4839e+307): M/x = (r=0.620974581065892) * 2^(e=2); i=31, f=1649, fg=f*2^-(e+10)=0.402588 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.76453e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=2: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=3: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=4: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 3. after ADD1(M): yl,yh = ( 0, 1.57406e+307); yl+yh= 1.57406e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.74069e+306); yl+yh= 5.74069e+306 ebd0(x=1e+307, M=2.51095e+307): M/x = (r=0.627736550909953) * 2^(e=2); i=33, f=1628, fg=f*2^-(e+10)=0.397461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.63638e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=2: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=3: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=4: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 3. after ADD1(M): yl,yh = ( 0, 1.58829e+307); yl+yh= 1.58829e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90287e+306); yl+yh= 5.90287e+306 ebd0(x=1e+307, M=2.53829e+307): M/x = (r=0.634572153777919) * 2^(e=2); i=34, f=1618, fg=f*2^-(e+10)=0.39502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.57478e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=2: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=3: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=4: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 3. after ADD1(M): yl,yh = ( 0, 1.60947e+307); yl+yh= 1.60947e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.06799e+306); yl+yh= 6.06799e+306 ebd0(x=1e+307, M=2.56593e+307): M/x = (r=0.641482191480851) * 2^(e=2); i=36, f=1598, fg=f*2^-(e+10)=0.390137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.45037e+306); ( 0, -9.41258e+306); yl+yh= -9.41258e+306 j=2: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=3: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=4: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 3. after ADD1(M): yl,yh = ( 0, 1.62467e+307); yl+yh= 1.62467e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.23608e+306); yl+yh= 6.23608e+306 ebd0(x=1e+307, M=2.59387e+307): M/x = (r=0.648467474560957) * 2^(e=2); i=38, f=1579, fg=f*2^-(e+10)=0.385498 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.33075e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=2: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=3: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=4: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 3. after ADD1(M): yl,yh = ( 0, 1.64065e+307); yl+yh= 1.64065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.40719e+306); yl+yh= 6.40719e+306 ebd0(x=1e+307, M=2.62212e+307): M/x = (r=0.655528822386676) * 2^(e=2); i=40, f=1560, fg=f*2^-(e+10)=0.380859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.2097e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=2: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=3: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=4: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 3. after ADD1(M): yl,yh = ( 0, 1.65679e+307); yl+yh= 1.65679e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.58134e+306); yl+yh= 6.58134e+306 ebd0(x=1e+307, M=2.65067e+307): M/x = (r=0.662667063248778) * 2^(e=2); i=42, f=1542, fg=f*2^-(e+10)=0.376465 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.09366e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=2: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=3: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=4: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 3. after ADD1(M): yl,yh = ( 0, 1.67374e+307); yl+yh= 1.67374e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.75856e+306); yl+yh= 6.75856e+306 ebd0(x=1e+307, M=2.67953e+307): M/x = (r=0.669883034457535) * 2^(e=2); i=43, f=1533, fg=f*2^-(e+10)=0.374268 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.03514e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=2: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=3: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=4: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 3. after ADD1(M): yl,yh = ( 0, 1.69675e+307); yl+yh= 1.69675e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.9389e+306); yl+yh= 6.9389e+306 ebd0(x=1e+307, M=2.70871e+307): M/x = (r=0.677177582440924) * 2^(e=2); i=45, f=1515, fg=f*2^-(e+10)=0.369873 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.91701e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=2: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=3: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=4: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 3. after ADD1(M): yl,yh = ( 0, 1.71412e+307); yl+yh= 1.71412e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.12238e+306); yl+yh= 7.12238e+306 ebd0(x=1e+307, M=2.73821e+307): M/x = (r=0.684551562843922) * 2^(e=2); i=47, f=1498, fg=f*2^-(e+10)=0.365723 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.80415e+306); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=2: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=3: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=4: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 3. after ADD1(M): yl,yh = ( 0, 1.73233e+307); yl+yh= 1.73233e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.30903e+306); yl+yh= 7.30903e+306 ebd0(x=1e+307, M=2.76802e+307): M/x = (r=0.692005840628868) * 2^(e=2); i=49, f=1481, fg=f*2^-(e+10)=0.361572 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.69001e+306); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=2: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=3: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=4: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 3. after ADD1(M): yl,yh = ( 0, 1.75073e+307); yl+yh= 1.75073e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.4989e+306); yl+yh= 7.4989e+306 ebd0(x=1e+307, M=2.79817e+307): M/x = (r=0.699541290176923) * 2^(e=2); i=51, f=1464, fg=f*2^-(e+10)=0.357422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.57456e+306); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=2: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=3: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=4: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 3. after ADD1(M): yl,yh = ( 0, 1.76933e+307); yl+yh= 1.76933e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69201e+306); yl+yh= 7.69201e+306 ebd0(x=1e+307, M=2.82864e+307): M/x = (r=0.707158795390635) * 2^(e=2); i=53, f=1448, fg=f*2^-(e+10)=0.353516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.46467e+306); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=2: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=3: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=4: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 3. after ADD1(M): yl,yh = ( 0, 1.78881e+307); yl+yh= 1.78881e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.88841e+306); yl+yh= 7.88841e+306 ebd0(x=1e+307, M=2.85944e+307): M/x = (r=0.71485924979762) * 2^(e=2); i=55, f=1432, fg=f*2^-(e+10)=0.349609 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.35356e+306); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=2: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=3: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=4: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 3. after ADD1(M): yl,yh = ( 0, 1.8085e+307); yl+yh= 1.8085e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08812e+306); yl+yh= 8.08812e+306 ebd0(x=1e+307, M=2.89057e+307): M/x = (r=0.72264355665537) * 2^(e=2); i=57, f=1417, fg=f*2^-(e+10)=0.345947 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.24825e+306); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=2: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=3: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=4: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 3. after ADD1(M): yl,yh = ( 0, 1.82911e+307); yl+yh= 1.82911e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.29119e+306); yl+yh= 8.29119e+306 ebd0(x=1e+307, M=2.92205e+307): M/x = (r=0.730512629057209) * 2^(e=2); i=59, f=1402, fg=f*2^-(e+10)=0.342285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.14183e+306); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=2: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=3: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=4: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 3. after ADD1(M): yl,yh = ( 0, 1.84994e+307); yl+yh= 1.84994e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.49765e+306); yl+yh= 8.49765e+306 ebd0(x=1e+307, M=2.95387e+307): M/x = (r=0.738467390039392) * 2^(e=2); i=61, f=1387, fg=f*2^-(e+10)=0.338623 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.03427e+306); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=2: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=3: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=4: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 3. after ADD1(M): yl,yh = ( 0, 1.871e+307); yl+yh= 1.871e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.70754e+306); yl+yh= 8.70754e+306 ebd0(x=1e+307, M=2.98604e+307): M/x = (r=0.746508772689384) * 2^(e=2); i=63, f=1372, fg=f*2^-(e+10)=0.334961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.92553e+306); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=2: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=3: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=4: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 3. after ADD1(M): yl,yh = ( 0, 1.89229e+307); yl+yh= 1.89229e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.92089e+306); yl+yh= 8.92089e+306 ebd0(x=1e+307, M=3.01855e+307): M/x = (r=0.754637720255303) * 2^(e=2); i=65, f=1358, fg=f*2^-(e+10)=0.331543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.82297e+306); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=2: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=3: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=4: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 3. after ADD1(M): yl,yh = ( 0, 1.91455e+307); yl+yh= 1.91455e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.13774e+306); yl+yh= 9.13774e+306 ebd0(x=1e+307, M=3.05142e+307): M/x = (r=0.762855186256566) * 2^(e=2); i=67, f=1344, fg=f*2^-(e+10)=0.328125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.71935e+306); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=2: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=3: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=4: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 3. after ADD1(M): yl,yh = ( 0, 1.93706e+307); yl+yh= 1.93706e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.35813e+306); yl+yh= 9.35813e+306 ebd0(x=1e+307, M=3.08465e+307): M/x = (r=0.771162134595737) * 2^(e=2); i=69, f=1331, fg=f*2^-(e+10)=0.324951 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.62217e+306); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=2: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=3: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=4: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 3. after ADD1(M): yl,yh = ( 0, 1.96057e+307); yl+yh= 1.96057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.58211e+306); yl+yh= 9.58211e+306 ebd0(x=1e+307, M=3.11824e+307): M/x = (r=0.77955953967159) * 2^(e=2); i=72, f=1311, fg=f*2^-(e+10)=0.320068 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.47076e+306); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=2: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=3: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=4: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 3. after ADD1(M): yl,yh = ( 0, 1.97902e+307); yl+yh= 1.97902e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.8097e+306); yl+yh= 9.8097e+306 ebd0(x=1e+307, M=3.15219e+307): M/x = (r=0.788048386493405) * 2^(e=2); i=74, f=1298, fg=f*2^-(e+10)=0.316895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.37109e+306); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=2: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=3: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=4: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 3. after ADD1(M): yl,yh = ( 0, 2.00301e+307); yl+yh= 2.00301e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 ebd0(x=1e+307, M=3.18652e+307): M/x = (r=0.796629670796513) * 2^(e=2); i=76, f=1285, fg=f*2^-(e+10)=0.313721 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.27042e+306); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=2: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=3: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=4: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 3. after ADD1(M): yl,yh = ( 0, 2.02727e+307); yl+yh= 2.02727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.02759e+307); yl+yh= 1.02759e+307 ebd0(x=1e+307, M=3.22122e+307): M/x = (r=0.805304399159088) * 2^(e=2); i=78, f=1273, fg=f*2^-(e+10)=0.310791 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.1766e+306); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=2: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=3: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=4: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 3. after ADD1(M): yl,yh = ( 0, 2.05258e+307); yl+yh= 2.05258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05146e+307); yl+yh= 1.05146e+307 ebd0(x=1e+307, M=3.25629e+307): M/x = (r=0.814073589120224) * 2^(e=2); i=80, f=1260, fg=f*2^-(e+10)=0.307617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 2.07397e+306); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=2: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=3: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=4: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 3. after ADD1(M): yl,yh = ( 0, 2.0774e+307); yl+yh= 2.0774e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0757e+307); yl+yh= 1.0757e+307 ebd0(x=1e+307, M=3.29175e+307): M/x = (r=0.822938269299289) * 2^(e=2); i=83, f=1242, fg=f*2^-(e+10)=0.303223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93008e+306); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=2: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=3: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=4: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 3. after ADD1(M): yl,yh = ( 0, 2.09847e+307); yl+yh= 2.09847e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10033e+307); yl+yh= 1.10033e+307 ebd0(x=1e+307, M=3.3276e+307): M/x = (r=0.83189947951658) * 2^(e=2); i=85, f=1231, fg=f*2^-(e+10)=0.300537 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.8411e+306); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=2: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=3: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=4: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 3. after ADD1(M): yl,yh = ( 0, 2.12541e+307); yl+yh= 2.12541e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.12535e+307); yl+yh= 1.12535e+307 ebd0(x=1e+307, M=3.36383e+307): M/x = (r=0.840958270915297) * 2^(e=2); i=87, f=1219, fg=f*2^-(e+10)=0.297607 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.74315e+306); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=2: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=3: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=4: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 3. after ADD1(M): yl,yh = ( 0, 2.15185e+307); yl+yh= 2.15185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.15075e+307); yl+yh= 1.15075e+307 ebd0(x=1e+307, M=3.40046e+307): M/x = (r=0.850115706084837) * 2^(e=2); i=90, f=1202, fg=f*2^-(e+10)=0.293457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.60273e+306); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=2: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=3: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=4: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 3. after ADD1(M): yl,yh = ( 0, 2.17444e+307); yl+yh= 2.17444e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.17655e+307); yl+yh= 1.17655e+307 ebd0(x=1e+307, M=3.43749e+307): M/x = (r=0.859372859185438) * 2^(e=2); i=92, f=1192, fg=f*2^-(e+10)=0.291016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.51916e+306); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=2: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=3: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=4: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 3. after ADD1(M): yl,yh = ( 0, 2.20311e+307); yl+yh= 2.20311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20275e+307); yl+yh= 1.20275e+307 ebd0(x=1e+307, M=3.47492e+307): M/x = (r=0.868730816074176) * 2^(e=2); i=94, f=1181, fg=f*2^-(e+10)=0.28833 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.42647e+306); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=2: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=3: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=4: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 3. after ADD1(M): yl,yh = ( 0, 2.23128e+307); yl+yh= 2.23128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.22935e+307); yl+yh= 1.22935e+307 ebd0(x=1e+307, M=3.51276e+307): M/x = (r=0.878190674432335) * 2^(e=2); i=97, f=1165, fg=f*2^-(e+10)=0.284424 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.29005e+306); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=2: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=3: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=4: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 3. after ADD1(M): yl,yh = ( 0, 2.25547e+307); yl+yh= 2.25547e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.25636e+307); yl+yh= 1.25636e+307 ebd0(x=1e+307, M=3.55101e+307): M/x = (r=0.887753543894164) * 2^(e=2); i=99, f=1155, fg=f*2^-(e+10)=0.281982 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.20385e+306); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=2: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=3: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=4: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 3. after ADD1(M): yl,yh = ( 0, 2.2851e+307); yl+yh= 2.2851e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.28378e+307); yl+yh= 1.28378e+307 ebd0(x=1e+307, M=3.58968e+307): M/x = (r=0.897420546177039) * 2^(e=2); i=102, f=1140, fg=f*2^-(e+10)=0.27832 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.07312e+306); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=2: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=3: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=4: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 3. after ADD1(M): yl,yh = ( 0, 2.3107e+307); yl+yh= 2.3107e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.31162e+307); yl+yh= 1.31162e+307 ebd0(x=1e+307, M=3.62877e+307): M/x = (r=0.907192815213034) * 2^(e=2); i=104, f=1130, fg=f*2^-(e+10)=0.275879 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 9.85017e+305); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=2: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=3: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=4: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 3. after ADD1(M): yl,yh = ( 0, 2.34098e+307); yl+yh= 2.34098e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33988e+307); yl+yh= 1.33988e+307 ebd0(x=1e+307, M=3.66829e+307): M/x = (r=0.917071497281936) * 2^(e=2); i=107, f=1116, fg=f*2^-(e+10)=0.272461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 8.60345e+305); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=2: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=3: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=4: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 3. after ADD1(M): yl,yh = ( 0, 2.36803e+307); yl+yh= 2.36803e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.36856e+307); yl+yh= 1.36856e+307 ebd0(x=1e+307, M=3.70823e+307): M/x = (r=0.9270577511457) * 2^(e=2); i=109, f=1106, fg=f*2^-(e+10)=0.27002 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 7.70342e+305); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=2: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=3: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=4: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 3. after ADD1(M): yl,yh = ( 0, 2.39897e+307); yl+yh= 2.39897e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39768e+307); yl+yh= 1.39768e+307 ebd0(x=1e+307, M=3.74861e+307): M/x = (r=0.937152748184372) * 2^(e=2); i=112, f=1092, fg=f*2^-(e+10)=0.266602 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.42945e+305); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=2: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=3: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=4: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 3. after ADD1(M): yl,yh = ( 0, 2.42661e+307); yl+yh= 2.42661e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42723e+307); yl+yh= 1.42723e+307 ebd0(x=1e+307, M=3.78943e+307): M/x = (r=0.947357672533489) * 2^(e=2); i=115, f=1079, fg=f*2^-(e+10)=0.263428 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 5.23197e+305); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=2: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=3: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=4: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 3. after ADD1(M): yl,yh = ( 0, 2.45546e+307); yl+yh= 2.45546e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.45721e+307); yl+yh= 1.45721e+307 ebd0(x=1e+307, M=3.83069e+307): M/x = (r=0.957673721222979) * 2^(e=2); i=117, f=1070, fg=f*2^-(e+10)=0.26123 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 4.39424e+305); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=2: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=3: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=4: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 3. after ADD1(M): yl,yh = ( 0, 2.48834e+307); yl+yh= 2.48834e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48765e+307); yl+yh= 1.48765e+307 ebd0(x=1e+307, M=3.87241e+307): M/x = (r=0.968102104317573) * 2^(e=2); i=120, f=1057, fg=f*2^-(e+10)=0.258057 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 3.17184e+305); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=2: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=3: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=4: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 3. after ADD1(M): yl,yh = ( 0, 2.51783e+307); yl+yh= 2.51783e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51853e+307); yl+yh= 1.51853e+307 ebd0(x=1e+307, M=3.91458e+307): M/x = (r=0.97864404505874) * 2^(e=2); i=123, f=1044, fg=f*2^-(e+10)=0.254883 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.93455e+305); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=2: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=3: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=4: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 3. after ADD1(M): yl,yh = ( 0, 2.54763e+307); yl+yh= 2.54763e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54987e+307); yl+yh= 1.54987e+307 ebd0(x=1e+307, M=3.9572e+307): M/x = (r=0.989300780008178) * 2^(e=2); i=125, f=1036, fg=f*2^-(e+10)=0.25293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 1.1651e+305); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=2: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=3: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=4: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 3. after ADD1(M): yl,yh = ( 0, 2.58256e+307); yl+yh= 2.58256e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.58167e+307); yl+yh= 1.58167e+307 ebd0(x=1e+307, M=4.00029e+307): M/x = (r=0.500036779596429) * 2^(e=3); i=0, f=2048, fg=f*2^-(e+10)=0.25 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*b[0,j]), j=1:4: j=1: ( 0, 6.93147e+306); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=2: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=3: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=4: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 2.614e+307); yl+yh= 2.614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61393e+307); yl+yh= 1.61393e+307 dpq_ebd0(x[1:1], np[1:257], ... ): ebd0(x=1e+307, M=2.50018e+306): M/x = (r=0.500036779596429) * 2^(e=-1); i=0, f=2048, fg=f*2^-(e+10)=4 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=1: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=2: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 j=3: ( 0, 1.38629e+307); ( 0, 1.38629e+307); yl+yh= 1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 1.63631e+307); yl+yh= 1.63631e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.36239e+306); yl+yh= 6.36239e+306 ebd0(x=1e+307, M=2.52741e+306): M/x = (r=0.505481823125825) * 2^(e=-1); i=1, f=2032, fg=f*2^-(e+10)=3.96875 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=1: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=2: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 j=3: ( 0, 1.37846e+307); ( 0, 1.37846e+307); yl+yh= 1.37846e+307 3. after ADD1(M): yl,yh = ( 0, 1.6312e+307); yl+yh= 1.6312e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.28131e+306); yl+yh= 6.28131e+306 ebd0(x=1e+307, M=2.55493e+306): M/x = (r=0.510986159291777) * 2^(e=-1); i=3, f=2001, fg=f*2^-(e+10)=3.9082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=1: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=2: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 j=3: ( 0, 1.36308e+307); ( 0, 1.36308e+307); yl+yh= 1.36308e+307 3. after ADD1(M): yl,yh = ( 0, 1.61857e+307); yl+yh= 1.61857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.20053e+306); yl+yh= 6.20053e+306 ebd0(x=1e+307, M=2.58275e+306): M/x = (r=0.516550433748765) * 2^(e=-1); i=4, f=1986, fg=f*2^-(e+10)=3.87891 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=1: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=2: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 j=3: ( 0, 1.35555e+307); ( 0, 1.35555e+307); yl+yh= 1.35555e+307 3. after ADD1(M): yl,yh = ( 0, 1.61383e+307); yl+yh= 1.61383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.12005e+306); yl+yh= 6.12005e+306 ebd0(x=1e+307, M=2.61088e+306): M/x = (r=0.522175299181986) * 2^(e=-1); i=6, f=1956, fg=f*2^-(e+10)=3.82031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=1: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=2: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 j=3: ( 0, 1.34034e+307); ( 0, 1.34034e+307); yl+yh= 1.34034e+307 3. after ADD1(M): yl,yh = ( 0, 1.60142e+307); yl+yh= 1.60142e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.03987e+306); yl+yh= 6.03987e+306 ebd0(x=1e+307, M=2.63931e+306): M/x = (r=0.52786141538391) * 2^(e=-1); i=7, f=1942, fg=f*2^-(e+10)=3.79297 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=1: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=2: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 j=3: ( 0, 1.33315e+307); ( 0, 1.33315e+307); yl+yh= 1.33315e+307 3. after ADD1(M): yl,yh = ( 0, 1.59708e+307); yl+yh= 1.59708e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.95999e+306); yl+yh= 5.95999e+306 ebd0(x=1e+307, M=2.66805e+306): M/x = (r=0.533609449331681) * 2^(e=-1); i=9, f=1913, fg=f*2^-(e+10)=3.73633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=1: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=2: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 j=3: ( 0, 1.31811e+307); ( 0, 1.31811e+307); yl+yh= 1.31811e+307 3. after ADD1(M): yl,yh = ( 0, 1.58491e+307); yl+yh= 1.58491e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.88043e+306); yl+yh= 5.88043e+306 ebd0(x=1e+307, M=2.6971e+306): M/x = (r=0.539420075265344) * 2^(e=-1); i=10, f=1900, fg=f*2^-(e+10)=3.71094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=1: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=2: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 j=3: ( 0, 1.31128e+307); ( 0, 1.31128e+307); yl+yh= 1.31128e+307 3. after ADD1(M): yl,yh = ( 0, 1.58099e+307); yl+yh= 1.58099e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.80118e+306); yl+yh= 5.80118e+306 ebd0(x=1e+307, M=2.72647e+306): M/x = (r=0.545293974766939) * 2^(e=-1); i=12, f=1872, fg=f*2^-(e+10)=3.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=1: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=2: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 j=3: ( 0, 1.29644e+307); ( 0, 1.29644e+307); yl+yh= 1.29644e+307 3. after ADD1(M): yl,yh = ( 0, 1.56909e+307); yl+yh= 1.56909e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.72224e+306); yl+yh= 5.72224e+306 ebd0(x=1e+307, M=2.75616e+306): M/x = (r=0.551231836840444) * 2^(e=-1); i=13, f=1859, fg=f*2^-(e+10)=3.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=1: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=2: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 j=3: ( 0, 1.28947e+307); ( 0, 1.28947e+307); yl+yh= 1.28947e+307 3. after ADD1(M): yl,yh = ( 0, 1.56509e+307); yl+yh= 1.56509e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.64363e+306); yl+yh= 5.64363e+306 ebd0(x=1e+307, M=2.78617e+306): M/x = (r=0.557234357992604) * 2^(e=-1); i=15, f=1833, fg=f*2^-(e+10)=3.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=1: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=2: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 j=3: ( 0, 1.27539e+307); ( 0, 1.27539e+307); yl+yh= 1.27539e+307 3. after ADD1(M): yl,yh = ( 0, 1.55401e+307); yl+yh= 1.55401e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.56534e+306); yl+yh= 5.56534e+306 ebd0(x=1e+307, M=2.81651e+306): M/x = (r=0.563302242314621) * 2^(e=-1); i=16, f=1820, fg=f*2^-(e+10)=3.55469 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=1: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=2: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 j=3: ( 0, 1.26827e+307); ( 0, 1.26827e+307); yl+yh= 1.26827e+307 3. after ADD1(M): yl,yh = ( 0, 1.54992e+307); yl+yh= 1.54992e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.48737e+306); yl+yh= 5.48737e+306 ebd0(x=1e+307, M=2.84718e+306): M/x = (r=0.56943620156475) * 2^(e=-1); i=18, f=1796, fg=f*2^-(e+10)=3.50781 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=1: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=2: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 j=3: ( 0, 1.25499e+307); ( 0, 1.25499e+307); yl+yh= 1.25499e+307 3. after ADD1(M): yl,yh = ( 0, 1.53971e+307); yl+yh= 1.53971e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.40974e+306); yl+yh= 5.40974e+306 ebd0(x=1e+307, M=2.87818e+306): M/x = (r=0.575636955251782) * 2^(e=-1); i=19, f=1783, fg=f*2^-(e+10)=3.48242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=1: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=2: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 j=3: ( 0, 1.24773e+307); ( 0, 1.24773e+307); yl+yh= 1.24773e+307 3. after ADD1(M): yl,yh = ( 0, 1.53555e+307); yl+yh= 1.53555e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.33244e+306); yl+yh= 5.33244e+306 ebd0(x=1e+307, M=2.90953e+306): M/x = (r=0.581905230719448) * 2^(e=-1); i=21, f=1759, fg=f*2^-(e+10)=3.43555 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=1: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=2: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 j=3: ( 0, 1.23418e+307); ( 0, 1.23418e+307); yl+yh= 1.23418e+307 3. after ADD1(M): yl,yh = ( 0, 1.52513e+307); yl+yh= 1.52513e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.25547e+306); yl+yh= 5.25547e+306 ebd0(x=1e+307, M=2.94121e+306): M/x = (r=0.588241763231733) * 2^(e=-1); i=23, f=1736, fg=f*2^-(e+10)=3.39062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=1: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=2: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 j=3: ( 0, 1.22102e+307); ( 0, 1.22102e+307); yl+yh= 1.22102e+307 3. after ADD1(M): yl,yh = ( 0, 1.51514e+307); yl+yh= 1.51514e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.17885e+306); yl+yh= 5.17885e+306 ebd0(x=1e+307, M=2.97324e+306): M/x = (r=0.59464729605912) * 2^(e=-1); i=24, f=1725, fg=f*2^-(e+10)=3.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=1: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=2: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 j=3: ( 0, 1.21466e+307); ( 0, 1.21466e+307); yl+yh= 1.21466e+307 3. after ADD1(M): yl,yh = ( 0, 1.51198e+307); yl+yh= 1.51198e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10258e+306); yl+yh= 5.10258e+306 ebd0(x=1e+307, M=3.00561e+306): M/x = (r=0.601122580565778) * 2^(e=-1); i=26, f=1702, fg=f*2^-(e+10)=3.32422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=1: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=2: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 j=3: ( 0, 1.20124e+307); ( 0, 1.20124e+307); yl+yh= 1.20124e+307 3. after ADD1(M): yl,yh = ( 0, 1.5018e+307); yl+yh= 1.5018e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.02665e+306); yl+yh= 5.02665e+306 ebd0(x=1e+307, M=3.03834e+306): M/x = (r=0.607668376297695) * 2^(e=-1); i=28, f=1680, fg=f*2^-(e+10)=3.28125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=1: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=2: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 j=3: ( 0, 1.18823e+307); ( 0, 1.18823e+307); yl+yh= 1.18823e+307 3. after ADD1(M): yl,yh = ( 0, 1.49206e+307); yl+yh= 1.49206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.95107e+306); yl+yh= 4.95107e+306 ebd0(x=1e+307, M=3.07143e+306): M/x = (r=0.614285451071773) * 2^(e=-1); i=29, f=1670, fg=f*2^-(e+10)=3.26172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=1: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=2: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 j=3: ( 0, 1.18226e+307); ( 0, 1.18226e+307); yl+yh= 1.18226e+307 3. after ADD1(M): yl,yh = ( 0, 1.4894e+307); yl+yh= 1.4894e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.87585e+306); yl+yh= 4.87585e+306 ebd0(x=1e+307, M=3.10487e+306): M/x = (r=0.620974581065892) * 2^(e=-1); i=31, f=1649, fg=f*2^-(e+10)=3.2207 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=1: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=2: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 j=3: ( 0, 1.1696e+307); ( 0, 1.1696e+307); yl+yh= 1.1696e+307 3. after ADD1(M): yl,yh = ( 0, 1.48009e+307); yl+yh= 1.48009e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.801e+306); yl+yh= 4.801e+306 ebd0(x=1e+307, M=3.13868e+306): M/x = (r=0.627736550909953) * 2^(e=-1); i=33, f=1628, fg=f*2^-(e+10)=3.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=1: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=2: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 j=3: ( 0, 1.15678e+307); ( 0, 1.15678e+307); yl+yh= 1.15678e+307 3. after ADD1(M): yl,yh = ( 0, 1.47065e+307); yl+yh= 1.47065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7265e+306); yl+yh= 4.7265e+306 ebd0(x=1e+307, M=3.17286e+306): M/x = (r=0.634572153777919) * 2^(e=-1); i=34, f=1618, fg=f*2^-(e+10)=3.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=1: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=2: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 j=3: ( 0, 1.15063e+307); ( 0, 1.15063e+307); yl+yh= 1.15063e+307 3. after ADD1(M): yl,yh = ( 0, 1.46791e+307); yl+yh= 1.46791e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.65238e+306); yl+yh= 4.65238e+306 ebd0(x=1e+307, M=3.20741e+306): M/x = (r=0.641482191480851) * 2^(e=-1); i=36, f=1598, fg=f*2^-(e+10)=3.12109 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=1: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=2: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 j=3: ( 0, 1.13818e+307); ( 0, 1.13818e+307); yl+yh= 1.13818e+307 3. after ADD1(M): yl,yh = ( 0, 1.45893e+307); yl+yh= 1.45893e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.57862e+306); yl+yh= 4.57862e+306 ebd0(x=1e+307, M=3.24234e+306): M/x = (r=0.648467474560957) * 2^(e=-1); i=38, f=1579, fg=f*2^-(e+10)=3.08398 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=1: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=2: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 j=3: ( 0, 1.12622e+307); ( 0, 1.12622e+307); yl+yh= 1.12622e+307 3. after ADD1(M): yl,yh = ( 0, 1.45046e+307); yl+yh= 1.45046e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.50524e+306); yl+yh= 4.50524e+306 ebd0(x=1e+307, M=3.27764e+306): M/x = (r=0.655528822386676) * 2^(e=-1); i=40, f=1560, fg=f*2^-(e+10)=3.04688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=1: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=2: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 j=3: ( 0, 1.11412e+307); ( 0, 1.11412e+307); yl+yh= 1.11412e+307 3. after ADD1(M): yl,yh = ( 0, 1.44188e+307); yl+yh= 1.44188e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.43225e+306); yl+yh= 4.43225e+306 ebd0(x=1e+307, M=3.31334e+306): M/x = (r=0.662667063248778) * 2^(e=-1); i=42, f=1542, fg=f*2^-(e+10)=3.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=1: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=2: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 j=3: ( 0, 1.10251e+307); ( 0, 1.10251e+307); yl+yh= 1.10251e+307 3. after ADD1(M): yl,yh = ( 0, 1.43385e+307); yl+yh= 1.43385e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.35963e+306); yl+yh= 4.35963e+306 ebd0(x=1e+307, M=3.34942e+306): M/x = (r=0.669883034457535) * 2^(e=-1); i=43, f=1533, fg=f*2^-(e+10)=2.99414 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=1: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=2: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 j=3: ( 0, 1.09666e+307); ( 0, 1.09666e+307); yl+yh= 1.09666e+307 3. after ADD1(M): yl,yh = ( 0, 1.4316e+307); yl+yh= 1.4316e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.28741e+306); yl+yh= 4.28741e+306 ebd0(x=1e+307, M=3.38589e+306): M/x = (r=0.677177582440924) * 2^(e=-1); i=45, f=1515, fg=f*2^-(e+10)=2.95898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=1: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=2: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 j=3: ( 0, 1.08485e+307); ( 0, 1.08485e+307); yl+yh= 1.08485e+307 3. after ADD1(M): yl,yh = ( 0, 1.42344e+307); yl+yh= 1.42344e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.21558e+306); yl+yh= 4.21558e+306 ebd0(x=1e+307, M=3.42276e+306): M/x = (r=0.684551562843922) * 2^(e=-1); i=47, f=1498, fg=f*2^-(e+10)=2.92578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=1: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=2: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 j=3: ( 0, 1.07356e+307); ( 0, 1.07356e+307); yl+yh= 1.07356e+307 3. after ADD1(M): yl,yh = ( 0, 1.41584e+307); yl+yh= 1.41584e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14414e+306); yl+yh= 4.14414e+306 ebd0(x=1e+307, M=3.46003e+306): M/x = (r=0.692005840628868) * 2^(e=-1); i=49, f=1481, fg=f*2^-(e+10)=2.89258 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=1: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=2: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 j=3: ( 0, 1.06215e+307); ( 0, 1.06215e+307); yl+yh= 1.06215e+307 3. after ADD1(M): yl,yh = ( 0, 1.40815e+307); yl+yh= 1.40815e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.07311e+306); yl+yh= 4.07311e+306 ebd0(x=1e+307, M=3.49771e+306): M/x = (r=0.699541290176923) * 2^(e=-1); i=51, f=1464, fg=f*2^-(e+10)=2.85938 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=1: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=2: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 j=3: ( 0, 1.0506e+307); ( 0, 1.0506e+307); yl+yh= 1.0506e+307 3. after ADD1(M): yl,yh = ( 0, 1.40037e+307); yl+yh= 1.40037e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.00248e+306); yl+yh= 4.00248e+306 ebd0(x=1e+307, M=3.53579e+306): M/x = (r=0.707158795390635) * 2^(e=-1); i=53, f=1448, fg=f*2^-(e+10)=2.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=1: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=2: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 j=3: ( 0, 1.03961e+307); ( 0, 1.03961e+307); yl+yh= 1.03961e+307 3. after ADD1(M): yl,yh = ( 0, 1.39319e+307); yl+yh= 1.39319e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.93227e+306); yl+yh= 3.93227e+306 ebd0(x=1e+307, M=3.5743e+306): M/x = (r=0.71485924979762) * 2^(e=-1); i=55, f=1432, fg=f*2^-(e+10)=2.79688 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=1: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=2: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 j=3: ( 0, 1.0285e+307); ( 0, 1.0285e+307); yl+yh= 1.0285e+307 3. after ADD1(M): yl,yh = ( 0, 1.38593e+307); yl+yh= 1.38593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.86246e+306); yl+yh= 3.86246e+306 ebd0(x=1e+307, M=3.61322e+306): M/x = (r=0.72264355665537) * 2^(e=-1); i=57, f=1417, fg=f*2^-(e+10)=2.76758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=1: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=2: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 j=3: ( 0, 1.01797e+307); ( 0, 1.01797e+307); yl+yh= 1.01797e+307 3. after ADD1(M): yl,yh = ( 0, 1.37929e+307); yl+yh= 1.37929e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.79308e+306); yl+yh= 3.79308e+306 ebd0(x=1e+307, M=3.65256e+306): M/x = (r=0.730512629057209) * 2^(e=-1); i=59, f=1402, fg=f*2^-(e+10)=2.73828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=1: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=2: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 j=3: ( 0, 1.00733e+307); ( 0, 1.00733e+307); yl+yh= 1.00733e+307 3. after ADD1(M): yl,yh = ( 0, 1.37259e+307); yl+yh= 1.37259e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.72412e+306); yl+yh= 3.72412e+306 ebd0(x=1e+307, M=3.69234e+306): M/x = (r=0.738467390039392) * 2^(e=-1); i=61, f=1387, fg=f*2^-(e+10)=2.70898 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=1: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=2: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 j=3: ( 0, 9.96574e+306); ( 0, 9.96574e+306); yl+yh= 9.96574e+306 3. after ADD1(M): yl,yh = ( 0, 1.36581e+307); yl+yh= 1.36581e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.65559e+306); yl+yh= 3.65559e+306 ebd0(x=1e+307, M=3.73254e+306): M/x = (r=0.746508772689384) * 2^(e=-1); i=63, f=1372, fg=f*2^-(e+10)=2.67969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=1: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=2: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 j=3: ( 0, 9.857e+306); ( 0, 9.857e+306); yl+yh= 9.857e+306 3. after ADD1(M): yl,yh = ( 0, 1.35895e+307); yl+yh= 1.35895e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.58749e+306); yl+yh= 3.58749e+306 ebd0(x=1e+307, M=3.77319e+306): M/x = (r=0.754637720255303) * 2^(e=-1); i=65, f=1358, fg=f*2^-(e+10)=2.65234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=1: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=2: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 j=3: ( 0, 9.75444e+306); ( 0, 9.75444e+306); yl+yh= 9.75444e+306 3. after ADD1(M): yl,yh = ( 0, 1.35276e+307); yl+yh= 1.35276e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.51984e+306); yl+yh= 3.51984e+306 ebd0(x=1e+307, M=3.81428e+306): M/x = (r=0.762855186256566) * 2^(e=-1); i=67, f=1344, fg=f*2^-(e+10)=2.625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=1: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=2: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 j=3: ( 0, 9.65082e+306); ( 0, 9.65082e+306); yl+yh= 9.65082e+306 3. after ADD1(M): yl,yh = ( 0, 1.34651e+307); yl+yh= 1.34651e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.45262e+306); yl+yh= 3.45262e+306 ebd0(x=1e+307, M=3.85581e+306): M/x = (r=0.771162134595737) * 2^(e=-1); i=69, f=1331, fg=f*2^-(e+10)=2.59961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=1: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=2: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 j=3: ( 0, 9.55364e+306); ( 0, 9.55364e+306); yl+yh= 9.55364e+306 3. after ADD1(M): yl,yh = ( 0, 1.34095e+307); yl+yh= 1.34095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.38585e+306); yl+yh= 3.38585e+306 ebd0(x=1e+307, M=3.8978e+306): M/x = (r=0.77955953967159) * 2^(e=-1); i=72, f=1311, fg=f*2^-(e+10)=2.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=1: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=2: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 j=3: ( 0, 9.40223e+306); ( 0, 9.40223e+306); yl+yh= 9.40223e+306 3. after ADD1(M): yl,yh = ( 0, 1.33e+307); yl+yh= 1.33e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.31953e+306); yl+yh= 3.31953e+306 ebd0(x=1e+307, M=3.94024e+306): M/x = (r=0.788048386493405) * 2^(e=-1); i=74, f=1298, fg=f*2^-(e+10)=2.53516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=1: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=2: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 j=3: ( 0, 9.30256e+306); ( 0, 9.30256e+306); yl+yh= 9.30256e+306 3. after ADD1(M): yl,yh = ( 0, 1.32428e+307); yl+yh= 1.32428e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.25367e+306); yl+yh= 3.25367e+306 ebd0(x=1e+307, M=3.98315e+306): M/x = (r=0.796629670796513) * 2^(e=-1); i=76, f=1285, fg=f*2^-(e+10)=2.50977 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=1: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=2: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 j=3: ( 0, 9.20189e+306); ( 0, 9.20189e+306); yl+yh= 9.20189e+306 3. after ADD1(M): yl,yh = ( 0, 1.3185e+307); yl+yh= 1.3185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.18827e+306); yl+yh= 3.18827e+306 ebd0(x=1e+307, M=4.02652e+306): M/x = (r=0.805304399159088) * 2^(e=-1); i=78, f=1273, fg=f*2^-(e+10)=2.48633 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=1: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=2: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 j=3: ( 0, 9.10808e+306); ( 0, 9.10808e+306); yl+yh= 9.10808e+306 3. after ADD1(M): yl,yh = ( 0, 1.31346e+307); yl+yh= 1.31346e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.12334e+306); yl+yh= 3.12334e+306 ebd0(x=1e+307, M=4.07037e+306): M/x = (r=0.814073589120224) * 2^(e=-1); i=80, f=1260, fg=f*2^-(e+10)=2.46094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=1: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=2: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 j=3: ( 0, 9.00544e+306); ( 0, 9.00544e+306); yl+yh= 9.00544e+306 3. after ADD1(M): yl,yh = ( 0, 1.30758e+307); yl+yh= 1.30758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.05888e+306); yl+yh= 3.05888e+306 ebd0(x=1e+307, M=4.11469e+306): M/x = (r=0.822938269299289) * 2^(e=-1); i=83, f=1242, fg=f*2^-(e+10)=2.42578 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=1: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=2: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 j=3: ( 0, 8.86155e+306); ( 0, 8.86155e+306); yl+yh= 8.86155e+306 3. after ADD1(M): yl,yh = ( 0, 1.29762e+307); yl+yh= 1.29762e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.9949e+306); yl+yh= 2.9949e+306 ebd0(x=1e+307, M=4.1595e+306): M/x = (r=0.83189947951658) * 2^(e=-1); i=85, f=1231, fg=f*2^-(e+10)=2.4043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, 8.77257e+306); yl+yh= 8.77257e+306 j=1: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=2: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 j=3: ( 0, 8.77258e+306); ( 0, 8.77258e+306); yl+yh= 8.77258e+306 3. after ADD1(M): yl,yh = ( 0, 1.29321e+307); yl+yh= 1.29321e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.93141e+306); yl+yh= 2.93141e+306 ebd0(x=1e+307, M=4.20479e+306): M/x = (r=0.840958270915297) * 2^(e=-1); i=87, f=1219, fg=f*2^-(e+10)=2.38086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=1: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=2: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 j=3: ( 0, 8.67462e+306); ( 0, 8.67462e+306); yl+yh= 8.67462e+306 3. after ADD1(M): yl,yh = ( 0, 1.28794e+307); yl+yh= 1.28794e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.8684e+306); yl+yh= 2.8684e+306 ebd0(x=1e+307, M=4.25058e+306): M/x = (r=0.850115706084837) * 2^(e=-1); i=90, f=1202, fg=f*2^-(e+10)=2.34766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=1: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=2: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 j=3: ( 0, 8.5342e+306); ( 0, 8.5342e+306); yl+yh= 8.5342e+306 3. after ADD1(M): yl,yh = ( 0, 1.27848e+307); yl+yh= 1.27848e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.80588e+306); yl+yh= 2.80588e+306 ebd0(x=1e+307, M=4.29686e+306): M/x = (r=0.859372859185438) * 2^(e=-1); i=92, f=1192, fg=f*2^-(e+10)=2.32812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=1: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=2: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 j=3: ( 0, 8.45063e+306); ( 0, 8.45063e+306); yl+yh= 8.45063e+306 3. after ADD1(M): yl,yh = ( 0, 1.27475e+307); yl+yh= 1.27475e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.74386e+306); yl+yh= 2.74386e+306 ebd0(x=1e+307, M=4.34365e+306): M/x = (r=0.868730816074176) * 2^(e=-1); i=94, f=1181, fg=f*2^-(e+10)=2.30664 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=1: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=2: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 j=3: ( 0, 8.35794e+306); ( 0, 8.35794e+306); yl+yh= 8.35794e+306 3. after ADD1(M): yl,yh = ( 0, 1.27016e+307); yl+yh= 1.27016e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.68235e+306); yl+yh= 2.68235e+306 ebd0(x=1e+307, M=4.39095e+306): M/x = (r=0.878190674432335) * 2^(e=-1); i=97, f=1165, fg=f*2^-(e+10)=2.27539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=1: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=2: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 j=3: ( 0, 8.22152e+306); ( 0, 8.22152e+306); yl+yh= 8.22152e+306 3. after ADD1(M): yl,yh = ( 0, 1.26125e+307); yl+yh= 1.26125e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62134e+306); yl+yh= 2.62134e+306 ebd0(x=1e+307, M=4.43877e+306): M/x = (r=0.887753543894164) * 2^(e=-1); i=99, f=1155, fg=f*2^-(e+10)=2.25586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=1: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=2: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 j=3: ( 0, 8.13532e+306); ( 0, 8.13532e+306); yl+yh= 8.13532e+306 3. after ADD1(M): yl,yh = ( 0, 1.25741e+307); yl+yh= 1.25741e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.56085e+306); yl+yh= 2.56085e+306 ebd0(x=1e+307, M=4.4871e+306): M/x = (r=0.897420546177039) * 2^(e=-1); i=102, f=1140, fg=f*2^-(e+10)=2.22656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=1: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=2: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 j=3: ( 0, 8.00459e+306); ( 0, 8.00459e+306); yl+yh= 8.00459e+306 3. after ADD1(M): yl,yh = ( 0, 1.24917e+307); yl+yh= 1.24917e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.50088e+306); yl+yh= 2.50088e+306 ebd0(x=1e+307, M=4.53596e+306): M/x = (r=0.907192815213034) * 2^(e=-1); i=104, f=1130, fg=f*2^-(e+10)=2.20703 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=1: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=2: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 j=3: ( 0, 7.91649e+306); ( 0, 7.91649e+306); yl+yh= 7.91649e+306 3. after ADD1(M): yl,yh = ( 0, 1.24525e+307); yl+yh= 1.24525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.44144e+306); yl+yh= 2.44144e+306 ebd0(x=1e+307, M=4.58536e+306): M/x = (r=0.917071497281936) * 2^(e=-1); i=107, f=1116, fg=f*2^-(e+10)=2.17969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=1: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=2: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 j=3: ( 0, 7.79182e+306); ( 0, 7.79182e+306); yl+yh= 7.79182e+306 3. after ADD1(M): yl,yh = ( 0, 1.23772e+307); yl+yh= 1.23772e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.38253e+306); yl+yh= 2.38253e+306 ebd0(x=1e+307, M=4.63529e+306): M/x = (r=0.9270577511457) * 2^(e=-1); i=109, f=1106, fg=f*2^-(e+10)=2.16016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=1: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=2: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 j=3: ( 0, 7.70181e+306); ( 0, 7.70181e+306); yl+yh= 7.70181e+306 3. after ADD1(M): yl,yh = ( 0, 1.23371e+307); yl+yh= 1.23371e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.32415e+306); yl+yh= 2.32415e+306 ebd0(x=1e+307, M=4.68576e+306): M/x = (r=0.937152748184372) * 2^(e=-1); i=112, f=1092, fg=f*2^-(e+10)=2.13281 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=1: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=2: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 j=3: ( 0, 7.57442e+306); ( 0, 7.57442e+306); yl+yh= 7.57442e+306 3. after ADD1(M): yl,yh = ( 0, 1.22602e+307); yl+yh= 1.22602e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.26633e+306); yl+yh= 2.26633e+306 ebd0(x=1e+307, M=4.73679e+306): M/x = (r=0.947357672533489) * 2^(e=-1); i=115, f=1079, fg=f*2^-(e+10)=2.10742 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=1: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=2: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 j=3: ( 0, 7.45467e+306); ( 0, 7.45467e+306); yl+yh= 7.45467e+306 3. after ADD1(M): yl,yh = ( 0, 1.21915e+307); yl+yh= 1.21915e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.20905e+306); yl+yh= 2.20905e+306 ebd0(x=1e+307, M=4.78837e+306): M/x = (r=0.957673721222979) * 2^(e=-1); i=117, f=1070, fg=f*2^-(e+10)=2.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=1: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=2: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 j=3: ( 0, 7.3709e+306); ( 0, 7.3709e+306); yl+yh= 7.3709e+306 3. after ADD1(M): yl,yh = ( 0, 1.21593e+307); yl+yh= 1.21593e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.15232e+306); yl+yh= 2.15232e+306 ebd0(x=1e+307, M=4.84051e+306): M/x = (r=0.968102104317573) * 2^(e=-1); i=120, f=1057, fg=f*2^-(e+10)=2.06445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=1: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=2: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 j=3: ( 0, 7.24866e+306); ( 0, 7.24866e+306); yl+yh= 7.24866e+306 3. after ADD1(M): yl,yh = ( 0, 1.20892e+307); yl+yh= 1.20892e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09616e+306); yl+yh= 2.09616e+306 ebd0(x=1e+307, M=4.89322e+306): M/x = (r=0.97864404505874) * 2^(e=-1); i=123, f=1044, fg=f*2^-(e+10)=2.03906 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=1: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=2: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 j=3: ( 0, 7.12493e+306); ( 0, 7.12493e+306); yl+yh= 7.12493e+306 3. after ADD1(M): yl,yh = ( 0, 1.20181e+307); yl+yh= 1.20181e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.04056e+306); yl+yh= 2.04056e+306 ebd0(x=1e+307, M=4.9465e+306): M/x = (r=0.989300780008178) * 2^(e=-1); i=125, f=1036, fg=f*2^-(e+10)=2.02344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=1: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=2: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 j=3: ( 0, 7.04798e+306); ( 0, 7.04798e+306); yl+yh= 7.04798e+306 3. after ADD1(M): yl,yh = ( 0, 1.19945e+307); yl+yh= 1.19945e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.98554e+306); yl+yh= 1.98554e+306 ebd0(x=1e+307, M=5.00037e+306): M/x = (r=0.500036779596429) * 2^(e=0); i=0, f=2048, fg=f*2^-(e+10)=2 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=1: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=2: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 j=3: ( 0, 6.93147e+306); ( 0, 6.93147e+306); yl+yh= 6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.19318e+307); yl+yh= 1.19318e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.9311e+306); yl+yh= 1.9311e+306 ebd0(x=1e+307, M=5.05482e+306): M/x = (r=0.505481823125825) * 2^(e=0); i=1, f=2032, fg=f*2^-(e+10)=1.98438 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=1: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=2: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 j=3: ( 0, 6.85309e+306); ( 0, 6.85309e+306); yl+yh= 6.85309e+306 3. after ADD1(M): yl,yh = ( 0, 1.19079e+307); yl+yh= 1.19079e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.87725e+306); yl+yh= 1.87725e+306 ebd0(x=1e+307, M=5.10986e+306): M/x = (r=0.510986159291777) * 2^(e=0); i=3, f=2001, fg=f*2^-(e+10)=1.9541 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=1: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=2: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 j=3: ( 0, 6.69932e+306); ( 0, 6.69932e+306); yl+yh= 6.69932e+306 3. after ADD1(M): yl,yh = ( 0, 1.18092e+307); yl+yh= 1.18092e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.82399e+306); yl+yh= 1.82399e+306 ebd0(x=1e+307, M=5.1655e+306): M/x = (r=0.516550433748765) * 2^(e=0); i=4, f=1986, fg=f*2^-(e+10)=1.93945 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=1: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=2: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 j=3: ( 0, 6.62408e+306); ( 0, 6.62408e+306); yl+yh= 6.62408e+306 3. after ADD1(M): yl,yh = ( 0, 1.17896e+307); yl+yh= 1.17896e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77133e+306); yl+yh= 1.77133e+306 ebd0(x=1e+307, M=5.22175e+306): M/x = (r=0.522175299181986) * 2^(e=0); i=6, f=1956, fg=f*2^-(e+10)=1.91016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=1: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=2: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 j=3: ( 0, 6.47188e+306); ( 0, 6.47188e+306); yl+yh= 6.47188e+306 3. after ADD1(M): yl,yh = ( 0, 1.16936e+307); yl+yh= 1.16936e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.71927e+306); yl+yh= 1.71927e+306 ebd0(x=1e+307, M=5.27861e+306): M/x = (r=0.52786141538391) * 2^(e=0); i=7, f=1942, fg=f*2^-(e+10)=1.89648 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=1: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=2: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 j=3: ( 0, 6.40002e+306); ( 0, 6.40002e+306); yl+yh= 6.40002e+306 3. after ADD1(M): yl,yh = ( 0, 1.16786e+307); yl+yh= 1.16786e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.66783e+306); yl+yh= 1.66783e+306 ebd0(x=1e+307, M=5.33609e+306): M/x = (r=0.533609449331681) * 2^(e=0); i=9, f=1913, fg=f*2^-(e+10)=1.86816 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=1: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=2: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 j=3: ( 0, 6.24961e+306); ( 0, 6.24961e+306); yl+yh= 6.24961e+306 3. after ADD1(M): yl,yh = ( 0, 1.15857e+307); yl+yh= 1.15857e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61701e+306); yl+yh= 1.61701e+306 ebd0(x=1e+307, M=5.3942e+306): M/x = (r=0.539420075265344) * 2^(e=0); i=10, f=1900, fg=f*2^-(e+10)=1.85547 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=1: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=2: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 j=3: ( 0, 6.18138e+306); ( 0, 6.18138e+306); yl+yh= 6.18138e+306 3. after ADD1(M): yl,yh = ( 0, 1.15756e+307); yl+yh= 1.15756e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.56681e+306); yl+yh= 1.56681e+306 ebd0(x=1e+307, M=5.45294e+306): M/x = (r=0.545293974766939) * 2^(e=0); i=12, f=1872, fg=f*2^-(e+10)=1.82812 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=1: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=2: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 j=3: ( 0, 6.03296e+306); ( 0, 6.03296e+306); yl+yh= 6.03296e+306 3. after ADD1(M): yl,yh = ( 0, 1.14859e+307); yl+yh= 1.14859e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51724e+306); yl+yh= 1.51724e+306 ebd0(x=1e+307, M=5.51232e+306): M/x = (r=0.551231836840444) * 2^(e=0); i=13, f=1859, fg=f*2^-(e+10)=1.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=1: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=2: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 j=3: ( 0, 5.96322e+306); ( 0, 5.96322e+306); yl+yh= 5.96322e+306 3. after ADD1(M): yl,yh = ( 0, 1.14755e+307); yl+yh= 1.14755e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.46832e+306); yl+yh= 1.46832e+306 ebd0(x=1e+307, M=5.57234e+306): M/x = (r=0.557234357992604) * 2^(e=0); i=15, f=1833, fg=f*2^-(e+10)=1.79004 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=1: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=2: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 j=3: ( 0, 5.82241e+306); ( 0, 5.82241e+306); yl+yh= 5.82241e+306 3. after ADD1(M): yl,yh = ( 0, 1.13948e+307); yl+yh= 1.13948e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42004e+306); yl+yh= 1.42004e+306 ebd0(x=1e+307, M=5.63302e+306): M/x = (r=0.563302242314621) * 2^(e=0); i=16, f=1820, fg=f*2^-(e+10)=1.77734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=1: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=2: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 j=3: ( 0, 5.75121e+306); ( 0, 5.75121e+306); yl+yh= 5.75121e+306 3. after ADD1(M): yl,yh = ( 0, 1.13842e+307); yl+yh= 1.13842e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.37241e+306); yl+yh= 1.37241e+306 ebd0(x=1e+307, M=5.69436e+306): M/x = (r=0.56943620156475) * 2^(e=0); i=18, f=1796, fg=f*2^-(e+10)=1.75391 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=1: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=2: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 j=3: ( 0, 5.61846e+306); ( 0, 5.61846e+306); yl+yh= 5.61846e+306 3. after ADD1(M): yl,yh = ( 0, 1.13128e+307); yl+yh= 1.13128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.32545e+306); yl+yh= 1.32545e+306 ebd0(x=1e+307, M=5.75637e+306): M/x = (r=0.575636955251782) * 2^(e=0); i=19, f=1783, fg=f*2^-(e+10)=1.74121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=1: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=2: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 j=3: ( 0, 5.54583e+306); ( 0, 5.54583e+306); yl+yh= 5.54583e+306 3. after ADD1(M): yl,yh = ( 0, 1.13022e+307); yl+yh= 1.13022e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27915e+306); yl+yh= 1.27915e+306 ebd0(x=1e+307, M=5.81905e+306): M/x = (r=0.581905230719448) * 2^(e=0); i=21, f=1759, fg=f*2^-(e+10)=1.71777 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=1: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=2: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 j=3: ( 0, 5.41029e+306); ( 0, 5.41029e+306); yl+yh= 5.41029e+306 3. after ADD1(M): yl,yh = ( 0, 1.12293e+307); yl+yh= 1.12293e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.23353e+306); yl+yh= 1.23353e+306 ebd0(x=1e+307, M=5.88242e+306): M/x = (r=0.588241763231733) * 2^(e=0); i=23, f=1736, fg=f*2^-(e+10)=1.69531 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=1: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=2: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 j=3: ( 0, 5.27871e+306); ( 0, 5.27871e+306); yl+yh= 5.27871e+306 3. after ADD1(M): yl,yh = ( 0, 1.11611e+307); yl+yh= 1.11611e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.18859e+306); yl+yh= 1.18859e+306 ebd0(x=1e+307, M=5.94647e+306): M/x = (r=0.59464729605912) * 2^(e=0); i=24, f=1725, fg=f*2^-(e+10)=1.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=1: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=2: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 j=3: ( 0, 5.21512e+306); ( 0, 5.21512e+306); yl+yh= 5.21512e+306 3. after ADD1(M): yl,yh = ( 0, 1.11616e+307); yl+yh= 1.11616e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14434e+306); yl+yh= 1.14434e+306 ebd0(x=1e+307, M=6.01123e+306): M/x = (r=0.601122580565778) * 2^(e=0); i=26, f=1702, fg=f*2^-(e+10)=1.66211 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=1: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=2: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 j=3: ( 0, 5.08088e+306); ( 0, 5.08088e+306); yl+yh= 5.08088e+306 3. after ADD1(M): yl,yh = ( 0, 1.10921e+307); yl+yh= 1.10921e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10079e+306); yl+yh= 1.10079e+306 ebd0(x=1e+307, M=6.07668e+306): M/x = (r=0.607668376297695) * 2^(e=0); i=28, f=1680, fg=f*2^-(e+10)=1.64062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=1: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=2: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 j=3: ( 0, 4.95082e+306); ( 0, 4.95082e+306); yl+yh= 4.95082e+306 3. after ADD1(M): yl,yh = ( 0, 1.10275e+307); yl+yh= 1.10275e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05794e+306); yl+yh= 1.05794e+306 ebd0(x=1e+307, M=6.14285e+306): M/x = (r=0.614285451071773) * 2^(e=0); i=29, f=1670, fg=f*2^-(e+10)=1.63086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=1: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=2: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 j=3: ( 0, 4.89109e+306); ( 0, 4.89109e+306); yl+yh= 4.89109e+306 3. after ADD1(M): yl,yh = ( 0, 1.10339e+307); yl+yh= 1.10339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.01581e+306); yl+yh= 1.01581e+306 ebd0(x=1e+307, M=6.20975e+306): M/x = (r=0.620974581065892) * 2^(e=0); i=31, f=1649, fg=f*2^-(e+10)=1.61035 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=1: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=2: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 j=3: ( 0, 4.76453e+306); ( 0, 4.76453e+306); yl+yh= 4.76453e+306 3. after ADD1(M): yl,yh = ( 0, 1.09743e+307); yl+yh= 1.09743e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.74397e+305); yl+yh= 9.74397e+305 ebd0(x=1e+307, M=6.27737e+306): M/x = (r=0.627736550909953) * 2^(e=0); i=33, f=1628, fg=f*2^-(e+10)=1.58984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=1: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=2: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 j=3: ( 0, 4.63638e+306); ( 0, 4.63638e+306); yl+yh= 4.63638e+306 3. after ADD1(M): yl,yh = ( 0, 1.09137e+307); yl+yh= 1.09137e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.33713e+305); yl+yh= 9.33713e+305 ebd0(x=1e+307, M=6.34572e+306): M/x = (r=0.634572153777919) * 2^(e=0); i=34, f=1618, fg=f*2^-(e+10)=1.58008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=1: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=2: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 j=3: ( 0, 4.57478e+306); ( 0, 4.57478e+306); yl+yh= 4.57478e+306 3. after ADD1(M): yl,yh = ( 0, 1.09205e+307); yl+yh= 1.09205e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.93764e+305); yl+yh= 8.93764e+305 ebd0(x=1e+307, M=6.41482e+306): M/x = (r=0.641482191480851) * 2^(e=0); i=36, f=1598, fg=f*2^-(e+10)=1.56055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=1: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=2: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 j=3: ( 0, 4.45037e+306); ( 0, 4.45037e+306); yl+yh= 4.45037e+306 3. after ADD1(M): yl,yh = ( 0, 1.08652e+307); yl+yh= 1.08652e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.5456e+305); yl+yh= 8.5456e+305 ebd0(x=1e+307, M=6.48467e+306): M/x = (r=0.648467474560957) * 2^(e=0); i=38, f=1579, fg=f*2^-(e+10)=1.54199 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=1: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=2: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 j=3: ( 0, 4.33075e+306); ( 0, 4.33075e+306); yl+yh= 4.33075e+306 3. after ADD1(M): yl,yh = ( 0, 1.08154e+307); yl+yh= 1.08154e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.16109e+305); yl+yh= 8.16109e+305 ebd0(x=1e+307, M=6.55529e+306): M/x = (r=0.655528822386676) * 2^(e=0); i=40, f=1560, fg=f*2^-(e+10)=1.52344 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=1: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=2: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 j=3: ( 0, 4.2097e+306); ( 0, 4.2097e+306); yl+yh= 4.2097e+306 3. after ADD1(M): yl,yh = ( 0, 1.0765e+307); yl+yh= 1.0765e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.78418e+305); yl+yh= 7.78418e+305 ebd0(x=1e+307, M=6.62667e+306): M/x = (r=0.662667063248778) * 2^(e=0); i=42, f=1542, fg=f*2^-(e+10)=1.50586 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=1: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=2: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 j=3: ( 0, 4.09366e+306); ( 0, 4.09366e+306); yl+yh= 4.09366e+306 3. after ADD1(M): yl,yh = ( 0, 1.07203e+307); yl+yh= 1.07203e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.41496e+305); yl+yh= 7.41496e+305 ebd0(x=1e+307, M=6.69883e+306): M/x = (r=0.669883034457535) * 2^(e=0); i=43, f=1533, fg=f*2^-(e+10)=1.49707 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=1: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=2: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 j=3: ( 0, 4.03514e+306); ( 0, 4.03514e+306); yl+yh= 4.03514e+306 3. after ADD1(M): yl,yh = ( 0, 1.0734e+307); yl+yh= 1.0734e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.05352e+305); yl+yh= 7.05352e+305 ebd0(x=1e+307, M=6.77178e+306): M/x = (r=0.677177582440924) * 2^(e=0); i=45, f=1515, fg=f*2^-(e+10)=1.47949 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=1: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=2: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 j=3: ( 0, 3.91701e+306); ( 0, 3.91701e+306); yl+yh= 3.91701e+306 3. after ADD1(M): yl,yh = ( 0, 1.06888e+307); yl+yh= 1.06888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.69993e+305); yl+yh= 6.69993e+305 ebd0(x=1e+307, M=6.84552e+306): M/x = (r=0.684551562843922) * 2^(e=0); i=47, f=1498, fg=f*2^-(e+10)=1.46289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=1: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=2: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 j=3: ( 0, 3.80415e+306); ( 0, 3.80415e+306); yl+yh= 3.80415e+306 3. after ADD1(M): yl,yh = ( 0, 1.06497e+307); yl+yh= 1.06497e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.35429e+305); yl+yh= 6.35429e+305 ebd0(x=1e+307, M=6.92006e+306): M/x = (r=0.692005840628868) * 2^(e=0); i=49, f=1481, fg=f*2^-(e+10)=1.44629 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=1: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=2: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 j=3: ( 0, 3.69001e+306); ( 0, 3.69001e+306); yl+yh= 3.69001e+306 3. after ADD1(M): yl,yh = ( 0, 1.06101e+307); yl+yh= 1.06101e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.01667e+305); yl+yh= 6.01667e+305 ebd0(x=1e+307, M=6.99541e+306): M/x = (r=0.699541290176923) * 2^(e=0); i=51, f=1464, fg=f*2^-(e+10)=1.42969 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=1: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=2: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 j=3: ( 0, 3.57456e+306); ( 0, 3.57456e+306); yl+yh= 3.57456e+306 3. after ADD1(M): yl,yh = ( 0, 1.057e+307); yl+yh= 1.057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.68717e+305); yl+yh= 5.68717e+305 ebd0(x=1e+307, M=7.07159e+306): M/x = (r=0.707158795390635) * 2^(e=0); i=53, f=1448, fg=f*2^-(e+10)=1.41406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=1: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=2: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 j=3: ( 0, 3.46467e+306); ( 0, 3.46467e+306); yl+yh= 3.46467e+306 3. after ADD1(M): yl,yh = ( 0, 1.05363e+307); yl+yh= 1.05363e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36588e+305); yl+yh= 5.36588e+305 ebd0(x=1e+307, M=7.14859e+306): M/x = (r=0.71485924979762) * 2^(e=0); i=55, f=1432, fg=f*2^-(e+10)=1.39844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=1: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=2: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 j=3: ( 0, 3.35356e+306); ( 0, 3.35356e+306); yl+yh= 3.35356e+306 3. after ADD1(M): yl,yh = ( 0, 1.05021e+307); yl+yh= 1.05021e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.05289e+305); yl+yh= 5.05289e+305 ebd0(x=1e+307, M=7.22644e+306): M/x = (r=0.72264355665537) * 2^(e=0); i=57, f=1417, fg=f*2^-(e+10)=1.38379 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=1: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=2: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 j=3: ( 0, 3.24825e+306); ( 0, 3.24825e+306); yl+yh= 3.24825e+306 3. after ADD1(M): yl,yh = ( 0, 1.04747e+307); yl+yh= 1.04747e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.74827e+305); yl+yh= 4.74827e+305 ebd0(x=1e+307, M=7.30513e+306): M/x = (r=0.730512629057209) * 2^(e=0); i=59, f=1402, fg=f*2^-(e+10)=1.36914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=1: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=2: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 j=3: ( 0, 3.14183e+306); ( 0, 3.14183e+306); yl+yh= 3.14183e+306 3. after ADD1(M): yl,yh = ( 0, 1.0447e+307); yl+yh= 1.0447e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.45214e+305); yl+yh= 4.45214e+305 ebd0(x=1e+307, M=7.38467e+306): M/x = (r=0.738467390039392) * 2^(e=0); i=61, f=1387, fg=f*2^-(e+10)=1.35449 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=1: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=2: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 j=3: ( 0, 3.03427e+306); ( 0, 3.03427e+306); yl+yh= 3.03427e+306 3. after ADD1(M): yl,yh = ( 0, 1.04189e+307); yl+yh= 1.04189e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.16457e+305); yl+yh= 4.16457e+305 ebd0(x=1e+307, M=7.46509e+306): M/x = (r=0.746508772689384) * 2^(e=0); i=63, f=1372, fg=f*2^-(e+10)=1.33984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=1: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=2: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 j=3: ( 0, 2.92553e+306); ( 0, 2.92553e+306); yl+yh= 2.92553e+306 3. after ADD1(M): yl,yh = ( 0, 1.03906e+307); yl+yh= 1.03906e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88567e+305); yl+yh= 3.88567e+305 ebd0(x=1e+307, M=7.54638e+306): M/x = (r=0.754637720255303) * 2^(e=0); i=65, f=1358, fg=f*2^-(e+10)=1.32617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=1: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=2: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 j=3: ( 0, 2.82297e+306); ( 0, 2.82297e+306); yl+yh= 2.82297e+306 3. after ADD1(M): yl,yh = ( 0, 1.03693e+307); yl+yh= 1.03693e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.61552e+305); yl+yh= 3.61552e+305 ebd0(x=1e+307, M=7.62855e+306): M/x = (r=0.762855186256566) * 2^(e=0); i=67, f=1344, fg=f*2^-(e+10)=1.3125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, 2.71935e+306); yl+yh= 2.71935e+306 j=1: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=2: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 j=3: ( 0, 2.71934e+306); ( 0, 2.71934e+306); yl+yh= 2.71934e+306 3. after ADD1(M): yl,yh = ( 0, 1.03479e+307); yl+yh= 1.03479e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.35422e+305); yl+yh= 3.35422e+305 ebd0(x=1e+307, M=7.71162e+306): M/x = (r=0.771162134595737) * 2^(e=0); i=69, f=1331, fg=f*2^-(e+10)=1.2998 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=1: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=2: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 j=3: ( 0, 2.62217e+306); ( 0, 2.62217e+306); yl+yh= 2.62217e+306 3. after ADD1(M): yl,yh = ( 0, 1.03338e+307); yl+yh= 1.03338e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.10188e+305); yl+yh= 3.10188e+305 ebd0(x=1e+307, M=7.7956e+306): M/x = (r=0.77955953967159) * 2^(e=0); i=72, f=1311, fg=f*2^-(e+10)=1.28027 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=1: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=2: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 j=3: ( 0, 2.47076e+306); ( 0, 2.47076e+306); yl+yh= 2.47076e+306 3. after ADD1(M): yl,yh = ( 0, 1.02664e+307); yl+yh= 1.02664e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85858e+305); yl+yh= 2.85858e+305 ebd0(x=1e+307, M=7.88048e+306): M/x = (r=0.788048386493405) * 2^(e=0); i=74, f=1298, fg=f*2^-(e+10)=1.26758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=1: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=2: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 j=3: ( 0, 2.37109e+306); ( 0, 2.37109e+306); yl+yh= 2.37109e+306 3. after ADD1(M): yl,yh = ( 0, 1.02516e+307); yl+yh= 1.02516e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.62442e+305); yl+yh= 2.62442e+305 ebd0(x=1e+307, M=7.9663e+306): M/x = (r=0.796629670796513) * 2^(e=0); i=76, f=1285, fg=f*2^-(e+10)=1.25488 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=1: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=2: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 j=3: ( 0, 2.27042e+306); ( 0, 2.27042e+306); yl+yh= 2.27042e+306 3. after ADD1(M): yl,yh = ( 0, 1.02367e+307); yl+yh= 1.02367e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.3995e+305); yl+yh= 2.3995e+305 ebd0(x=1e+307, M=8.05304e+306): M/x = (r=0.805304399159088) * 2^(e=0); i=78, f=1273, fg=f*2^-(e+10)=1.24316 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=1: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=2: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 j=3: ( 0, 2.1766e+306); ( 0, 2.1766e+306); yl+yh= 2.1766e+306 3. after ADD1(M): yl,yh = ( 0, 1.02296e+307); yl+yh= 1.02296e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18393e+305); yl+yh= 2.18393e+305 ebd0(x=1e+307, M=8.14074e+306): M/x = (r=0.814073589120224) * 2^(e=0); i=80, f=1260, fg=f*2^-(e+10)=1.23047 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=1: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=2: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 j=3: ( 0, 2.07397e+306); ( 0, 2.07397e+306); yl+yh= 2.07397e+306 3. after ADD1(M): yl,yh = ( 0, 1.02147e+307); yl+yh= 1.02147e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.97781e+305); yl+yh= 1.97781e+305 ebd0(x=1e+307, M=8.22938e+306): M/x = (r=0.822938269299289) * 2^(e=0); i=83, f=1242, fg=f*2^-(e+10)=1.21289 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=1: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=2: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 j=3: ( 0, 1.93008e+306); ( 0, 1.93008e+306); yl+yh= 1.93008e+306 3. after ADD1(M): yl,yh = ( 0, 1.01595e+307); yl+yh= 1.01595e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.78124e+305); yl+yh= 1.78124e+305 ebd0(x=1e+307, M=8.31899e+306): M/x = (r=0.83189947951658) * 2^(e=0); i=85, f=1231, fg=f*2^-(e+10)=1.20215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=1: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=2: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 j=3: ( 0, 1.8411e+306); ( 0, 1.8411e+306); yl+yh= 1.8411e+306 3. after ADD1(M): yl,yh = ( 0, 1.01601e+307); yl+yh= 1.01601e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59431e+305); yl+yh= 1.59431e+305 ebd0(x=1e+307, M=8.40958e+306): M/x = (r=0.840958270915297) * 2^(e=0); i=87, f=1219, fg=f*2^-(e+10)=1.19043 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=1: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=2: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 j=3: ( 0, 1.74315e+306); ( 0, 1.74315e+306); yl+yh= 1.74315e+306 3. after ADD1(M): yl,yh = ( 0, 1.01527e+307); yl+yh= 1.01527e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.41715e+305); yl+yh= 1.41715e+305 ebd0(x=1e+307, M=8.50116e+306): M/x = (r=0.850115706084837) * 2^(e=0); i=90, f=1202, fg=f*2^-(e+10)=1.17383 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=1: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=2: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 j=3: ( 0, 1.60273e+306); ( 0, 1.60273e+306); yl+yh= 1.60273e+306 3. after ADD1(M): yl,yh = ( 0, 1.01039e+307); yl+yh= 1.01039e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.24985e+305); yl+yh= 1.24985e+305 ebd0(x=1e+307, M=8.59373e+306): M/x = (r=0.859372859185438) * 2^(e=0); i=92, f=1192, fg=f*2^-(e+10)=1.16406 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=1: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=2: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 j=3: ( 0, 1.51916e+306); ( 0, 1.51916e+306); yl+yh= 1.51916e+306 3. after ADD1(M): yl,yh = ( 0, 1.01129e+307); yl+yh= 1.01129e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09252e+305); yl+yh= 1.09252e+305 ebd0(x=1e+307, M=8.68731e+306): M/x = (r=0.868730816074176) * 2^(e=0); i=94, f=1181, fg=f*2^-(e+10)=1.15332 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=1: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=2: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 j=3: ( 0, 1.42647e+306); ( 0, 1.42647e+306); yl+yh= 1.42647e+306 3. after ADD1(M): yl,yh = ( 0, 1.01138e+307); yl+yh= 1.01138e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.45278e+304); yl+yh= 9.45278e+304 ebd0(x=1e+307, M=8.78191e+306): M/x = (r=0.878190674432335) * 2^(e=0); i=97, f=1165, fg=f*2^-(e+10)=1.1377 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=1: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=2: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 j=3: ( 0, 1.29005e+306); ( 0, 1.29005e+306); yl+yh= 1.29005e+306 3. after ADD1(M): yl,yh = ( 0, 1.0072e+307); yl+yh= 1.0072e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08221e+304); yl+yh= 8.08221e+304 ebd0(x=1e+307, M=8.87754e+306): M/x = (r=0.887753543894164) * 2^(e=0); i=99, f=1155, fg=f*2^-(e+10)=1.12793 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=1: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=2: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 j=3: ( 0, 1.20385e+306); ( 0, 1.20385e+306); yl+yh= 1.20385e+306 3. after ADD1(M): yl,yh = ( 0, 1.00814e+307); yl+yh= 1.00814e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.81466e+304); yl+yh= 6.81466e+304 ebd0(x=1e+307, M=8.97421e+306): M/x = (r=0.897420546177039) * 2^(e=0); i=102, f=1140, fg=f*2^-(e+10)=1.11328 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=1: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=2: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 j=3: ( 0, 1.07312e+306); ( 0, 1.07312e+306); yl+yh= 1.07312e+306 3. after ADD1(M): yl,yh = ( 0, 1.00473e+307); yl+yh= 1.00473e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.65124e+304); yl+yh= 5.65124e+304 ebd0(x=1e+307, M=9.07193e+306): M/x = (r=0.907192815213034) * 2^(e=0); i=104, f=1130, fg=f*2^-(e+10)=1.10352 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=1: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=2: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 j=3: ( 0, 9.85017e+305); ( 0, 9.85017e+305); yl+yh= 9.85017e+305 3. after ADD1(M): yl,yh = ( 0, 1.00569e+307); yl+yh= 1.00569e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.59308e+304); yl+yh= 4.59308e+304 ebd0(x=1e+307, M=9.17071e+306): M/x = (r=0.917071497281936) * 2^(e=0); i=107, f=1116, fg=f*2^-(e+10)=1.08984 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=1: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=2: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 j=3: ( 0, 8.60345e+305); ( 0, 8.60345e+305); yl+yh= 8.60345e+305 3. after ADD1(M): yl,yh = ( 0, 1.00311e+307); yl+yh= 1.00311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64134e+304); yl+yh= 3.64134e+304 ebd0(x=1e+307, M=9.27058e+306): M/x = (r=0.9270577511457) * 2^(e=0); i=109, f=1106, fg=f*2^-(e+10)=1.08008 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=1: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=2: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 j=3: ( 0, 7.70342e+305); ( 0, 7.70342e+305); yl+yh= 7.70342e+305 3. after ADD1(M): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79717e+304); yl+yh= 2.79717e+304 ebd0(x=1e+307, M=9.37153e+306): M/x = (r=0.937152748184372) * 2^(e=0); i=112, f=1092, fg=f*2^-(e+10)=1.06641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=1: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=2: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 j=3: ( 0, 6.42945e+305); ( 0, 6.42945e+305); yl+yh= 6.42945e+305 3. after ADD1(M): yl,yh = ( 0, 1.00145e+307); yl+yh= 1.00145e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.06174e+304); yl+yh= 2.06174e+304 ebd0(x=1e+307, M=9.47358e+306): M/x = (r=0.947357672533489) * 2^(e=0); i=115, f=1079, fg=f*2^-(e+10)=1.05371 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=1: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=2: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 j=3: ( 0, 5.23197e+305); ( 0, 5.23197e+305); yl+yh= 5.23197e+305 3. after ADD1(M): yl,yh = ( 0, 9.99677e+306); yl+yh= 9.99677e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 1.43624e+304); yl+yh= 1.43624e+304 ebd0(x=1e+307, M=9.57674e+306): M/x = (r=0.957673721222979) * 2^(e=0); i=117, f=1070, fg=f*2^-(e+10)=1.04492 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=1: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=2: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 j=3: ( 0, 4.39424e+305); ( 0, 4.39424e+305); yl+yh= 4.39424e+305 3. after ADD1(M): yl,yh = ( 0, 1.00162e+307); yl+yh= 1.00162e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.21864e+303); yl+yh= 9.21864e+303 ebd0(x=1e+307, M=9.68102e+306): M/x = (r=0.968102104317573) * 2^(e=0); i=120, f=1057, fg=f*2^-(e+10)=1.03223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=1: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=2: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 j=3: ( 0, 3.17184e+305); ( 0, 3.17184e+305); yl+yh= 3.17184e+305 3. after ADD1(M): yl,yh = ( 0, 9.99821e+306); yl+yh= 9.99821e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 5.19822e+303); yl+yh= 5.19822e+303 ebd0(x=1e+307, M=9.78644e+306): M/x = (r=0.97864404505874) * 2^(e=0); i=123, f=1044, fg=f*2^-(e+10)=1.01953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=1: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=2: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 j=3: ( 0, 1.93455e+305); ( 0, 1.93455e+305); yl+yh= 1.93455e+305 3. after ADD1(M): yl,yh = ( 0, 9.9799e+306); yl+yh= 9.9799e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.31338e+303); yl+yh= 2.31338e+303 ebd0(x=1e+307, M=9.89301e+306): M/x = (r=0.989300780008178) * 2^(e=0); i=125, f=1036, fg=f*2^-(e+10)=1.01172 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=1: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=2: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 j=3: ( 0, 1.1651e+305); ( 0, 1.1651e+305); yl+yh= 1.1651e+305 3. after ADD1(M): yl,yh = ( 0, 1.00095e+307); yl+yh= 1.00095e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.76482e+302); yl+yh= 5.76482e+302 ebd0(x=1e+307, M=1.00007e+307): M/x = (r=0.500036779596429) * 2^(e=1); i=0, f=2048, fg=f*2^-(e+10)=1 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 ___ fg = 1 ___ skipping further steps ebd0(x=1e+307, M=1.01096e+307): M/x = (r=0.505481823125825) * 2^(e=1); i=1, f=2032, fg=f*2^-(e+10)=0.992188 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, -7.83845e+304); yl+yh= -7.83845e+304 j=1: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=2: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 j=3: ( 0, -7.83849e+304); ( 0, -7.83849e+304); yl+yh= -7.83849e+304 3. after ADD1(M): yl,yh = ( 0, 1.00313e+307); yl+yh= 1.00313e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.96651e+302); yl+yh= 5.96651e+302 ebd0(x=1e+307, M=1.02197e+307): M/x = (r=0.510986159291777) * 2^(e=1); i=3, f=2001, fg=f*2^-(e+10)=0.977051 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, -2.32155e+305); yl+yh= -2.32155e+305 j=1: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=2: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 j=3: ( 0, -2.32156e+305); ( 0, -2.32156e+305); yl+yh= -2.32156e+305 3. after ADD1(M): yl,yh = ( 0, 9.98757e+306); yl+yh= 9.98757e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.37913e+303); yl+yh= 2.37913e+303 ebd0(x=1e+307, M=1.0331e+307): M/x = (r=0.516550433748765) * 2^(e=1); i=4, f=1986, fg=f*2^-(e+10)=0.969727 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, -3.07394e+305); yl+yh= -3.07394e+305 j=1: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=2: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 j=3: ( 0, -3.07395e+305); ( 0, -3.07395e+305); yl+yh= -3.07395e+305 3. after ADD1(M): yl,yh = ( 0, 1.00236e+307); yl+yh= 1.00236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.36037e+303); yl+yh= 5.36037e+303 ebd0(x=1e+307, M=1.04435e+307): M/x = (r=0.522175299181986) * 2^(e=1); i=6, f=1956, fg=f*2^-(e+10)=0.955078 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=1: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=2: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 j=3: ( 0, -4.59588e+305); ( 0, -4.59588e+305); yl+yh= -4.59588e+305 3. after ADD1(M): yl,yh = ( 0, 9.98392e+306); yl+yh= 9.98392e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 9.55343e+303); yl+yh= 9.55343e+303 ebd0(x=1e+307, M=1.05572e+307): M/x = (r=0.52786141538391) * 2^(e=1); i=7, f=1942, fg=f*2^-(e+10)=0.948242 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, -5.31447e+305); yl+yh= -5.31447e+305 j=1: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=2: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 j=3: ( 0, -5.31448e+305); ( 0, -5.31448e+305); yl+yh= -5.31448e+305 3. after ADD1(M): yl,yh = ( 0, 1.00258e+307); yl+yh= 1.00258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.49715e+304); yl+yh= 1.49715e+304 ebd0(x=1e+307, M=1.06722e+307): M/x = (r=0.533609449331681) * 2^(e=1); i=9, f=1913, fg=f*2^-(e+10)=0.934082 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=1: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=2: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 j=3: ( 0, -6.81861e+305); ( 0, -6.81861e+305); yl+yh= -6.81861e+305 3. after ADD1(M): yl,yh = ( 0, 9.99033e+306); yl+yh= 9.99033e+306 4. after ADD1(- M*fg): yl,yh = ( 0, 2.16279e+304); yl+yh= 2.16279e+304 ebd0(x=1e+307, M=1.07884e+307): M/x = (r=0.539420075265344) * 2^(e=1); i=10, f=1900, fg=f*2^-(e+10)=0.927734 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=1: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=2: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 j=3: ( 0, -7.50094e+305); ( 0, -7.50094e+305); yl+yh= -7.50094e+305 3. after ADD1(M): yl,yh = ( 0, 1.00383e+307); yl+yh= 1.00383e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.95362e+304); yl+yh= 2.95362e+304 ebd0(x=1e+307, M=1.09059e+307): M/x = (r=0.545293974766939) * 2^(e=1); i=12, f=1872, fg=f*2^-(e+10)=0.914062 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, -8.98515e+305); yl+yh= -8.98515e+305 j=1: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=2: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 j=3: ( 0, -8.98514e+305); ( 0, -8.98514e+305); yl+yh= -8.98514e+305 3. after ADD1(M): yl,yh = ( 0, 1.00074e+307); yl+yh= 1.00074e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.871e+304); yl+yh= 3.871e+304 ebd0(x=1e+307, M=1.10246e+307): M/x = (r=0.551231836840444) * 2^(e=1); i=13, f=1859, fg=f*2^-(e+10)=0.907715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=1: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=2: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 j=3: ( 0, -9.68247e+305); ( 0, -9.68247e+305); yl+yh= -9.68247e+305 3. after ADD1(M): yl,yh = ( 0, 1.00564e+307); yl+yh= 1.00564e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.91629e+304); yl+yh= 4.91629e+304 ebd0(x=1e+307, M=1.11447e+307): M/x = (r=0.557234357992604) * 2^(e=1); i=15, f=1833, fg=f*2^-(e+10)=0.89502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, -1.10906e+306); yl+yh= -1.10906e+306 j=1: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=2: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 j=3: ( 0, -1.10907e+306); ( 0, -1.10907e+306); yl+yh= -1.10907e+306 3. after ADD1(M): yl,yh = ( 0, 1.00356e+307); yl+yh= 1.00356e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.09091e+304); yl+yh= 6.09091e+304 ebd0(x=1e+307, M=1.1266e+307): M/x = (r=0.563302242314621) * 2^(e=1); i=16, f=1820, fg=f*2^-(e+10)=0.888672 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=1: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=2: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 j=3: ( 0, -1.18027e+306); ( 0, -1.18027e+306); yl+yh= -1.18027e+306 3. after ADD1(M): yl,yh = ( 0, 1.00858e+307); yl+yh= 1.00858e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.39626e+304); yl+yh= 7.39626e+304 ebd0(x=1e+307, M=1.13887e+307): M/x = (r=0.56943620156475) * 2^(e=1); i=18, f=1796, fg=f*2^-(e+10)=0.876953 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=1: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=2: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 j=3: ( 0, -1.31301e+306); ( 0, -1.31301e+306); yl+yh= -1.31301e+306 3. after ADD1(M): yl,yh = ( 0, 1.00757e+307); yl+yh= 1.00757e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.83375e+304); yl+yh= 8.83375e+304 ebd0(x=1e+307, M=1.15127e+307): M/x = (r=0.575636955251782) * 2^(e=1); i=19, f=1783, fg=f*2^-(e+10)=0.870605 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=1: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=2: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 j=3: ( 0, -1.38564e+306); ( 0, -1.38564e+306); yl+yh= -1.38564e+306 3. after ADD1(M): yl,yh = ( 0, 1.01271e+307); yl+yh= 1.01271e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.04048e+305); yl+yh= 1.04048e+305 ebd0(x=1e+307, M=1.16381e+307): M/x = (r=0.581905230719448) * 2^(e=1); i=21, f=1759, fg=f*2^-(e+10)=0.858887 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=1: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=2: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 j=3: ( 0, -1.52118e+306); ( 0, -1.52118e+306); yl+yh= -1.52118e+306 3. after ADD1(M): yl,yh = ( 0, 1.01169e+307); yl+yh= 1.01169e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.2111e+305); yl+yh= 1.2111e+305 ebd0(x=1e+307, M=1.17648e+307): M/x = (r=0.588241763231733) * 2^(e=1); i=23, f=1736, fg=f*2^-(e+10)=0.847656 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=1: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=2: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 j=3: ( 0, -1.65276e+306); ( 0, -1.65276e+306); yl+yh= -1.65276e+306 3. after ADD1(M): yl,yh = ( 0, 1.01121e+307); yl+yh= 1.01121e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39536e+305); yl+yh= 1.39536e+305 ebd0(x=1e+307, M=1.18929e+307): M/x = (r=0.59464729605912) * 2^(e=1); i=24, f=1725, fg=f*2^-(e+10)=0.842285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=1: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=2: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 j=3: ( 0, -1.71635e+306); ( 0, -1.71635e+306); yl+yh= -1.71635e+306 3. after ADD1(M): yl,yh = ( 0, 1.01766e+307); yl+yh= 1.01766e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.59342e+305); yl+yh= 1.59342e+305 ebd0(x=1e+307, M=1.20225e+307): M/x = (r=0.601122580565778) * 2^(e=1); i=26, f=1702, fg=f*2^-(e+10)=0.831055 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=1: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=2: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 j=3: ( 0, -1.85059e+306); ( 0, -1.85059e+306); yl+yh= -1.85059e+306 3. after ADD1(M): yl,yh = ( 0, 1.01719e+307); yl+yh= 1.01719e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.80544e+305); yl+yh= 1.80544e+305 ebd0(x=1e+307, M=1.21534e+307): M/x = (r=0.607668376297695) * 2^(e=1); i=28, f=1680, fg=f*2^-(e+10)=0.820312 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=1: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=2: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 j=3: ( 0, -1.98065e+306); ( 0, -1.98065e+306); yl+yh= -1.98065e+306 3. after ADD1(M): yl,yh = ( 0, 1.01727e+307); yl+yh= 1.01727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.03156e+305); yl+yh= 2.03156e+305 ebd0(x=1e+307, M=1.22857e+307): M/x = (r=0.614285451071773) * 2^(e=1); i=29, f=1670, fg=f*2^-(e+10)=0.81543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=1: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=2: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 j=3: ( 0, -2.04038e+306); ( 0, -2.04038e+306); yl+yh= -2.04038e+306 3. after ADD1(M): yl,yh = ( 0, 1.02453e+307); yl+yh= 1.02453e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27193e+305); yl+yh= 2.27193e+305 ebd0(x=1e+307, M=1.24195e+307): M/x = (r=0.620974581065892) * 2^(e=1); i=31, f=1649, fg=f*2^-(e+10)=0.805176 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=1: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=2: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 j=3: ( 0, -2.16695e+306); ( 0, -2.16695e+306); yl+yh= -2.16695e+306 3. after ADD1(M): yl,yh = ( 0, 1.02525e+307); yl+yh= 1.02525e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.52671e+305); yl+yh= 2.52671e+305 ebd0(x=1e+307, M=1.25547e+307): M/x = (r=0.627736550909953) * 2^(e=1); i=33, f=1628, fg=f*2^-(e+10)=0.794922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=1: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=2: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 j=3: ( 0, -2.29509e+306); ( 0, -2.29509e+306); yl+yh= -2.29509e+306 3. after ADD1(M): yl,yh = ( 0, 1.02596e+307); yl+yh= 1.02596e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.79606e+305); yl+yh= 2.79606e+305 ebd0(x=1e+307, M=1.26914e+307): M/x = (r=0.634572153777919) * 2^(e=1); i=34, f=1618, fg=f*2^-(e+10)=0.790039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=1: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=2: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 j=3: ( 0, -2.35669e+306); ( 0, -2.35669e+306); yl+yh= -2.35669e+306 3. after ADD1(M): yl,yh = ( 0, 1.03347e+307); yl+yh= 1.03347e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.08014e+305); yl+yh= 3.08014e+305 ebd0(x=1e+307, M=1.28296e+307): M/x = (r=0.641482191480851) * 2^(e=1); i=36, f=1598, fg=f*2^-(e+10)=0.780273 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=1: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=2: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 j=3: ( 0, -2.4811e+306); ( 0, -2.4811e+306); yl+yh= -2.4811e+306 3. after ADD1(M): yl,yh = ( 0, 1.03485e+307); yl+yh= 1.03485e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.37911e+305); yl+yh= 3.37911e+305 ebd0(x=1e+307, M=1.29693e+307): M/x = (r=0.648467474560957) * 2^(e=1); i=38, f=1579, fg=f*2^-(e+10)=0.770996 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=1: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=2: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 j=3: ( 0, -2.60072e+306); ( 0, -2.60072e+306); yl+yh= -2.60072e+306 3. after ADD1(M): yl,yh = ( 0, 1.03686e+307); yl+yh= 1.03686e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.69312e+305); yl+yh= 3.69312e+305 ebd0(x=1e+307, M=1.31106e+307): M/x = (r=0.655528822386676) * 2^(e=1); i=40, f=1560, fg=f*2^-(e+10)=0.761719 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=1: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=2: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 j=3: ( 0, -2.72177e+306); ( 0, -2.72177e+306); yl+yh= -2.72177e+306 3. after ADD1(M): yl,yh = ( 0, 1.03888e+307); yl+yh= 1.03888e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.02235e+305); yl+yh= 4.02235e+305 ebd0(x=1e+307, M=1.32533e+307): M/x = (r=0.662667063248778) * 2^(e=1); i=42, f=1542, fg=f*2^-(e+10)=0.75293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=1: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=2: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 j=3: ( 0, -2.83781e+306); ( 0, -2.83781e+306); yl+yh= -2.83781e+306 3. after ADD1(M): yl,yh = ( 0, 1.04155e+307); yl+yh= 1.04155e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.36695e+305); yl+yh= 4.36695e+305 ebd0(x=1e+307, M=1.33977e+307): M/x = (r=0.669883034457535) * 2^(e=1); i=43, f=1533, fg=f*2^-(e+10)=0.748535 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=1: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=2: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 j=3: ( 0, -2.89633e+306); ( 0, -2.89633e+306); yl+yh= -2.89633e+306 3. after ADD1(M): yl,yh = ( 0, 1.05013e+307); yl+yh= 1.05013e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.7271e+305); yl+yh= 4.7271e+305 ebd0(x=1e+307, M=1.35436e+307): M/x = (r=0.677177582440924) * 2^(e=1); i=45, f=1515, fg=f*2^-(e+10)=0.739746 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=1: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=2: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 j=3: ( 0, -3.01447e+306); ( 0, -3.01447e+306); yl+yh= -3.01447e+306 3. after ADD1(M): yl,yh = ( 0, 1.05291e+307); yl+yh= 1.05291e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.10297e+305); yl+yh= 5.10297e+305 ebd0(x=1e+307, M=1.3691e+307): M/x = (r=0.684551562843922) * 2^(e=1); i=47, f=1498, fg=f*2^-(e+10)=0.731445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=1: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=2: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 j=3: ( 0, -3.12732e+306); ( 0, -3.12732e+306); yl+yh= -3.12732e+306 3. after ADD1(M): yl,yh = ( 0, 1.05637e+307); yl+yh= 1.05637e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.49473e+305); yl+yh= 5.49473e+305 ebd0(x=1e+307, M=1.38401e+307): M/x = (r=0.692005840628868) * 2^(e=1); i=49, f=1481, fg=f*2^-(e+10)=0.723145 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=1: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=2: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 j=3: ( 0, -3.24146e+306); ( 0, -3.24146e+306); yl+yh= -3.24146e+306 3. after ADD1(M): yl,yh = ( 0, 1.05987e+307); yl+yh= 1.05987e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90254e+305); yl+yh= 5.90254e+305 ebd0(x=1e+307, M=1.39908e+307): M/x = (r=0.699541290176923) * 2^(e=1); i=51, f=1464, fg=f*2^-(e+10)=0.714844 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=1: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=2: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 j=3: ( 0, -3.35691e+306); ( 0, -3.35691e+306); yl+yh= -3.35691e+306 3. after ADD1(M): yl,yh = ( 0, 1.06339e+307); yl+yh= 1.06339e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.32659e+305); yl+yh= 6.32659e+305 ebd0(x=1e+307, M=1.41432e+307): M/x = (r=0.707158795390635) * 2^(e=1); i=53, f=1448, fg=f*2^-(e+10)=0.707031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=1: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=2: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 j=3: ( 0, -3.4668e+306); ( 0, -3.4668e+306); yl+yh= -3.4668e+306 3. after ADD1(M): yl,yh = ( 0, 1.06764e+307); yl+yh= 1.06764e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.76704e+305); yl+yh= 6.76704e+305 ebd0(x=1e+307, M=1.42972e+307): M/x = (r=0.71485924979762) * 2^(e=1); i=55, f=1432, fg=f*2^-(e+10)=0.699219 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=1: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=2: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 j=3: ( 0, -3.57792e+306); ( 0, -3.57792e+306); yl+yh= -3.57792e+306 3. after ADD1(M): yl,yh = ( 0, 1.07193e+307); yl+yh= 1.07193e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.22409e+305); yl+yh= 7.22409e+305 ebd0(x=1e+307, M=1.44529e+307): M/x = (r=0.72264355665537) * 2^(e=1); i=57, f=1417, fg=f*2^-(e+10)=0.691895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=1: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=2: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 j=3: ( 0, -3.68322e+306); ( 0, -3.68322e+306); yl+yh= -3.68322e+306 3. after ADD1(M): yl,yh = ( 0, 1.07697e+307); yl+yh= 1.07697e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69791e+305); yl+yh= 7.69791e+305 ebd0(x=1e+307, M=1.46103e+307): M/x = (r=0.730512629057209) * 2^(e=1); i=59, f=1402, fg=f*2^-(e+10)=0.68457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=1: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=2: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 j=3: ( 0, -3.78964e+306); ( 0, -3.78964e+306); yl+yh= -3.78964e+306 3. after ADD1(M): yl,yh = ( 0, 1.08206e+307); yl+yh= 1.08206e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.18868e+305); yl+yh= 8.18868e+305 ebd0(x=1e+307, M=1.47693e+307): M/x = (r=0.738467390039392) * 2^(e=1); i=61, f=1387, fg=f*2^-(e+10)=0.677246 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=1: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=2: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 j=3: ( 0, -3.89721e+306); ( 0, -3.89721e+306); yl+yh= -3.89721e+306 3. after ADD1(M): yl,yh = ( 0, 1.08721e+307); yl+yh= 1.08721e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.69659e+305); yl+yh= 8.69659e+305 ebd0(x=1e+307, M=1.49302e+307): M/x = (r=0.746508772689384) * 2^(e=1); i=63, f=1372, fg=f*2^-(e+10)=0.669922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=1: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=2: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 j=3: ( 0, -4.00594e+306); ( 0, -4.00594e+306); yl+yh= -4.00594e+306 3. after ADD1(M): yl,yh = ( 0, 1.09242e+307); yl+yh= 1.09242e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.22183e+305); yl+yh= 9.22183e+305 ebd0(x=1e+307, M=1.50928e+307): M/x = (r=0.754637720255303) * 2^(e=1); i=65, f=1358, fg=f*2^-(e+10)=0.663086 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=1: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=2: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 j=3: ( 0, -4.1085e+306); ( 0, -4.1085e+306); yl+yh= -4.1085e+306 3. after ADD1(M): yl,yh = ( 0, 1.09843e+307); yl+yh= 1.09843e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.76457e+305); yl+yh= 9.76457e+305 ebd0(x=1e+307, M=1.52571e+307): M/x = (r=0.762855186256566) * 2^(e=1); i=67, f=1344, fg=f*2^-(e+10)=0.65625 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=1: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=2: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 j=3: ( 0, -4.21213e+306); ( 0, -4.21213e+306); yl+yh= -4.21213e+306 3. after ADD1(M): yl,yh = ( 0, 1.1045e+307); yl+yh= 1.1045e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0325e+306); yl+yh= 1.0325e+306 ebd0(x=1e+307, M=1.54232e+307): M/x = (r=0.771162134595737) * 2^(e=1); i=69, f=1331, fg=f*2^-(e+10)=0.649902 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=1: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=2: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 j=3: ( 0, -4.3093e+306); ( 0, -4.3093e+306); yl+yh= -4.3093e+306 3. after ADD1(M): yl,yh = ( 0, 1.11139e+307); yl+yh= 1.11139e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.09034e+306); yl+yh= 1.09034e+306 ebd0(x=1e+307, M=1.55912e+307): M/x = (r=0.77955953967159) * 2^(e=1); i=72, f=1311, fg=f*2^-(e+10)=0.640137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=1: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=2: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 j=3: ( 0, -4.46072e+306); ( 0, -4.46072e+306); yl+yh= -4.46072e+306 3. after ADD1(M): yl,yh = ( 0, 1.11305e+307); yl+yh= 1.11305e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.14998e+306); yl+yh= 1.14998e+306 ebd0(x=1e+307, M=1.5761e+307): M/x = (r=0.788048386493405) * 2^(e=1); i=74, f=1298, fg=f*2^-(e+10)=0.633789 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, -4.56039e+306); yl+yh= -4.56039e+306 j=1: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=2: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 j=3: ( 0, -4.56038e+306); ( 0, -4.56038e+306); yl+yh= -4.56038e+306 3. after ADD1(M): yl,yh = ( 0, 1.12006e+307); yl+yh= 1.12006e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.21145e+306); yl+yh= 1.21145e+306 ebd0(x=1e+307, M=1.59326e+307): M/x = (r=0.796629670796513) * 2^(e=1); i=76, f=1285, fg=f*2^-(e+10)=0.627441 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=1: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=2: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 j=3: ( 0, -4.66105e+306); ( 0, -4.66105e+306); yl+yh= -4.66105e+306 3. after ADD1(M): yl,yh = ( 0, 1.12715e+307); yl+yh= 1.12715e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.27478e+306); yl+yh= 1.27478e+306 ebd0(x=1e+307, M=1.61061e+307): M/x = (r=0.805304399159088) * 2^(e=1); i=78, f=1273, fg=f*2^-(e+10)=0.621582 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=1: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=2: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 j=3: ( 0, -4.75487e+306); ( 0, -4.75487e+306); yl+yh= -4.75487e+306 3. after ADD1(M): yl,yh = ( 0, 1.13512e+307); yl+yh= 1.13512e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33997e+306); yl+yh= 1.33997e+306 ebd0(x=1e+307, M=1.62815e+307): M/x = (r=0.814073589120224) * 2^(e=1); i=80, f=1260, fg=f*2^-(e+10)=0.615234 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=1: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=2: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 j=3: ( 0, -4.85751e+306); ( 0, -4.85751e+306); yl+yh= -4.85751e+306 3. after ADD1(M): yl,yh = ( 0, 1.1424e+307); yl+yh= 1.1424e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.40705e+306); yl+yh= 1.40705e+306 ebd0(x=1e+307, M=1.64588e+307): M/x = (r=0.822938269299289) * 2^(e=1); i=83, f=1242, fg=f*2^-(e+10)=0.606445 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=1: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=2: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 j=3: ( 0, -5.00139e+306); ( 0, -5.00139e+306); yl+yh= -5.00139e+306 3. after ADD1(M): yl,yh = ( 0, 1.14574e+307); yl+yh= 1.14574e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.47603e+306); yl+yh= 1.47603e+306 ebd0(x=1e+307, M=1.6638e+307): M/x = (r=0.83189947951658) * 2^(e=1); i=85, f=1231, fg=f*2^-(e+10)=0.601074 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=1: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=2: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 j=3: ( 0, -5.09037e+306); ( 0, -5.09037e+306); yl+yh= -5.09037e+306 3. after ADD1(M): yl,yh = ( 0, 1.15476e+307); yl+yh= 1.15476e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54695e+306); yl+yh= 1.54695e+306 ebd0(x=1e+307, M=1.68192e+307): M/x = (r=0.840958270915297) * 2^(e=1); i=87, f=1219, fg=f*2^-(e+10)=0.595215 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=1: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=2: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 j=3: ( 0, -5.18832e+306); ( 0, -5.18832e+306); yl+yh= -5.18832e+306 3. after ADD1(M): yl,yh = ( 0, 1.16308e+307); yl+yh= 1.16308e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61983e+306); yl+yh= 1.61983e+306 ebd0(x=1e+307, M=1.70023e+307): M/x = (r=0.850115706084837) * 2^(e=1); i=90, f=1202, fg=f*2^-(e+10)=0.586914 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=1: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=2: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 j=3: ( 0, -5.32875e+306); ( 0, -5.32875e+306); yl+yh= -5.32875e+306 3. after ADD1(M): yl,yh = ( 0, 1.16736e+307); yl+yh= 1.16736e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.69467e+306); yl+yh= 1.69467e+306 ebd0(x=1e+307, M=1.71875e+307): M/x = (r=0.859372859185438) * 2^(e=1); i=92, f=1192, fg=f*2^-(e+10)=0.582031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=1: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=2: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 j=3: ( 0, -5.41231e+306); ( 0, -5.41231e+306); yl+yh= -5.41231e+306 3. after ADD1(M): yl,yh = ( 0, 1.17751e+307); yl+yh= 1.17751e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.77151e+306); yl+yh= 1.77151e+306 ebd0(x=1e+307, M=1.73746e+307): M/x = (r=0.868730816074176) * 2^(e=1); i=94, f=1181, fg=f*2^-(e+10)=0.57666 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=1: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=2: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 j=3: ( 0, -5.505e+306); ( 0, -5.505e+306); yl+yh= -5.505e+306 3. after ADD1(M): yl,yh = ( 0, 1.18696e+307); yl+yh= 1.18696e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.85036e+306); yl+yh= 1.85036e+306 ebd0(x=1e+307, M=1.75638e+307): M/x = (r=0.878190674432335) * 2^(e=1); i=97, f=1165, fg=f*2^-(e+10)=0.568848 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=1: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=2: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 j=3: ( 0, -5.64142e+306); ( 0, -5.64142e+306); yl+yh= -5.64142e+306 3. after ADD1(M): yl,yh = ( 0, 1.19224e+307); yl+yh= 1.19224e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.93126e+306); yl+yh= 1.93126e+306 ebd0(x=1e+307, M=1.77551e+307): M/x = (r=0.887753543894164) * 2^(e=1); i=99, f=1155, fg=f*2^-(e+10)=0.563965 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=1: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=2: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 j=3: ( 0, -5.72762e+306); ( 0, -5.72762e+306); yl+yh= -5.72762e+306 3. after ADD1(M): yl,yh = ( 0, 1.20274e+307); yl+yh= 1.20274e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.01421e+306); yl+yh= 2.01421e+306 ebd0(x=1e+307, M=1.79484e+307): M/x = (r=0.897420546177039) * 2^(e=1); i=102, f=1140, fg=f*2^-(e+10)=0.556641 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=1: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=2: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 j=3: ( 0, -5.85835e+306); ( 0, -5.85835e+306); yl+yh= -5.85835e+306 3. after ADD1(M): yl,yh = ( 0, 1.20901e+307); yl+yh= 1.20901e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.09925e+306); yl+yh= 2.09925e+306 ebd0(x=1e+307, M=1.81439e+307): M/x = (r=0.907192815213034) * 2^(e=1); i=104, f=1130, fg=f*2^-(e+10)=0.551758 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=1: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=2: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 j=3: ( 0, -5.94645e+306); ( 0, -5.94645e+306); yl+yh= -5.94645e+306 3. after ADD1(M): yl,yh = ( 0, 1.21974e+307); yl+yh= 1.21974e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.18639e+306); yl+yh= 2.18639e+306 ebd0(x=1e+307, M=1.83414e+307): M/x = (r=0.917071497281936) * 2^(e=1); i=107, f=1116, fg=f*2^-(e+10)=0.544922 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=1: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=2: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 j=3: ( 0, -6.07113e+306); ( 0, -6.07113e+306); yl+yh= -6.07113e+306 3. after ADD1(M): yl,yh = ( 0, 1.22703e+307); yl+yh= 1.22703e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.27566e+306); yl+yh= 2.27566e+306 ebd0(x=1e+307, M=1.85412e+307): M/x = (r=0.9270577511457) * 2^(e=1); i=109, f=1106, fg=f*2^-(e+10)=0.540039 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=1: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=2: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 j=3: ( 0, -6.16113e+306); ( 0, -6.16113e+306); yl+yh= -6.16113e+306 3. after ADD1(M): yl,yh = ( 0, 1.238e+307); yl+yh= 1.238e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.36708e+306); yl+yh= 2.36708e+306 ebd0(x=1e+307, M=1.87431e+307): M/x = (r=0.937152748184372) * 2^(e=1); i=112, f=1092, fg=f*2^-(e+10)=0.533203 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=1: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=2: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 j=3: ( 0, -6.28853e+306); ( 0, -6.28853e+306); yl+yh= -6.28853e+306 3. after ADD1(M): yl,yh = ( 0, 1.24545e+307); yl+yh= 1.24545e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.46067e+306); yl+yh= 2.46067e+306 ebd0(x=1e+307, M=1.89472e+307): M/x = (r=0.947357672533489) * 2^(e=1); i=115, f=1079, fg=f*2^-(e+10)=0.526855 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=1: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=2: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 j=3: ( 0, -6.40827e+306); ( 0, -6.40827e+306); yl+yh= -6.40827e+306 3. after ADD1(M): yl,yh = ( 0, 1.25389e+307); yl+yh= 1.25389e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.55647e+306); yl+yh= 2.55647e+306 ebd0(x=1e+307, M=1.91535e+307): M/x = (r=0.957673721222979) * 2^(e=1); i=117, f=1070, fg=f*2^-(e+10)=0.522461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=1: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=2: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 j=3: ( 0, -6.49205e+306); ( 0, -6.49205e+306); yl+yh= -6.49205e+306 3. after ADD1(M): yl,yh = ( 0, 1.26614e+307); yl+yh= 1.26614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.65448e+306); yl+yh= 2.65448e+306 ebd0(x=1e+307, M=1.9362e+307): M/x = (r=0.968102104317573) * 2^(e=1); i=120, f=1057, fg=f*2^-(e+10)=0.516113 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=1: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=2: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 j=3: ( 0, -6.61429e+306); ( 0, -6.61429e+306); yl+yh= -6.61429e+306 3. after ADD1(M): yl,yh = ( 0, 1.27478e+307); yl+yh= 1.27478e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.75475e+306); yl+yh= 2.75475e+306 ebd0(x=1e+307, M=1.95729e+307): M/x = (r=0.97864404505874) * 2^(e=1); i=123, f=1044, fg=f*2^-(e+10)=0.509766 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=1: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=2: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 j=3: ( 0, -6.73802e+306); ( 0, -6.73802e+306); yl+yh= -6.73802e+306 3. after ADD1(M): yl,yh = ( 0, 1.28349e+307); yl+yh= 1.28349e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.85728e+306); yl+yh= 2.85728e+306 ebd0(x=1e+307, M=1.9786e+307): M/x = (r=0.989300780008178) * 2^(e=1); i=125, f=1036, fg=f*2^-(e+10)=0.505859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=1: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=2: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 j=3: ( 0, -6.81496e+306); ( 0, -6.81496e+306); yl+yh= -6.81496e+306 3. after ADD1(M): yl,yh = ( 0, 1.29711e+307); yl+yh= 1.29711e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 2.96211e+306); yl+yh= 2.96211e+306 ebd0(x=1e+307, M=2.00015e+307): M/x = (r=0.500036779596429) * 2^(e=2); i=0, f=2048, fg=f*2^-(e+10)=0.5 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=1: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=2: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 j=3: ( 0, -6.93147e+306); ( 0, -6.93147e+306); yl+yh= -6.93147e+306 3. after ADD1(M): yl,yh = ( 0, 1.307e+307); yl+yh= 1.307e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.06926e+306); yl+yh= 3.06926e+306 ebd0(x=1e+307, M=2.02193e+307): M/x = (r=0.505481823125825) * 2^(e=2); i=1, f=2032, fg=f*2^-(e+10)=0.496094 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.685304 -4.25783e-08 -1.17231e-15 6.20339e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00306549276530927 1a. before adding -x * log1pmx(.) = -x * -4.68904e-06 = 4.68904e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.68904e+301); yl+yh= 4.68904e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.85309e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=1: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=2: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 j=3: ( 0, -7.00986e+306); ( 0, -7.00986e+306); yl+yh= -7.00986e+306 3. after ADD1(M): yl,yh = ( 0, 1.32094e+307); yl+yh= 1.32094e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.17876e+306); yl+yh= 3.17876e+306 ebd0(x=1e+307, M=2.04394e+307): M/x = (r=0.510986159291777) * 2^(e=2); i=3, f=2001, fg=f*2^-(e+10)=0.488525 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.669931 -4.82939e-08 -8.6648e-16 7.04956e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001481147712064075 1a. before adding -x * log1pmx(.) = -x * -1.09798e-06 = 1.09798e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.09798e+301); yl+yh= 1.09798e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.69932e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=1: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=2: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 j=3: ( 0, -7.16363e+306); ( 0, -7.16363e+306); yl+yh= -7.16363e+306 3. after ADD1(M): yl,yh = ( 0, 1.32758e+307); yl+yh= 1.32758e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.29063e+306); yl+yh= 3.29063e+306 ebd0(x=1e+307, M=2.0662e+307): M/x = (r=0.516550433748765) * 2^(e=2); i=4, f=1986, fg=f*2^-(e+10)=0.484863 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.662406 -4.7916e-08 -2.16151e-15 7.09297e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001825352954148209 1a. before adding -x * log1pmx(.) = -x * -1.66393e-06 = 1.66393e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.66393e+301); yl+yh= 1.66393e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.62408e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=1: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=2: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 j=3: ( 0, -7.23887e+306); ( 0, -7.23887e+306); yl+yh= -7.23887e+306 3. after ADD1(M): yl,yh = ( 0, 1.34232e+307); yl+yh= 1.34232e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.4049e+306); yl+yh= 3.4049e+306 ebd0(x=1e+307, M=2.0887e+307): M/x = (r=0.522175299181986) * 2^(e=2); i=6, f=1956, fg=f*2^-(e+10)=0.477539 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.647185 -4.22087e-08 -1.38176e-15 -1.11599e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002563588671910402 1a. before adding -x * log1pmx(.) = -x * -3.29162e-06 = 3.29162e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.29162e+301); yl+yh= 3.29162e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.47188e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=1: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=2: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 j=3: ( 0, -7.39106e+306); ( 0, -7.39106e+306); yl+yh= -7.39106e+306 3. after ADD1(M): yl,yh = ( 0, 1.3496e+307); yl+yh= 1.3496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.52159e+306); yl+yh= 3.52159e+306 ebd0(x=1e+307, M=2.11145e+307): M/x = (r=0.52786141538391) * 2^(e=2); i=7, f=1942, fg=f*2^-(e+10)=0.474121 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.640002 -4.97917e-08 4.88701e-16 1.68475e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001080926440970783 1a. before adding -x * log1pmx(.) = -x * -5.8378e-07 = 5.8378e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.8378e+300); yl+yh= 5.8378e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.40002e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=1: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=2: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 j=3: ( 0, -7.46292e+306); ( 0, -7.46292e+306); yl+yh= -7.46292e+306 3. after ADD1(M): yl,yh = ( 0, 1.36515e+307); yl+yh= 1.36515e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.64073e+306); yl+yh= 3.64073e+306 ebd0(x=1e+307, M=2.13444e+307): M/x = (r=0.533609449331681) * 2^(e=2); i=9, f=1913, fg=f*2^-(e+10)=0.467041 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.624956 3.28594e-08 1.20167e-16 -8.66823e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003130003348138335 1a. before adding -x * log1pmx(.) = -x * -4.90871e-06 = 4.90871e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.90871e+301); yl+yh= 4.90871e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.24961e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=1: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=2: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 j=3: ( 0, -7.61333e+306); ( 0, -7.61333e+306); yl+yh= -7.61333e+306 3. after ADD1(M): yl,yh = ( 0, 1.3731e+307); yl+yh= 1.3731e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.76235e+306); yl+yh= 3.76235e+306 ebd0(x=1e+307, M=2.15768e+307): M/x = (r=0.539420075265344) * 2^(e=2); i=10, f=1900, fg=f*2^-(e+10)=0.463867 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.618137 -6.40619e-11 3.55058e-18 -3.62368e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000877092777494317 1a. before adding -x * log1pmx(.) = -x * -3.84421e-07 = 3.84421e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.84421e+300); yl+yh= 3.84421e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.18138e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=1: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=2: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 j=3: ( 0, -7.68157e+306); ( 0, -7.68157e+306); yl+yh= -7.68157e+306 3. after ADD1(M): yl,yh = ( 0, 1.38952e+307); yl+yh= 1.38952e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 3.88647e+306); yl+yh= 3.88647e+306 ebd0(x=1e+307, M=2.18118e+307): M/x = (r=0.545293974766939) * 2^(e=2); i=12, f=1872, fg=f*2^-(e+10)=0.457031 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.603291 5.51582e-08 2.11936e-15 1.24711e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003134452379190651 1a. before adding -x * log1pmx(.) = -x * -4.92269e-06 = 4.92269e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.92269e+301); yl+yh= 4.92269e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.03296e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=1: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=2: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 j=3: ( 0, -7.82999e+306); ( 0, -7.82999e+306); yl+yh= -7.82999e+306 3. after ADD1(M): yl,yh = ( 0, 1.39818e+307); yl+yh= 1.39818e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.01312e+306); yl+yh= 4.01312e+306 ebd0(x=1e+307, M=2.20493e+307): M/x = (r=0.551231836840444) * 2^(e=2); i=13, f=1859, fg=f*2^-(e+10)=0.453857 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.596322 3.28135e-09 -1.40335e-16 5.54406e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007226412952989218 1a. before adding -x * log1pmx(.) = -x * -2.60979e-07 = 2.60979e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.60979e+300); yl+yh= 2.60979e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.96322e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=1: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=2: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 j=3: ( 0, -7.89972e+306); ( 0, -7.89972e+306); yl+yh= -7.89972e+306 3. after ADD1(M): yl,yh = ( 0, 1.41496e+307); yl+yh= 1.41496e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.14233e+306); yl+yh= 4.14233e+306 ebd0(x=1e+307, M=2.22894e+307): M/x = (r=0.557234357992604) * 2^(e=2); i=15, f=1833, fg=f*2^-(e+10)=0.44751 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.582237 -3.98307e-08 2.93879e-15 1.61244e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002528732226129226 1a. before adding -x * log1pmx(.) = -x * -3.20264e-06 = 3.20264e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.20264e+301); yl+yh= 3.20264e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.82241e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=1: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=2: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 j=3: ( 0, -8.04054e+306); ( 0, -8.04054e+306); yl+yh= -8.04054e+306 3. after ADD1(M): yl,yh = ( 0, 1.42488e+307); yl+yh= 1.42488e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.27412e+306); yl+yh= 4.27412e+306 ebd0(x=1e+307, M=2.25321e+307): M/x = (r=0.563302242314621) * 2^(e=2); i=16, f=1820, fg=f*2^-(e+10)=0.444336 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.57512 2.24238e-09 -2.20452e-17 4.07854e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001181719738877824 1a. before adding -x * log1pmx(.) = -x * -6.97681e-07 = 6.97681e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.97681e+300); yl+yh= 6.97681e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.75121e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=1: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=2: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 j=3: ( 0, -8.11174e+306); ( 0, -8.11174e+306); yl+yh= -8.11174e+306 3. after ADD1(M): yl,yh = ( 0, 1.44204e+307); yl+yh= 1.44204e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.40854e+306); yl+yh= 4.40854e+306 ebd0(x=1e+307, M=2.27774e+307): M/x = (r=0.56943620156475) * 2^(e=2); i=18, f=1796, fg=f*2^-(e+10)=0.438477 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.561845 2.14716e-08 1.33749e-15 -2.32692e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001262287099325914 1a. before adding -x * log1pmx(.) = -x * -7.97355e-07 = 7.97355e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.97355e+300); yl+yh= 7.97355e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.61846e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=1: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=2: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 j=3: ( 0, -8.24448e+306); ( 0, -8.24448e+306); yl+yh= -8.24448e+306 3. after ADD1(M): yl,yh = ( 0, 1.4533e+307); yl+yh= 1.4533e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.54559e+306); yl+yh= 4.54559e+306 ebd0(x=1e+307, M=2.30255e+307): M/x = (r=0.575636955251782) * 2^(e=2); i=19, f=1783, fg=f*2^-(e+10)=0.435303 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.554581 4.57783e-09 2.63315e-16 2.071e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002305362513600811 1a. before adding -x * log1pmx(.) = -x * -2.65327e-06 = 2.65327e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.65327e+301); yl+yh= 2.65327e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.54583e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=1: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=2: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 j=3: ( 0, -8.31711e+306); ( 0, -8.31711e+306); yl+yh= -8.31711e+306 3. after ADD1(M): yl,yh = ( 0, 1.47084e+307); yl+yh= 1.47084e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.68532e+306); yl+yh= 4.68532e+306 ebd0(x=1e+307, M=2.32762e+307): M/x = (r=0.581905230719448) * 2^(e=2); i=21, f=1759, fg=f*2^-(e+10)=0.429443 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.541029 -3.73023e-08 -3.38018e-15 1.44692e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0004186515278223649 1a. before adding -x * log1pmx(.) = -x * -8.7659e-08 = 8.7659e+299 1. after A.(-x*l..): yl,yh = ( 0, 8.7659e+299); yl+yh= 8.7659e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.41029e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=1: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=2: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 j=3: ( 0, -8.45265e+306); ( 0, -8.45265e+306); yl+yh= -8.45265e+306 3. after ADD1(M): yl,yh = ( 0, 1.48236e+307); yl+yh= 1.48236e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.82774e+306); yl+yh= 4.82774e+306 ebd0(x=1e+307, M=2.35297e+307): M/x = (r=0.588241763231733) * 2^(e=2); i=23, f=1736, fg=f*2^-(e+10)=0.423828 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.527867 1.08397e-08 -4.48028e-16 3.8841e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002746385771202304 1a. before adding -x * log1pmx(.) = -x * -3.77824e-06 = 3.77824e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.77824e+301); yl+yh= 3.77824e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.27871e+306); ( 0, -8.58424e+306); yl+yh= -8.58424e+306 j=1: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=2: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 j=3: ( 0, -8.58423e+306); ( 0, -8.58423e+306); yl+yh= -8.58423e+306 3. after ADD1(M): yl,yh = ( 0, 1.49454e+307); yl+yh= 1.49454e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 4.9729e+306); yl+yh= 4.9729e+306 ebd0(x=1e+307, M=2.37859e+307): M/x = (r=0.59464729605912) * 2^(e=2); i=24, f=1725, fg=f*2^-(e+10)=0.421143 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.52151 4.20316e-08 1.21101e-15 -2.32067e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001725181349592317 1a. before adding -x * log1pmx(.) = -x * -1.48642e-06 = 1.48642e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.48642e+301); yl+yh= 1.48642e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.21512e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=1: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=2: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 j=3: ( 0, -8.64782e+306); ( 0, -8.64782e+306); yl+yh= -8.64782e+306 3. after ADD1(M): yl,yh = ( 0, 1.51381e+307); yl+yh= 1.51381e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.12082e+306); yl+yh= 5.12082e+306 ebd0(x=1e+307, M=2.40449e+307): M/x = (r=0.601122580565778) * 2^(e=2); i=26, f=1702, fg=f*2^-(e+10)=0.415527 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.508088 -1.22971e-08 -4.29584e-16 -1.80366e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008685233174270134 1a. before adding -x * log1pmx(.) = -x * -3.77385e-07 = 3.77385e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.77385e+300); yl+yh= 3.77385e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.08088e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=1: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=2: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 j=3: ( 0, -8.78206e+306); ( 0, -8.78206e+306); yl+yh= -8.78206e+306 3. after ADD1(M): yl,yh = ( 0, 1.52628e+307); yl+yh= 1.52628e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.27152e+306); yl+yh= 5.27152e+306 ebd0(x=1e+307, M=2.43067e+307): M/x = (r=0.607668376297695) * 2^(e=2); i=28, f=1680, fg=f*2^-(e+10)=0.410156 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.495077 1.44099e-08 -6.38191e-17 -3.50051e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.003044070136593557 1a. before adding -x * log1pmx(.) = -x * -4.64261e-06 = 4.64261e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.64261e+301); yl+yh= 4.64261e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.95082e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=1: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=2: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 j=3: ( 0, -8.91212e+306); ( 0, -8.91212e+306); yl+yh= -8.91212e+306 3. after ADD1(M): yl,yh = ( 0, 1.53946e+307); yl+yh= 1.53946e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.42505e+306); yl+yh= 5.42505e+306 ebd0(x=1e+307, M=2.45714e+307): M/x = (r=0.614285451071773) * 2^(e=2); i=29, f=1670, fg=f*2^-(e+10)=0.407715 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.489107 2.7458e-08 -1.44704e-15 4.21187e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001813186806505358 1a. before adding -x * log1pmx(.) = -x * -1.64184e-06 = 1.64184e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.64184e+301); yl+yh= 1.64184e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.89109e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=1: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=2: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 j=3: ( 0, -8.97186e+306); ( 0, -8.97186e+306); yl+yh= -8.97186e+306 3. after ADD1(M): yl,yh = ( 0, 1.55996e+307); yl+yh= 1.55996e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.58143e+306); yl+yh= 5.58143e+306 ebd0(x=1e+307, M=2.4839e+307): M/x = (r=0.620974581065892) * 2^(e=2); i=31, f=1649, fg=f*2^-(e+10)=0.402588 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.476453 -1.24702e-08 -9.16219e-17 3.76578e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.261310775839053e-05 1a. before adding -x * log1pmx(.) = -x * -7.95459e-11 = 7.95459e+296 1. after A.(-x*l..): yl,yh = ( 0, 7.95459e+296); yl+yh= 7.95459e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.76453e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=1: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=2: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 j=3: ( 0, -9.09842e+306); ( 0, -9.09842e+306); yl+yh= -9.09842e+306 3. after ADD1(M): yl,yh = ( 0, 1.57406e+307); yl+yh= 1.57406e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.74069e+306); yl+yh= 5.74069e+306 ebd0(x=1e+307, M=2.51095e+307): M/x = (r=0.627736550909953) * 2^(e=2); i=33, f=1628, fg=f*2^-(e+10)=0.397461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.463636 -1.7013e-09 7.60162e-18 -2.04159e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.00199696788925424 1a. before adding -x * log1pmx(.) = -x * -1.9966e-06 = 1.9966e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.9966e+301); yl+yh= 1.9966e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.63638e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=1: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=2: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 j=3: ( 0, -9.22657e+306); ( 0, -9.22657e+306); yl+yh= -9.22657e+306 3. after ADD1(M): yl,yh = ( 0, 1.58829e+307); yl+yh= 1.58829e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 5.90287e+306); yl+yh= 5.90287e+306 ebd0(x=1e+307, M=2.53829e+307): M/x = (r=0.634572153777919) * 2^(e=2); i=34, f=1618, fg=f*2^-(e+10)=0.39502 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.457474 6.94368e-10 -2.54613e-17 5.54125e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002673578918626507 1a. before adding -x * log1pmx(.) = -x * -3.56765e-06 = 3.56765e+301 1. after A.(-x*l..): yl,yh = ( 0, 3.56765e+301); yl+yh= 3.56765e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.57478e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=1: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=2: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 j=3: ( 0, -9.28817e+306); ( 0, -9.28817e+306); yl+yh= -9.28817e+306 3. after ADD1(M): yl,yh = ( 0, 1.60947e+307); yl+yh= 1.60947e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.06799e+306); yl+yh= 6.06799e+306 ebd0(x=1e+307, M=2.56593e+307): M/x = (r=0.641482191480851) * 2^(e=2); i=36, f=1598, fg=f*2^-(e+10)=0.390137 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.445036 2.86507e-08 -9.15535e-16 -4.73659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001063029283593326 1a. before adding -x * log1pmx(.) = -x * -5.64616e-07 = 5.64616e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.64616e+300); yl+yh= 5.64616e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.45037e+306); ( 0, -9.41258e+306); yl+yh= -9.41258e+306 j=1: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=2: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 j=3: ( 0, -9.41257e+306); ( 0, -9.41257e+306); yl+yh= -9.41257e+306 3. after ADD1(M): yl,yh = ( 0, 1.62467e+307); yl+yh= 1.62467e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.23608e+306); yl+yh= 6.23608e+306 ebd0(x=1e+307, M=2.59387e+307): M/x = (r=0.648467474560957) * 2^(e=2); i=38, f=1579, fg=f*2^-(e+10)=0.385498 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.433075 1.90657e-08 1.01432e-15 1.01457e-22 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -6.822037914875469e-05 1a. before adding -x * log1pmx(.) = -x * -2.32712e-09 = 2.32712e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.32712e+298); yl+yh= 2.32712e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.33075e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=1: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=2: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 j=3: ( 0, -9.53219e+306); ( 0, -9.53219e+306); yl+yh= -9.53219e+306 3. after ADD1(M): yl,yh = ( 0, 1.64065e+307); yl+yh= 1.64065e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.40719e+306); yl+yh= 6.40719e+306 ebd0(x=1e+307, M=2.62212e+307): M/x = (r=0.655528822386676) * 2^(e=2); i=40, f=1560, fg=f*2^-(e+10)=0.380859 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.420969 -1.27785e-08 6.14353e-16 1.41924e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001342809645298937 1a. before adding -x * log1pmx(.) = -x * -9.02377e-07 = 9.02377e+300 1. after A.(-x*l..): yl,yh = ( 0, 9.02377e+300); yl+yh= 9.02377e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.2097e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=1: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=2: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 j=3: ( 0, -9.65324e+306); ( 0, -9.65324e+306); yl+yh= -9.65324e+306 3. after ADD1(M): yl,yh = ( 0, 1.65679e+307); yl+yh= 1.65679e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.58134e+306); yl+yh= 6.58134e+306 ebd0(x=1e+307, M=2.65067e+307): M/x = (r=0.662667063248778) * 2^(e=2); i=42, f=1542, fg=f*2^-(e+10)=0.376465 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.409364 1.88076e-09 1.91533e-16 -5.62081e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002116590303109195 1a. before adding -x * log1pmx(.) = -x * -2.24314e-06 = 2.24314e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.24314e+301); yl+yh= 2.24314e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.09366e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=1: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=2: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 j=3: ( 0, -9.76928e+306); ( 0, -9.76928e+306); yl+yh= -9.76928e+306 3. after ADD1(M): yl,yh = ( 0, 1.67374e+307); yl+yh= 1.67374e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.75856e+306); yl+yh= 6.75856e+306 ebd0(x=1e+307, M=2.67953e+307): M/x = (r=0.669883034457535) * 2^(e=2); i=43, f=1533, fg=f*2^-(e+10)=0.374268 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.40351 -2.04166e-08 -2.93405e-16 1.89435e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002862003733789521 1a. before adding -x * log1pmx(.) = -x * -4.08774e-06 = 4.08774e+301 1. after A.(-x*l..): yl,yh = ( 0, 4.08774e+301); yl+yh= 4.08774e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.03514e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=1: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=2: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 j=3: ( 0, -9.8278e+306); ( 0, -9.8278e+306); yl+yh= -9.8278e+306 3. after ADD1(M): yl,yh = ( 0, 1.69675e+307); yl+yh= 1.69675e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 6.9389e+306); yl+yh= 6.9389e+306 ebd0(x=1e+307, M=2.70871e+307): M/x = (r=0.677177582440924) * 2^(e=2); i=45, f=1515, fg=f*2^-(e+10)=0.369873 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.391699 1.54591e-08 1.09628e-15 3.1083e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001878942771483974 1a. before adding -x * log1pmx(.) = -x * -1.763e-06 = 1.763e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.763e+301); yl+yh= 1.763e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.91701e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=1: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=2: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 j=3: ( 0, -9.94594e+306); ( 0, -9.94594e+306); yl+yh= -9.94594e+306 3. after ADD1(M): yl,yh = ( 0, 1.71412e+307); yl+yh= 1.71412e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.12238e+306); yl+yh= 7.12238e+306 ebd0(x=1e+307, M=2.73821e+307): M/x = (r=0.684551562843922) * 2^(e=2); i=47, f=1498, fg=f*2^-(e+10)=0.365723 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.380414 -8.2444e-09 1.48662e-16 -3.92729e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001424063613471935 1a. before adding -x * log1pmx(.) = -x * -1.01302e-06 = 1.01302e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.01302e+301); yl+yh= 1.01302e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.80415e+306); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=1: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=2: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 j=3: ( 0, -1.00588e+307); ( 0, -1.00588e+307); yl+yh= -1.00588e+307 3. after ADD1(M): yl,yh = ( 0, 1.73233e+307); yl+yh= 1.73233e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.30903e+306); yl+yh= 7.30903e+306 ebd0(x=1e+307, M=2.76802e+307): M/x = (r=0.692005840628868) * 2^(e=2); i=49, f=1481, fg=f*2^-(e+10)=0.361572 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.369001 -2.22536e-08 6.23141e-16 -2.15648e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.000840478487649964 1a. before adding -x * log1pmx(.) = -x * -3.53004e-07 = 3.53004e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.53004e+300); yl+yh= 3.53004e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.69001e+306); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=1: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=2: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 j=3: ( 0, -1.01729e+307); ( 0, -1.01729e+307); yl+yh= -1.01729e+307 3. after ADD1(M): yl,yh = ( 0, 1.75073e+307); yl+yh= 1.75073e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.4989e+306); yl+yh= 7.4989e+306 ebd0(x=1e+307, M=2.79817e+307): M/x = (r=0.699541290176923) * 2^(e=2); i=51, f=1464, fg=f*2^-(e+10)=0.357422 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.357456 -2.03304e-08 -1.57945e-15 6.31868e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001254382998199685 1a. before adding -x * log1pmx(.) = -x * -7.86673e-09 = 7.86673e+298 1. after A.(-x*l..): yl,yh = ( 0, 7.86673e+298); yl+yh= 7.86673e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.57456e+306); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=1: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=2: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 j=3: ( 0, -1.02884e+307); ( 0, -1.02884e+307); yl+yh= -1.02884e+307 3. after ADD1(M): yl,yh = ( 0, 1.76933e+307); yl+yh= 1.76933e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.69201e+306); yl+yh= 7.69201e+306 ebd0(x=1e+307, M=2.82864e+307): M/x = (r=0.707158795390635) * 2^(e=2); i=53, f=1448, fg=f*2^-(e+10)=0.353516 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.346467 -1.23627e-08 -6.00337e-16 -2.8609e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -3.326589292962469e-05 1a. before adding -x * log1pmx(.) = -x * -5.53322e-10 = 5.53322e+297 1. after A.(-x*l..): yl,yh = ( 0, 5.53322e+297); yl+yh= 5.53322e+297 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.46467e+306); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=1: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=2: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 j=3: ( 0, -1.03983e+307); ( 0, -1.03983e+307); yl+yh= -1.03983e+307 3. after ADD1(M): yl,yh = ( 0, 1.78881e+307); yl+yh= 1.78881e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 7.88841e+306); yl+yh= 7.88841e+306 ebd0(x=1e+307, M=2.85944e+307): M/x = (r=0.71485924979762) * 2^(e=2); i=55, f=1432, fg=f*2^-(e+10)=0.349609 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.335356 2.16727e-08 -1.09188e-15 -3.04757e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003140178611408836 1a. before adding -x * log1pmx(.) = -x * -4.93139e-08 = 4.93139e+299 1. after A.(-x*l..): yl,yh = ( 0, 4.93139e+299); yl+yh= 4.93139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.35356e+306); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=1: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=2: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 j=3: ( 0, -1.05094e+307); ( 0, -1.05094e+307); yl+yh= -1.05094e+307 3. after ADD1(M): yl,yh = ( 0, 1.8085e+307); yl+yh= 1.8085e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.08812e+306); yl+yh= 8.08812e+306 ebd0(x=1e+307, M=2.89057e+307): M/x = (r=0.72264355665537) * 2^(e=2); i=57, f=1417, fg=f*2^-(e+10)=0.345947 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.324825 2.80167e-08 -2.07257e-16 1.31608e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -1.375021419963272e-05 1a. before adding -x * log1pmx(.) = -x * -9.45351e-11 = 9.45351e+296 1. after A.(-x*l..): yl,yh = ( 0, 9.45351e+296); yl+yh= 9.45351e+296 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.24825e+306); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=1: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=2: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 j=3: ( 0, -1.06147e+307); ( 0, -1.06147e+307); yl+yh= -1.06147e+307 3. after ADD1(M): yl,yh = ( 0, 1.82911e+307); yl+yh= 1.82911e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.29119e+306); yl+yh= 8.29119e+306 ebd0(x=1e+307, M=2.92205e+307): M/x = (r=0.730512629057209) * 2^(e=2); i=59, f=1402, fg=f*2^-(e+10)=0.342285 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.314183 2.68266e-08 -9.79256e-16 2.2955e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0001745175177798856 1a. before adding -x * log1pmx(.) = -x * -1.52264e-08 = 1.52264e+299 1. after A.(-x*l..): yl,yh = ( 0, 1.52264e+299); yl+yh= 1.52264e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.14183e+306); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=1: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=2: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 j=3: ( 0, -1.07211e+307); ( 0, -1.07211e+307); yl+yh= -1.07211e+307 3. after ADD1(M): yl,yh = ( 0, 1.84994e+307); yl+yh= 1.84994e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.49765e+306); yl+yh= 8.49765e+306 ebd0(x=1e+307, M=2.95387e+307): M/x = (r=0.738467390039392) * 2^(e=2); i=61, f=1387, fg=f*2^-(e+10)=0.338623 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.303427 -8.62904e-09 -5.22255e-16 3.22877e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002483105318723183 1a. before adding -x * log1pmx(.) = -x * -3.0824e-08 = 3.0824e+299 1. after A.(-x*l..): yl,yh = ( 0, 3.0824e+299); yl+yh= 3.0824e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.03427e+306); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=1: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=2: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 j=3: ( 0, -1.08287e+307); ( 0, -1.08287e+307); yl+yh= -1.08287e+307 3. after ADD1(M): yl,yh = ( 0, 1.871e+307); yl+yh= 1.871e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.70754e+306); yl+yh= 8.70754e+306 ebd0(x=1e+307, M=2.98604e+307): M/x = (r=0.746508772689384) * 2^(e=2); i=63, f=1372, fg=f*2^-(e+10)=0.334961 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.292553 -4.91631e-09 2.56228e-16 -2.63416e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0002051134080418072 1a. before adding -x * log1pmx(.) = -x * -2.10329e-08 = 2.10329e+299 1. after A.(-x*l..): yl,yh = ( 0, 2.10329e+299); yl+yh= 2.10329e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.92553e+306); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=1: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=2: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 j=3: ( 0, -1.09374e+307); ( 0, -1.09374e+307); yl+yh= -1.09374e+307 3. after ADD1(M): yl,yh = ( 0, 1.89229e+307); yl+yh= 1.89229e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 8.92089e+306); yl+yh= 8.92089e+306 ebd0(x=1e+307, M=3.01855e+307): M/x = (r=0.754637720255303) * 2^(e=2); i=65, f=1358, fg=f*2^-(e+10)=0.331543 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.282296 2.37709e-08 6.44923e-16 3.41754e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0007793204167001755 1a. before adding -x * log1pmx(.) = -x * -3.03512e-07 = 3.03512e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.03512e+300); yl+yh= 3.03512e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.82297e+306); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=1: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=2: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 j=3: ( 0, -1.104e+307); ( 0, -1.104e+307); yl+yh= -1.104e+307 3. after ADD1(M): yl,yh = ( 0, 1.91455e+307); yl+yh= 1.91455e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.13774e+306); yl+yh= 9.13774e+306 ebd0(x=1e+307, M=3.05142e+307): M/x = (r=0.762855186256566) * 2^(e=2); i=67, f=1344, fg=f*2^-(e+10)=0.328125 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.271934 -1.89333e-08 7.77939e-16 2.59197e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001247431961742504 1a. before adding -x * log1pmx(.) = -x * -7.77397e-07 = 7.77397e+300 1. after A.(-x*l..): yl,yh = ( 0, 7.77397e+300); yl+yh= 7.77397e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.71935e+306); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=1: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=2: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 j=3: ( 0, -1.11436e+307); ( 0, -1.11436e+307); yl+yh= -1.11436e+307 3. after ADD1(M): yl,yh = ( 0, 1.93706e+307); yl+yh= 1.93706e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.35813e+306); yl+yh= 9.35813e+306 ebd0(x=1e+307, M=3.08465e+307): M/x = (r=0.771162134595737) * 2^(e=2); i=69, f=1331, fg=f*2^-(e+10)=0.324951 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.262214 7.80222e-09 5.02243e-16 -2.40632e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.002360157370044412 1a. before adding -x * log1pmx(.) = -x * -2.7808e-06 = 2.7808e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.7808e+301); yl+yh= 2.7808e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.62217e+306); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=1: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=2: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 j=3: ( 0, -1.12408e+307); ( 0, -1.12408e+307); yl+yh= -1.12408e+307 3. after ADD1(M): yl,yh = ( 0, 1.96057e+307); yl+yh= 1.96057e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.58211e+306); yl+yh= 9.58211e+306 ebd0(x=1e+307, M=3.11824e+307): M/x = (r=0.77955953967159) * 2^(e=2); i=72, f=1311, fg=f*2^-(e+10)=0.320068 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.247074 -1.99818e-09 -1.09098e-16 6.23655e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001950628408736453 1a. before adding -x * log1pmx(.) = -x * -1.90495e-06 = 1.90495e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.90495e+301); yl+yh= 1.90495e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.47076e+306); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=1: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=2: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 j=3: ( 0, -1.13922e+307); ( 0, -1.13922e+307); yl+yh= -1.13922e+307 3. after ADD1(M): yl,yh = ( 0, 1.97902e+307); yl+yh= 1.97902e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 9.8097e+306); yl+yh= 9.8097e+306 ebd0(x=1e+307, M=3.15219e+307): M/x = (r=0.788048386493405) * 2^(e=2); i=74, f=1298, fg=f*2^-(e+10)=0.316895 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.237108 1.00854e-08 -4.77563e-16 2.33062e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001087103839413843 1a. before adding -x * log1pmx(.) = -x * -5.91326e-07 = 5.91326e+300 1. after A.(-x*l..): yl,yh = ( 0, 5.91326e+300); yl+yh= 5.91326e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.37109e+306); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=1: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=2: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 j=3: ( 0, -1.14919e+307); ( 0, -1.14919e+307); yl+yh= -1.14919e+307 3. after ADD1(M): yl,yh = ( 0, 2.00301e+307); yl+yh= 2.00301e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.00409e+307); yl+yh= 1.00409e+307 ebd0(x=1e+307, M=3.18652e+307): M/x = (r=0.796629670796513) * 2^(e=2); i=76, f=1285, fg=f*2^-(e+10)=0.313721 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.227042 -6.45128e-09 -4.25299e-16 -1.02603e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0003231181899224778 1a. before adding -x * log1pmx(.) = -x * -5.22139e-08 = 5.22139e+299 1. after A.(-x*l..): yl,yh = ( 0, 5.22139e+299); yl+yh= 5.22139e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.27042e+306); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=1: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=2: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 j=3: ( 0, -1.15925e+307); ( 0, -1.15925e+307); yl+yh= -1.15925e+307 3. after ADD1(M): yl,yh = ( 0, 2.02727e+307); yl+yh= 2.02727e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.02759e+307); yl+yh= 1.02759e+307 ebd0(x=1e+307, M=3.22122e+307): M/x = (r=0.805304399159088) * 2^(e=2); i=78, f=1273, fg=f*2^-(e+10)=0.310791 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.21766 -8.28678e-09 5.23236e-16 5.07844e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00112548840773382 1a. before adding -x * log1pmx(.) = -x * -6.32887e-07 = 6.32887e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.32887e+300); yl+yh= 6.32887e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.1766e+306); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=1: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=2: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 j=3: ( 0, -1.16863e+307); ( 0, -1.16863e+307); yl+yh= -1.16863e+307 3. after ADD1(M): yl,yh = ( 0, 2.05258e+307); yl+yh= 2.05258e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.05146e+307); yl+yh= 1.05146e+307 ebd0(x=1e+307, M=3.25629e+307): M/x = (r=0.814073589120224) * 2^(e=2); i=80, f=1260, fg=f*2^-(e+10)=0.307617 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.207395 -1.61493e-09 2.11316e-17 1.42756e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001692111612776168 1a. before adding -x * log1pmx(.) = -x * -1.43001e-06 = 1.43001e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.43001e+301); yl+yh= 1.43001e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 2.07397e+306); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=1: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=2: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 j=3: ( 0, -1.1789e+307); ( 0, -1.1789e+307); yl+yh= -1.1789e+307 3. after ADD1(M): yl,yh = ( 0, 2.0774e+307); yl+yh= 2.0774e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.0757e+307); yl+yh= 1.0757e+307 ebd0(x=1e+307, M=3.29175e+307): M/x = (r=0.822938269299289) * 2^(e=2); i=83, f=1242, fg=f*2^-(e+10)=0.303223 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.193006 9.95686e-10 9.00167e-17 -3.7548e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001865888213167135 1a. before adding -x * log1pmx(.) = -x * -1.74294e-06 = 1.74294e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.74294e+301); yl+yh= 1.74294e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93008e+306); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=1: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=2: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 j=3: ( 0, -1.19329e+307); ( 0, -1.19329e+307); yl+yh= -1.19329e+307 3. after ADD1(M): yl,yh = ( 0, 2.09847e+307); yl+yh= 2.09847e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.10033e+307); yl+yh= 1.10033e+307 ebd0(x=1e+307, M=3.3276e+307): M/x = (r=0.83189947951658) * 2^(e=2); i=85, f=1231, fg=f*2^-(e+10)=0.300537 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.18411 6.93105e-09 -3.47849e-16 2.46659e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 6.665945792031758e-05 1a. before adding -x * log1pmx(.) = -x * -2.22164e-09 = 2.22164e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.22164e+298); yl+yh= 2.22164e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.8411e+306); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=1: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=2: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 j=3: ( 0, -1.20218e+307); ( 0, -1.20218e+307); yl+yh= -1.20218e+307 3. after ADD1(M): yl,yh = ( 0, 2.12541e+307); yl+yh= 2.12541e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.12535e+307); yl+yh= 1.12535e+307 ebd0(x=1e+307, M=3.36383e+307): M/x = (r=0.840958270915297) * 2^(e=2); i=87, f=1219, fg=f*2^-(e+10)=0.297607 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.174314 3.79439e-09 3.19007e-16 2.02927e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101691646237427 1a. before adding -x * log1pmx(.) = -x * -6.06417e-07 = 6.06417e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06417e+300); yl+yh= 6.06417e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.74315e+306); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=1: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=2: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 j=3: ( 0, -1.21198e+307); ( 0, -1.21198e+307); yl+yh= -1.21198e+307 3. after ADD1(M): yl,yh = ( 0, 2.15185e+307); yl+yh= 2.15185e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.15075e+307); yl+yh= 1.15075e+307 ebd0(x=1e+307, M=3.40046e+307): M/x = (r=0.850115706084837) * 2^(e=2); i=90, f=1202, fg=f*2^-(e+10)=0.293457 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.16027 6.00792e-09 -7.52105e-17 -1.26491e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002110274693384699 1a. before adding -x * log1pmx(.) = -x * -2.22977e-06 = 2.22977e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.22977e+301); yl+yh= 2.22977e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.60273e+306); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=1: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=2: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 j=3: ( 0, -1.22602e+307); ( 0, -1.22602e+307); yl+yh= -1.22602e+307 3. after ADD1(M): yl,yh = ( 0, 2.17444e+307); yl+yh= 2.17444e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.17655e+307); yl+yh= 1.17655e+307 ebd0(x=1e+307, M=3.43749e+307): M/x = (r=0.859372859185438) * 2^(e=2); i=92, f=1192, fg=f*2^-(e+10)=0.291016 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.151916 -1.48456e-08 -3.26583e-16 -1.52682e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0003637188955491426 1a. before adding -x * log1pmx(.) = -x * -6.61297e-08 = 6.61297e+299 1. after A.(-x*l..): yl,yh = ( 0, 6.61297e+299); yl+yh= 6.61297e+299 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.51916e+306); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=1: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=2: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 j=3: ( 0, -1.23438e+307); ( 0, -1.23438e+307); yl+yh= -1.23438e+307 3. after ADD1(M): yl,yh = ( 0, 2.20311e+307); yl+yh= 2.20311e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.20275e+307); yl+yh= 1.20275e+307 ebd0(x=1e+307, M=3.47492e+307): M/x = (r=0.868730816074176) * 2^(e=2); i=94, f=1181, fg=f*2^-(e+10)=0.28833 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.142645 9.18647e-09 -8.04937e-16 1.438e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001924896273048752 1a. before adding -x * log1pmx(.) = -x * -1.85024e-06 = 1.85024e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.85024e+301); yl+yh= 1.85024e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.42647e+306); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=1: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=2: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 j=3: ( 0, -1.24365e+307); ( 0, -1.24365e+307); yl+yh= -1.24365e+307 3. after ADD1(M): yl,yh = ( 0, 2.23128e+307); yl+yh= 2.23128e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.22935e+307); yl+yh= 1.22935e+307 ebd0(x=1e+307, M=3.51276e+307): M/x = (r=0.878190674432335) * 2^(e=2); i=97, f=1165, fg=f*2^-(e+10)=0.284424 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.129005 -7.46121e-09 -6.21211e-16 1.85519e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0008865862171189026 1a. before adding -x * log1pmx(.) = -x * -3.9325e-07 = 3.9325e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.9325e+300); yl+yh= 3.9325e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.29005e+306); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=1: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=2: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 j=3: ( 0, -1.25729e+307); ( 0, -1.25729e+307); yl+yh= -1.25729e+307 3. after ADD1(M): yl,yh = ( 0, 2.25547e+307); yl+yh= 2.25547e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.25636e+307); yl+yh= 1.25636e+307 ebd0(x=1e+307, M=3.55101e+307): M/x = (r=0.887753543894164) * 2^(e=2); i=99, f=1155, fg=f*2^-(e+10)=0.281982 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.120384 3.3792e-09 1.6215e-16 -6.00071e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001323577341562449 1a. before adding -x * log1pmx(.) = -x * -8.75156e-07 = 8.75156e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.75156e+300); yl+yh= 8.75156e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.20385e+306); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=1: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=2: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 j=3: ( 0, -1.26591e+307); ( 0, -1.26591e+307); yl+yh= -1.26591e+307 3. after ADD1(M): yl,yh = ( 0, 2.2851e+307); yl+yh= 2.2851e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.28378e+307); yl+yh= 1.28378e+307 ebd0(x=1e+307, M=3.58968e+307): M/x = (r=0.897420546177039) * 2^(e=2); i=102, f=1140, fg=f*2^-(e+10)=0.27832 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.107312 -4.72853e-09 -4.29763e-16 5.35114e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0009185325763435404 1a. before adding -x * log1pmx(.) = -x * -4.2211e-07 = 4.2211e+300 1. after A.(-x*l..): yl,yh = ( 0, 4.2211e+300); yl+yh= 4.2211e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.07312e+306); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=1: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=2: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 j=3: ( 0, -1.27898e+307); ( 0, -1.27898e+307); yl+yh= -1.27898e+307 3. after ADD1(M): yl,yh = ( 0, 2.3107e+307); yl+yh= 2.3107e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.31162e+307); yl+yh= 1.31162e+307 ebd0(x=1e+307, M=3.62877e+307): M/x = (r=0.907192815213034) * 2^(e=2); i=104, f=1130, fg=f*2^-(e+10)=0.275879 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0985011 4.97073e-09 4.13051e-16 6.31345e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.001101446475320625 1a. before adding -x * log1pmx(.) = -x * -6.06147e-07 = 6.06147e+300 1. after A.(-x*l..): yl,yh = ( 0, 6.06147e+300); yl+yh= 6.06147e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 9.85017e+305); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=1: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=2: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 j=3: ( 0, -1.28779e+307); ( 0, -1.28779e+307); yl+yh= -1.28779e+307 3. after ADD1(M): yl,yh = ( 0, 2.34098e+307); yl+yh= 2.34098e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.33988e+307); yl+yh= 1.33988e+307 ebd0(x=1e+307, M=3.66829e+307): M/x = (r=0.917071497281936) * 2^(e=2); i=107, f=1116, fg=f*2^-(e+10)=0.272461 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0860343 -5.3048e-09 5.12758e-17 1.46362e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0005353603841400562 1a. before adding -x * log1pmx(.) = -x * -1.43357e-07 = 1.43357e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.43357e+300); yl+yh= 1.43357e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 8.60345e+305); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=1: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=2: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 j=3: ( 0, -1.30026e+307); ( 0, -1.30026e+307); yl+yh= -1.30026e+307 3. after ADD1(M): yl,yh = ( 0, 2.36803e+307); yl+yh= 2.36803e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.36856e+307); yl+yh= 1.36856e+307 ebd0(x=1e+307, M=3.70823e+307): M/x = (r=0.9270577511457) * 2^(e=2); i=109, f=1106, fg=f*2^-(e+10)=0.27002 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0770334 5.74957e-09 -2.50385e-16 -1.84614e-23 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.00129479762416461 1a. before adding -x * log1pmx(.) = -x * -8.37528e-07 = 8.37528e+300 1. after A.(-x*l..): yl,yh = ( 0, 8.37528e+300); yl+yh= 8.37528e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 7.70342e+305); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=1: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=2: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 j=3: ( 0, -1.30926e+307); ( 0, -1.30926e+307); yl+yh= -1.30926e+307 3. after ADD1(M): yl,yh = ( 0, 2.39897e+307); yl+yh= 2.39897e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.39768e+307); yl+yh= 1.39768e+307 ebd0(x=1e+307, M=3.74861e+307): M/x = (r=0.937152748184372) * 2^(e=2); i=112, f=1092, fg=f*2^-(e+10)=0.266602 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0642944 -2.42208e-09 -2.05559e-16 8.60291e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006144521315096685 1a. before adding -x * log1pmx(.) = -x * -1.88853e-07 = 1.88853e+300 1. after A.(-x*l..): yl,yh = ( 0, 1.88853e+300); yl+yh= 1.88853e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.42945e+305); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=1: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=2: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 j=3: ( 0, -1.322e+307); ( 0, -1.322e+307); yl+yh= -1.322e+307 3. after ADD1(M): yl,yh = ( 0, 2.42661e+307); yl+yh= 2.42661e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.42723e+307); yl+yh= 1.42723e+307 ebd0(x=1e+307, M=3.78943e+307): M/x = (r=0.947357672533489) * 2^(e=2); i=115, f=1079, fg=f*2^-(e+10)=0.263428 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0523182 -3.55743e-09 9.19116e-17 -5.32146e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.001758858726919513 1a. before adding -x * log1pmx(.) = -x * -1.54861e-06 = 1.54861e+301 1. after A.(-x*l..): yl,yh = ( 0, 1.54861e+301); yl+yh= 1.54861e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 5.23197e+305); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=1: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=2: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 j=3: ( 0, -1.33397e+307); ( 0, -1.33397e+307); yl+yh= -1.33397e+307 3. after ADD1(M): yl,yh = ( 0, 2.45546e+307); yl+yh= 2.45546e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.45721e+307); yl+yh= 1.45721e+307 ebd0(x=1e+307, M=3.83069e+307): M/x = (r=0.957673721222979) * 2^(e=2); i=117, f=1070, fg=f*2^-(e+10)=0.26123 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0439421 -1.79501e-09 -5.38174e-17 -1.39962e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0006942204185425924 1a. before adding -x * log1pmx(.) = -x * -2.4086e-07 = 2.4086e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.4086e+300); yl+yh= 2.4086e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 4.39424e+305); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=1: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=2: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 j=3: ( 0, -1.34235e+307); ( 0, -1.34235e+307); yl+yh= -1.34235e+307 3. after ADD1(M): yl,yh = ( 0, 2.48834e+307); yl+yh= 2.48834e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.48765e+307); yl+yh= 1.48765e+307 ebd0(x=1e+307, M=3.87241e+307): M/x = (r=0.968102104317573) * 2^(e=2); i=120, f=1057, fg=f*2^-(e+10)=0.258057 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0317182 6.87235e-10 -6.43048e-18 1.35087e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.0006992927112555431 1a. before adding -x * log1pmx(.) = -x * -2.44619e-07 = 2.44619e+300 1. after A.(-x*l..): yl,yh = ( 0, 2.44619e+300); yl+yh= 2.44619e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 3.17184e+305); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=1: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=2: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 j=3: ( 0, -1.35458e+307); ( 0, -1.35458e+307); yl+yh= -1.35458e+307 3. after ADD1(M): yl,yh = ( 0, 2.51783e+307); yl+yh= 2.51783e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.51853e+307); yl+yh= 1.51853e+307 ebd0(x=1e+307, M=3.91458e+307): M/x = (r=0.97864404505874) * 2^(e=2); i=123, f=1044, fg=f*2^-(e+10)=0.254883 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.019343 1.90686e-10 -1.06359e-17 -5.30049e-25 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = -0.002241813436206719 1a. before adding -x * log1pmx(.) = -x * -2.51663e-06 = 2.51663e+301 1. after A.(-x*l..): yl,yh = ( 0, 2.51663e+301); yl+yh= 2.51663e+301 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.93455e+305); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=1: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=2: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 j=3: ( 0, -1.36695e+307); ( 0, -1.36695e+307); yl+yh= -1.36695e+307 3. after ADD1(M): yl,yh = ( 0, 2.54763e+307); yl+yh= 2.54763e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.54987e+307); yl+yh= 1.54987e+307 ebd0(x=1e+307, M=3.9572e+307): M/x = (r=0.989300780008178) * 2^(e=2); i=125, f=1036, fg=f*2^-(e+10)=0.25293 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.0116506 9.16889e-10 -1.58487e-17 -1.35049e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 0.0008941485238985746 1a. before adding -x * log1pmx(.) = -x * -3.99513e-07 = 3.99513e+300 1. after A.(-x*l..): yl,yh = ( 0, 3.99513e+300); yl+yh= 3.99513e+300 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 1.1651e+305); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=1: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=2: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 j=3: ( 0, -1.37464e+307); ( 0, -1.37464e+307); yl+yh= -1.37464e+307 3. after ADD1(M): yl,yh = ( 0, 2.58256e+307); yl+yh= 2.58256e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.58167e+307); yl+yh= 1.58167e+307 ebd0(x=1e+307, M=4.00029e+307): M/x = (r=0.500036779596429) * 2^(e=3); i=0, f=2048, fg=f*2^-(e+10)=0.25 bd0_sc[0][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) i -> bd0_sc[i][0..3]= (0.693147 -1.90465e-09 -8.78318e-17 3.06184e-24 ) small(?) (M*fg-x)/x = (M*fg)/x - 1 = 7.355919285710108e-05 1a. before adding -x * log1pmx(.) = -x * -2.70534e-09 = 2.70534e+298 1. after A.(-x*l..): yl,yh = ( 0, 2.70534e+298); yl+yh= 2.70534e+298 2: A(x*b[i,j]) and A(-x*e*b[0,j]), j=1:4: j=0: ( 0, 6.93147e+306); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=1: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=2: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 j=3: ( 0, -1.38629e+307); ( 0, -1.38629e+307); yl+yh= -1.38629e+307 3. after ADD1(M): yl,yh = ( 0, 2.614e+307); yl+yh= 2.614e+307 4. after ADD1(- M*fg): yl,yh = ( 0, 1.61393e+307); yl+yh= 1.61393e+307 bd0(x=1e+307, np=2.50018e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.52741e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.55493e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.58275e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.61088e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.63931e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.66805e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.6971e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.72647e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.75616e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.78617e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.81651e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.84718e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.87818e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.90953e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.94121e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.97324e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.00561e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.03834e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.07143e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.10487e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.13868e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.17286e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.20741e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.24234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.27764e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.31334e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.34942e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.38589e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.42276e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.46003e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.49771e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.53579e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.5743e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.61322e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.65256e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.69234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.73254e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.77319e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.81428e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.85581e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.8978e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.94024e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.98315e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.02652e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.07037e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.11469e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.1595e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.20479e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.25058e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.29686e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.34365e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.39095e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.43877e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.4871e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.53596e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.58536e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.63529e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.68576e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.73679e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.78837e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.84051e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.89322e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.9465e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.00037e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.05482e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.10986e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.1655e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.22175e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.27861e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.33609e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.3942e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.45294e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.51232e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.57234e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.63302e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.69436e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.75637e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.81905e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.88242e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=5.94647e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.01123e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.07668e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.14285e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.20975e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.27737e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.34572e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.41482e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.48467e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.55529e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.62667e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.69883e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.77178e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.84552e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.92006e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=6.99541e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.07159e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.14859e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.22644e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.30513e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.38467e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.46509e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.54638e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.62855e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.71162e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.7956e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.88048e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=7.9663e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.05304e+306): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=8.14074e+306): |x-np| not too "small" -> direct formula bd0(1e+307, 8.22938e+306): T.series w/ 76 terms -> bd0=1.78124e+305 bd0(1e+307, 8.31899e+306): T.series w/ 74 terms -> bd0=1.59431e+305 bd0(1e+307, 8.40958e+306): T.series w/ 73 terms -> bd0=1.41715e+305 bd0(1e+307, 8.50116e+306): T.series w/ 71 terms -> bd0=1.24985e+305 bd0(1e+307, 8.59373e+306): T.series w/ 69 terms -> bd0=1.09252e+305 bd0(1e+307, 8.68731e+306): T.series w/ 67 terms -> bd0=9.45278e+304 bd0(1e+307, 8.78191e+306): T.series w/ 65 terms -> bd0=8.08221e+304 bd0(1e+307, 8.87754e+306): T.series w/ 63 terms -> bd0=6.81466e+304 bd0(1e+307, 8.97421e+306): T.series w/ 61 terms -> bd0=5.65124e+304 bd0(1e+307, 9.07193e+306): T.series w/ 59 terms -> bd0=4.59308e+304 bd0(1e+307, 9.17071e+306): T.series w/ 57 terms -> bd0=3.64134e+304 bd0(1e+307, 9.27058e+306): T.series w/ 55 terms -> bd0=2.79717e+304 bd0(1e+307, 9.37153e+306): T.series w/ 52 terms -> bd0=2.06174e+304 bd0(1e+307, 9.47358e+306): T.series w/ 50 terms -> bd0=1.43624e+304 bd0(1e+307, 9.57674e+306): T.series w/ 47 terms -> bd0=9.21864e+303 bd0(1e+307, 9.68102e+306): T.series w/ 44 terms -> bd0=5.19822e+303 bd0(1e+307, 9.78644e+306): T.series w/ 40 terms -> bd0=2.31338e+303 bd0(1e+307, 9.89301e+306): T.series w/ 35 terms -> bd0=5.76482e+302 bd0(1e+307, 1.00007e+307): T.series w/ 18 terms -> bd0=2.70534e+298 bd0(1e+307, 1.01096e+307): T.series w/ 35 terms -> bd0=5.96651e+302 bd0(1e+307, 1.02197e+307): T.series w/ 40 terms -> bd0=2.37913e+303 bd0(1e+307, 1.0331e+307): T.series w/ 44 terms -> bd0=5.36037e+303 bd0(1e+307, 1.04435e+307): T.series w/ 47 terms -> bd0=9.55343e+303 bd0(1e+307, 1.05572e+307): T.series w/ 50 terms -> bd0=1.49715e+304 bd0(1e+307, 1.06722e+307): T.series w/ 52 terms -> bd0=2.16279e+304 bd0(1e+307, 1.07884e+307): T.series w/ 55 terms -> bd0=2.95362e+304 bd0(1e+307, 1.09059e+307): T.series w/ 57 terms -> bd0=3.871e+304 bd0(1e+307, 1.10246e+307): T.series w/ 59 terms -> bd0=4.91629e+304 bd0(1e+307, 1.11447e+307): T.series w/ 61 terms -> bd0=6.09091e+304 bd0(1e+307, 1.1266e+307): T.series w/ 63 terms -> bd0=7.39626e+304 bd0(1e+307, 1.13887e+307): T.series w/ 65 terms -> bd0=8.83375e+304 bd0(1e+307, 1.15127e+307): T.series w/ 67 terms -> bd0=1.04048e+305 bd0(1e+307, 1.16381e+307): T.series w/ 69 terms -> bd0=1.2111e+305 bd0(1e+307, 1.17648e+307): T.series w/ 71 terms -> bd0=1.39536e+305 bd0(1e+307, 1.18929e+307): T.series w/ 73 terms -> bd0=1.59342e+305 bd0(1e+307, 1.20225e+307): T.series w/ 74 terms -> bd0=1.80544e+305 bd0(1e+307, 1.21534e+307): T.series w/ 76 terms -> bd0=2.03156e+305 bd0(x=1e+307, np=1.22857e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.24195e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.25547e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.26914e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.28296e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.29693e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.31106e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.32533e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.33977e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.35436e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.3691e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.38401e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.39908e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.41432e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.42972e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.44529e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.46103e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.47693e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.49302e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.50928e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.52571e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.54232e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.55912e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.5761e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.59326e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.61061e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.62815e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.64588e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.6638e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.68192e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.70023e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.71875e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.73746e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.75638e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.77551e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.79484e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.81439e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.83414e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.85412e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.87431e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.89472e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.91535e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.9362e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.95729e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=1.9786e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.00015e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.02193e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.04394e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.0662e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.0887e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.11145e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.13444e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.15768e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.18118e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.20493e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.22894e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.25321e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.27774e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.30255e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.32762e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.35297e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.37859e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.40449e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.43067e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.45714e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.4839e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.51095e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.53829e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.56593e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.59387e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.62212e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.65067e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.67953e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.70871e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.73821e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.76802e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.79817e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.82864e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.85944e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.89057e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.92205e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.95387e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=2.98604e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.01855e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.05142e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.08465e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.11824e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.15219e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.18652e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.22122e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.25629e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.29175e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.3276e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.36383e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.40046e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.43749e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.47492e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.51276e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.55101e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.58968e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.62877e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.66829e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.70823e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.74861e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.78943e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.83069e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.87241e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.91458e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=3.9572e+307): |x-np| not too "small" -> direct formula bd0(x=1e+307, np=4.00029e+307): |x-np| not too "small" -> direct formula > p.relE(bd0.2)#, dFac=1) #=========== 95 np[]/dFac values inside delta-range = [6.011e+306, 1.664e+307] > p.relE(bd0.2, log = "xy") 95 np[]/dFac values inside delta-range = [6.011e+306, 1.664e+307] > > ### --- 2025-05 (inspired by ~/R/MM/NUMERICS/dpq-functions/dbinom_Lrg-bug.R ): > > ## dbinom_raw(x=1.2e+308, n=1.72e+308, p=0.2, q=0.8, give_log=1): --> > str(bd0_fns <- sfsmisc::list_(bd0, ebd0, bd0_l1pm, bd0_p1l1d, bd0_p1l1d1)) List of 5 $ bd0 :function (x, np, delta = 0.1, maxit = max(1L, as.integer(-1100/log2(delta))), s0 = .Machine$double.xmin, verbose = getOption("verbose")) $ ebd0 :function (x, M, verbose = getOption("verbose"), ...) $ bd0_l1pm :function (x, M, tol_logcf = 1e-14, ...) $ bd0_p1l1d :function (x, M, tol_logcf = 1e-14, ...) $ bd0_p1l1d1:function (x, M, tol_logcf = 1e-14, ...) > stopifnot(sapply(bd0_fns, is.function)) # fails e.g. when have 'bd0' matrix > ## x ~= M = np = 3.44e307 > ## tail(x34.7 <- 1e307*seq(1, 18, by=1/32)) # the last is Inf ==> have fixed all bd0() functions > ## for speed, interactive > tail(x34.7 <- 1e307*seq(1, 18, by=1/ 4)) [1] 1.675e+308 1.700e+308 1.725e+308 1.750e+308 1.775e+308 Inf > > lBM <- lapply(bd0_fns, \(BD0) BD0(x34.7, 3.44e+307)) ## gave if( ) error ! > ## because of the following error [because it called log1pmx(NaN, ..) giving NaN]; now ok: Inf > bd0_l1pm(Inf, 3.44e+307) [1] Inf > stopifnot(identical(Inf, bd0_l1pm(Inf, 3.44e+307)), + identical(-Inf, log1pmx(Inf))) # now log1pmx(Inf) |--> -Inf correctly > > mBM <- cbind(do.call(cbind, lBM[-2]), ebd0 = with(lBM$ebd0, yl+yh)) > cbind(x=x34.7, mBM) # after fixes: too early overflow to Inf *only* happens for ebd0() x bd0 bd0_l1pm bd0_p1l1d [1,] 1.000e+307 1.20452853e+307 1.20452853e+307 1.20452853e+307 [2,] 1.250e+307 9.24590100e+306 9.24590100e+306 9.24590100e+306 [3,] 1.500e+307 6.94990455e+306 6.94990455e+306 6.94990455e+306 [4,] 1.750e+307 5.07252554e+306 5.07252554e+306 5.07252554e+306 [5,] 2.000e+307 3.55351418e+306 3.55351418e+306 3.55351418e+306 [6,] 2.250e+307 2.34782176e+306 2.34782176e+306 2.34782176e+306 [7,] 2.500e+307 1.42048151e+306 1.42048151e+306 1.42048151e+306 [8,] 2.750e+307 7.43559608e+305 7.43559608e+305 7.43559608e+305 [9,] 3.000e+307 2.94224518e+305 2.94224518e+305 2.94224518e+305 [10,] 3.250e+307 5.34645611e+304 5.34645611e+304 5.34645611e+304 [11,] 3.500e+307 5.20239885e+303 5.20239885e+303 5.20239885e+303 [12,] 3.750e+307 1.35663822e+305 1.35663822e+305 1.35663822e+305 [13,] 4.000e+307 4.32915589e+305 4.32915589e+305 4.32915589e+305 [14,] 4.250e+307 8.86519241e+305 8.86519241e+305 8.86519241e+305 [15,] 4.500e+307 1.48726664e+306 1.48726664e+306 1.48726664e+306 [16,] 4.750e+307 2.22697447e+306 2.22697447e+306 2.22697447e+306 [17,] 5.000e+307 3.09832205e+306 3.09832205e+306 3.09832205e+306 [18,] 5.250e+307 4.09472177e+306 4.09472177e+306 4.09472177e+306 [19,] 5.500e+307 5.21021415e+306 5.21021415e+306 5.21021415e+306 [20,] 5.750e+307 6.43938205e+306 6.43938205e+306 6.43938205e+306 [21,] 6.000e+307 7.77727987e+306 7.77727987e+306 7.77727987e+306 [22,] 6.250e+307 9.21937452e+306 9.21937452e+306 9.21937452e+306 [23,] 6.500e+307 1.07614959e+307 1.07614959e+307 1.07614959e+307 [24,] 6.750e+307 1.23997948e+307 1.23997948e+307 1.23997948e+307 [25,] 7.000e+307 1.41307074e+307 1.41307074e+307 1.41307074e+307 [26,] 7.250e+307 1.59509248e+307 1.59509248e+307 1.59509248e+307 [27,] 7.500e+307 1.78573662e+307 1.78573662e+307 1.78573662e+307 [28,] 7.750e+307 1.98471563e+307 1.98471563e+307 1.98471563e+307 [29,] 8.000e+307 2.19176056e+307 2.19176056e+307 2.19176056e+307 [30,] 8.250e+307 2.40661926e+307 2.40661926e+307 2.40661926e+307 [31,] 8.500e+307 2.62905488e+307 2.62905488e+307 2.62905488e+307 [32,] 8.750e+307 2.85884450e+307 2.85884450e+307 2.85884450e+307 [33,] 9.000e+307 3.09577795e+307 3.09577795e+307 3.09577795e+307 [34,] 9.250e+307 3.33965674e+307 3.33965674e+307 3.33965674e+307 [35,] 9.500e+307 3.59029311e+307 3.59029311e+307 3.59029311e+307 [36,] 9.750e+307 3.84750918e+307 3.84750918e+307 3.84750918e+307 [37,] 1.000e+308 4.11113622e+307 4.11113622e+307 4.11113622e+307 [38,] 1.025e+308 4.38101390e+307 4.38101390e+307 4.38101390e+307 [39,] 1.050e+308 4.65698975e+307 4.65698975e+307 4.65698975e+307 [40,] 1.075e+308 4.93891854e+307 4.93891854e+307 4.93891854e+307 [41,] 1.100e+308 5.22666182e+307 5.22666182e+307 5.22666182e+307 [42,] 1.125e+308 5.52008739e+307 5.52008739e+307 5.52008739e+307 [43,] 1.150e+308 5.81906899e+307 5.81906899e+307 5.81906899e+307 [44,] 1.175e+308 6.12348579e+307 6.12348579e+307 6.12348579e+307 [45,] 1.200e+308 6.43322214e+307 6.43322214e+307 6.43322214e+307 [46,] 1.225e+308 6.74816720e+307 6.74816720e+307 6.74816720e+307 [47,] 1.250e+308 7.06821466e+307 7.06821466e+307 7.06821466e+307 [48,] 1.275e+308 7.39326245e+307 7.39326245e+307 7.39326245e+307 [49,] 1.300e+308 7.72321252e+307 7.72321252e+307 7.72321252e+307 [50,] 1.325e+308 8.05797057e+307 8.05797057e+307 8.05797057e+307 [51,] 1.350e+308 8.39744589e+307 8.39744589e+307 8.39744589e+307 [52,] 1.375e+308 8.74155110e+307 8.74155110e+307 8.74155110e+307 [53,] 1.400e+308 9.09020202e+307 9.09020202e+307 9.09020202e+307 [54,] 1.425e+308 9.44331745e+307 9.44331745e+307 9.44331745e+307 [55,] 1.450e+308 9.80081908e+307 9.80081908e+307 9.80081908e+307 [56,] 1.475e+308 1.01626313e+308 1.01626313e+308 1.01626313e+308 [57,] 1.500e+308 1.05286809e+308 1.05286809e+308 1.05286809e+308 [58,] 1.525e+308 1.08988975e+308 1.08988975e+308 1.08988975e+308 [59,] 1.550e+308 1.12732126e+308 1.12732126e+308 1.12732126e+308 [60,] 1.575e+308 1.16515601e+308 1.16515601e+308 1.16515601e+308 [61,] 1.600e+308 1.20338760e+308 1.20338760e+308 1.20338760e+308 [62,] 1.625e+308 1.24200984e+308 1.24200984e+308 1.24200984e+308 [63,] 1.650e+308 1.28101670e+308 1.28101670e+308 1.28101670e+308 [64,] 1.675e+308 1.32040237e+308 1.32040237e+308 1.32040237e+308 [65,] 1.700e+308 1.36016118e+308 1.36016118e+308 1.36016118e+308 [66,] 1.725e+308 1.40028766e+308 1.40028766e+308 1.40028766e+308 [67,] 1.750e+308 1.44077647e+308 1.44077647e+308 1.44077647e+308 [68,] 1.775e+308 1.48162243e+308 1.48162243e+308 1.48162243e+308 [69,] Inf Inf Inf Inf bd0_p1l1d1 ebd0 [1,] 1.20452853e+307 1.20452853e+307 [2,] 9.24590100e+306 9.24590100e+306 [3,] 6.94990455e+306 6.94990455e+306 [4,] 5.07252554e+306 5.07252554e+306 [5,] 3.55351418e+306 3.55351418e+306 [6,] 2.34782176e+306 2.34782176e+306 [7,] 1.42048151e+306 1.42048151e+306 [8,] 7.43559608e+305 7.43559608e+305 [9,] 2.94224518e+305 2.94224518e+305 [10,] 5.34645611e+304 5.34645611e+304 [11,] 5.20239885e+303 5.20239885e+303 [12,] 1.35663822e+305 1.35663822e+305 [13,] 4.32915589e+305 4.32915589e+305 [14,] 8.86519241e+305 8.86519241e+305 [15,] 1.48726664e+306 1.48726664e+306 [16,] 2.22697447e+306 2.22697447e+306 [17,] 3.09832205e+306 3.09832205e+306 [18,] 4.09472177e+306 4.09472177e+306 [19,] 5.21021415e+306 5.21021415e+306 [20,] 6.43938205e+306 6.43938205e+306 [21,] 7.77727987e+306 7.77727987e+306 [22,] 9.21937452e+306 9.21937452e+306 [23,] 1.07614959e+307 1.07614959e+307 [24,] 1.23997948e+307 1.23997948e+307 [25,] 1.41307074e+307 1.41307074e+307 [26,] 1.59509248e+307 1.59509248e+307 [27,] 1.78573662e+307 1.78573662e+307 [28,] 1.98471563e+307 1.98471563e+307 [29,] 2.19176056e+307 2.19176056e+307 [30,] 2.40661926e+307 2.40661926e+307 [31,] 2.62905488e+307 2.62905488e+307 [32,] 2.85884450e+307 2.85884450e+307 [33,] 3.09577795e+307 3.09577795e+307 [34,] 3.33965674e+307 3.33965674e+307 [35,] 3.59029311e+307 3.59029311e+307 [36,] 3.84750918e+307 3.84750918e+307 [37,] 4.11113622e+307 4.11113622e+307 [38,] 4.38101390e+307 4.38101390e+307 [39,] 4.65698975e+307 4.65698975e+307 [40,] 4.93891854e+307 4.93891854e+307 [41,] 5.22666182e+307 5.22666182e+307 [42,] 5.52008739e+307 5.52008739e+307 [43,] 5.81906899e+307 5.81906899e+307 [44,] 6.12348579e+307 6.12348579e+307 [45,] 6.43322214e+307 Inf [46,] 6.74816720e+307 Inf [47,] 7.06821466e+307 Inf [48,] 7.39326245e+307 Inf [49,] 7.72321252e+307 Inf [50,] 8.05797057e+307 Inf [51,] 8.39744589e+307 Inf [52,] 8.74155110e+307 Inf [53,] 9.09020202e+307 Inf [54,] 9.44331745e+307 Inf [55,] 9.80081908e+307 Inf [56,] 1.01626313e+308 Inf [57,] 1.05286809e+308 Inf [58,] 1.08988975e+308 Inf [59,] 1.12732126e+308 Inf [60,] 1.16515601e+308 Inf [61,] 1.20338760e+308 Inf [62,] 1.24200984e+308 Inf [63,] 1.28101670e+308 Inf [64,] 1.32040237e+308 Inf [65,] 1.36016118e+308 Inf [66,] 1.40028766e+308 Inf [67,] 1.44077647e+308 Inf [68,] 1.48162243e+308 Inf [69,] Inf Inf > ## and *bd0*(Inf, ) \--> Inf now > stopifnot(tail(mBM,1) == Inf) > > if(!doExtras) # gets too expensive + quit("no") ## FIXME: do not quit: use less precision, etc > proc.time() user system elapsed 9.76 0.25 10.00