testlist <- list(a = structure(c(7.85643505647315e+223, 3.90921269132824e-47,  4.65339170715379e-200, 1.90473247379493e-29, 1.15965248996976e-305,  5.06370308050782e+219, 1.08692880044367e+208, 5.10083998993783e-233,  4.51887825921049e+127, 4.83728228620512e-275, 5.08216545343315e+252,  7.19131719831239e-209, 8.33894349097531e-23, 2.82349449976704e-111,  4.20024525116052e-169, 3.39218252678003e+283, 1.96884475243967e-72,  1.86124221271984e+200, 2.2432991813285e+211, 4.43854451930556e+76,  1.46877233679213e-91, 1.53364585967831e+97, 6.23892537519037e+36,  1.45431151674497e+21, 5.71167854183915e+28, 3.71073135801829e-103,  3.47208558601128e+82, 1.23388999363799e-81, 8.80558182566188e+169,  3.55523445924142e+41, 8.44340404629108e-10, 1.87106291190143e-289,  2.76226695807767e-76, 1.67395670947573e+52, 1.79888907558887e+231,  1.15735157722351e-94, 68412877408.963, 2.92295695303634e-287,  1.1548947767448e-209, 3.29816144323427e+78, 2.37277703477708e-187,  1.57939722644916e-267, 8.26878247336116e+306, 5.84996400653102e-273,  2.45727496778531e+242, 4.11704960992296e-128, 6.86452065247005e+269,  8.50353765951048e+242, 1.07969035423431e-199, 5.07218726529408e+285,  8.02795870806142e+70, 1.49688257790252e+94, 2.6400797239241e-283,  2.13193801563728e+206, 2.83938244212954e+26, 1.92521677088318e+243,  5.80337242459363e-187, 7.29642139330157e+43, 1.05318341173385e+210,  3.89327350593362e-80, 6.60488776342738e+227, 1.97942588854135e-255,  8.25372480929075e+231, 1.08132203707243e+89, 7.59301573495608e+231,  7.73937477196804e-108, 1.28283583824088e+138, 1.47484675290995e-160,  5.89132913460287e+86, 2.41247309631105e-221, 2.01790956036728e+297,  6.2144652821978e+144, 2.74623342694417e+72, 3.70139719315728e-247,  1.50761550970513e-77, 5.74753224283964e+113, 8.14415722985766e-137,  1.54056037912078e+39, 4.40331814589494e-88, 4.02706922695622e+46,  5.58771727867438e-290, 2.19184022508479e-144, 7.66791692946519e-269,  1.27692015041145e+179, 4.44336479612875e-265, 2.23928742195378e-281,  1.08737053482556e+299, 3.29737933942708e+83, 5.50710223978354e-05,  1.83961661493237e-92), .Dim = 10:9), b = structure(c(3.06076703689305e-119,  4.65892372973754e-56, 9.79662120405925e-226, 6.43782415763619e+53,  3.77185335321981e-251, 6.01691147388576e+70, 8.27930700384288e+80,  1.54086985356112e-10, 9.62270968202271e-250, 1.22931234681658e+216,  1.49506312269387e-126, 7.57360233729195e-179, 3.85473035807015e+173,  6.61822395686951e-26, 7.79607875692019e-50, 1.43967630482036e-178,  6.84712325127276e+44, 2.31170773210328e+203, 3.03913698475362e-155,  19.8101645489075, 1.52844036574955e+165, 2.45098281875165e+103,  2.48239215601308e-296, 1.07543270832732e+72, 6.83502162574699e+137,  1.00714650955952e-75, 2.86863712463342e-241, 4.01318561421427e+224,  5.94192627945188e-301, 6.74325445042215e-123, 1.03237943462507e-209,  2.68089988399834e-19, 8.68903932281182e+144, 2.71449000861265e+45,  1.94713012953113e+24), .Dim = c(7L, 5L)), p = c(-2.13826590206085e-26,  Inf, 5.99303263835589e+158, 71825702108.8887, 3.4468068229235e+250,  -3.13258058502609e+161, 1.32893571353383e+298, 2.9481820428083e-55,  -8.51256362884974e-240, -3.79947008129811e-57, 6.11869339590331e-109,  1.35625633089873e-08, 3.42861442677451e+161, -3.57726083300028e-54,  -6.4168639936656e-108, -1.49553878555012e-40, -181232322883.514,  2.78872138987334e+281, -4.03585387078448e-302, -1.5595988168436e+255,  -8.58103669251967e+254, -8.59809849190242e-215, 9.9593067764473e-259,  NaN, -6.88624563750572e+216, -1.12854136714476e-262, 1.01361143622119e-81,  1.0246727084425e-47, -1.83299396962268e+291, -1.58382434220862e-86,  NaN, -2.12821768618388e-111, -27.5391425573065, NaN, 7.06322418539281e-65,  0))
result <- do.call(cort:::bivRho,testlist)
str(result)