testlist <- list(X1 = structure(c(1.19670411826787e-209, 4.80782561279003e-210,  9.4186454527973e-213, 2.39121000426811e+255, 5.85102127515217e+21,  2.29853815741688e+144, 3.48324562365681e-208, 6.58982650135396e-147,  2.49130917450411e+142, 1.27091189093825e-92, 8.39240602580494e+189,  1.03981799815558e+133, 5.87822763792527e+280, 8.0892511423526e-19,  4.30478829828809e+288, 1.2603136267274e-188, 2.06694285600991e-274,  2.30738354565625e-43, 5.14619117480784e+240, 8.57569256233029e-121,  2.3337949518873e-268, 5.11376353035364e+295, 6.03239149555036e+233,  2.54693684111425e+149, 3.00620947992961e-261, 5.67582791440677e+190,  1.96308126114429e-103, 4.87780183215501e+88, 6.01984221284531e+167,  3.77511839101847e+136, 1.2302091734139e-200, 2.29276349637849e+136,  2.56667157230121e+92, 4.00111969680921e+244, 3.35665878248002e+238,  1.10203416515727e+141, 1.4188495174183e-264, 1.5986278241122e+39,  3.66876879243936e+227, 2.37202967300003e-250, 3.73248064171826e-275,  7.04777664071882e-280, 2.6345278215378e+175, 5.06503197507957e+39,  2.82948326762206e+234, 2.00548025544771e+142, 2.2669510459367e-254,  1.30000530550773e-67, 2.34042082081998e-231, 3.85600502926667e+172,  7.44185400436707e-259, 1.80699795475558e-07, 4.20508056550682e-111,  5.79613725168517e-227, 7.1170407931544e-203, 5.23625983162943e+215,  6.23561806975003e-55, 5.00479583629425e+163, 1.42703585677247e-305,  1.57840692405332e-120, 1.1937250583366e-176, 5.23063725914263e-245,  6.41467994592712e+250, 9.28316162630901e-197, 1.97356646830696e-118,  4.49528491707856e+260, 1.12277563743776e-54, 7.76104048829922e+57,  1.69678228235211e+201, 1.16681878796724e-211), .Dim = c(10L,  7L)), X2 = structure(c(4.12399608014909e+259, 4.68083355015072e-83,  3.41159710722897e-26, 3.30950943583998e-236, 2.48804784389923e-238,  3.31796691781467e-203, 7315473305731.17, 2.01942939626486e-38,  2.08343069130303e-90, 1.43993670958155e+295, 6.38803330104635e-36,  2.46134037443329e-93), .Dim = 3:4))
result <- do.call(hetGP:::matern5_2_2args,testlist)
str(result)