testlist <- list(Dx = structure(c(2.48483562613836e-170, 4.16342892617605e+93,  3.94506079667928e-98, 8.45068344748252e-14, 1.36787163661302e+205,  2.40230521569381e-116, 5.03131342048056e-05, 6.15110510282238e-208,  1.30566644341442e-13, 5.15552242074252e+211, 1.59079591453798e-171,  3.81374888328904e-286, 4.39293436667339e+151, 4.05860621747173e+135,  1.07687466128135e-27, 24087813.683382, 8.42456048759882e+287,  4.14689831678401e-199, 1.14939214548436e-84, 3.66145074242765e-187,  1.10731451991749e-189, 3.8302133932346e-196, 1.29088400942944e+41,  6.85805536397175e-83, 3.92656671935898e+160, 2.59046854374653e+82,  7.17704852373404e-181, 1.91434398063802e-202, 6.65814708776147e+54,  6.49658361721159e-111, 1.8605318179639e-180, 2.58456063733637e+112,  2.20499588454956e-50, 8.67028600581083e-225, 2.21990876481365e-211,  4.73453870752072e-47, 4.50303793172165e+98, 1.66489464530402e+41,  3.24805096654249e-224, 1.55149581511815e-190, 2.75743700947311e-44,  3.38724528839745e+112, 1.67242128027455e-204, 8.92310671316043e+268,  7.96627622209901e-247, 1.54859740448241e+66, 2.5349531606548e-170,  1.32121061434366e-121, 2.54220530554139e-105, 6.83419594577412e-140,  5.03747168382047e-90, 3.08231779916987e+217, 2.45689946594497e-223,  5.72853304790598e-33, 1.70053431595439e+237, 1.72079097481911e+43,  6.84269135883053e+196, 1.61285601358681e+37, 4.63745509912307e+145,  4.54693419132963e-158, 9.76505934223517e-118, 4.01415349718671e-11,  1.85642065913165e-305, 1.41675369602142e-127, 4.49125597699781e-293,  1.74508542574747e-147, 6.12028641745225e+76, 3.49221184067109e+58,  1.59877306388738e+283, 1.31711148013074e+156, 4.22423684611746e-158,  3.0498725267622e-230, 4.37213102078069e-87, 7.2636169658808e-288,  1.28596675778344e+70, 3.66002167042336e+301, 2.94702327404257e-51,  2.07988044507173e-119, 1.24830932824285e+227, 6.05915291118716e+302,  3.06367114854921e-48, 9.6166298642464e+139, 1.01849819216505e-146,  2.49079310117411e+248, 6.42247596632411e+64, 7.46370386715773e+140,  2.43421780086526e-107, 2.54323800460759e-151, 2.38504648144002e-33,  2.89285892392184e+52, 3.17968879038285e-53, 1.03656338845879e-28,  5.15637905670555e-32, 2.27541848882925e-241, 5.73685139355125e-14,  9.6333623407517, 4.19668306865029e-119, 1.68461188162712e+277,  1.03329376454012e-117, 6.71379278835702e+251), .Dim = c(10L,  10L)), Dy = structure(c(2.07759043282757e+186, 6.89404499831377e+62,  2.07581766995827e+282, 1.22842477626837e+200, 1.02105471247233e-122,  2.55139129141608e-74, 1.64779415691958e+163, 3.89163177169555e+186,  8.2047529633507e-271, 9.89545986441445e-141, 4.32726782537561e+184,  1.68360845294529e-260, 8.98521975592413e-128, 1.23602736576247e+88,  8.95454675155567e+144, 1.45586910647054e+100, 0.000949678067142962,  2.28031237378802e+289, 2.67705832244587e-263, 1.58522628289885e-209,  3.09482434994575e-211, 3.44295272379574e-49, 2.17989723446006e-162,  1.77982274532304e+181, 7.01231888936055e+20, 2.57958569035136e-278,  5.22010066418825e+257, 1.49728006759878e-186, 1.76600612073723e+144,  8.42063741800235e+179, 1.83556103490017e+286, 1.30418006680136e+32 ), .Dim = c(8L, 4L)), Dz = structure(c(2.84930469848252e-238,  2.44845472132134e+101, 7.77928282836431e-06, 2.4279111540644e-270,  2.84707724865357e+30, 4.29027247183092e-137, 3.34168854471492e-180,  46983.6185157766, 3.43772898596291e-142, 6.57528991377065e-308,  2.44324101322545e+101, 0.0495913787736336, 1.22757376775161e+232,  8.32017591452223e-143, 5.65977971706169e-223, 1.36056416895038e-53,  3.03409907838573e-110, 7.30779544414927e+36, 9.39381387377325e+285,  3.28585504107326e-175, 4.38988143890231e-254, 3.27860435529058e+263,  5.10572097126713e-290, 1.22908769633124e+45, 1.77346490519837e+118,  3.51467706745473e-131, 2.32515995059578e+30, 96159274565832.8,  2.94469056528325e-13, 2.93346642010092e-124), .Dim = c(3L, 10L )))
result <- do.call(energy:::partial_dcor,testlist)
str(result)