testlist <- list(lev = 4.4202042452866e+53, wt = c(2.73719361163364e+295,  2.92900324658118e-216, -4.51287986766113e+77, 1.86243232940221e+99,  7.80182158084564e+131, -8.18906313329176e+239, 1.09008333847128e+278,  -1.42290244680944e+104, 5.35239761183079e+139, -2.87030211012701e-179,  -9.53879186851483e+43, -1.26980756195667e-297, 2.6417424606687e+59,  -2.75302693123076e-99, -5.35863351619942e-81, 3.96756585909792e+68,  -3.87894466457971e-243, 1.23896136971376e+181, -1.42641605585865e-07,  1.93578773291638e+263, 5.4557135899478e-204, -4.83473138985403e+108,  -2.60296590160701e+251, 7.08384975919961e-307, -6.96322752717172e-63,  -1.50858295109018e-58, -1.81173778022002e-187, -1.84569159193124e+173,  2.54156547459913e-235, 2.16145087211101e-294, 3.08731726369003e-260,  6.51074932911504e+264, 1.53645228293803e+212, -2.33737121293649e+205,  -9.51909039061483e+245, -9.02690248573648e-30, 5.36890446239511e+99,  -5.62559126042385e-126, -3.71599854963586e-37, -5.28240348676978e+130,  1.03569001961189e-128, -1.76406439616988e+268, 1.15664223318586e+197,  -1.07502248210586e+295, 1.03825114750441e-298, -1.80005046994622e-37,  -2.76627647397615e-250, 5.28746393768177e+32, -4788353.23747237,  -1.49297353698206e+75, -1663856952842438, 1.38966684390736e+152,  3.95961956313422e+288, 3.1408383478081e+241, -5.16064870990078e+24,  -2.73030013438184e+31, 1.18809110896577e+259, 1.38017823488422e-195,  -1.33728258440434e-205, 2.76598534865514e-55, -1.71979924003729e+168,  -43774903924.7914, 1.10654424712518e-260, 9.63724485358331e-288,  1.13257621087791e-144, 2.68853123228763e-82, 5.1151696029099e+134,  5.73746498269828e-49, 4.59649370321738e+292, 4.97726723186847e-232,  8.12683245605101e-142, -6.33403756849559e-217, 4.19306129787504e-37,  -4.44814722633232e+250, 2.44202811536371e+55, -6.95688058128087e-75,  8.26300453880918e-36, -28773.748604199, -1.48567416007493e+265,  -2.04821328120415e+164, -8.78433682269664e-88, 2.96590143376315e-223,  1.70405393152905e-41, -1.82422590315819e+270, -9.03656842945088e+132,  6.35745589855559e-171, -4.66517780742159e+283, 9.44824822237778e+44,  -1.8886825827078e+42, 3.47037633569615e+267, -3.32003909058287e-143,  2.16622845542217e-50, 20.7712924517155, -5.69428763761092e-78,  3.02745341958746e-58, 3.18508358698268e-35, -5.48047794559362e+205,  -5.81729240396498e-239, -3.17429381664099e+88, -2.35580994086127e+261 ), y1 = c(-3.08809862841351e-28, 4.97837408411559e+216, 1.62350910311367e-105,  1.66113344292382e-251, 1.25551844154873e-154, 5.25630532798962e+101,  -6.36353443696742e+84, -3.08809862841351e-28, Inf, -6.31871646235239e-114,  9.06724609234744e+20, 8.3047789868597e+149, Inf, 7.93562580184883e+263,  -3.08809862841351e-28, 3.22641467835217e-90, -5.65639569809778e-263,  3.86297665277652e-169, 2.72222672157103e+148, 0), y2 = c(3.67388314886407e+221,  NaN, -Inf))
result <- do.call(DStree:::hazard,testlist)
str(result)