testlist <- list(DAT = structure(c(3.10045080631114e-140, 5.64837120621297e+125, 4.06956751982026e+95, 6.59400621480488e+135, 1.18393360738069e-272, 5.35892842952669e-173, 2.86977581121643e-15, 2.2386738721768e+270, 2.98853116521547e+143, 3.08420528117937e+276, 3.33889424831818e-239, 2.00058425814441e-113, 2.46562043224079e-85, 1.89261876993418e-113, 1.78433108967668e+169, 9.46801839280429e-51, 2.48283345537456e-176, 8.21195771569161e+288, 4.5560582271321e+117, 1.0797329973067e+245, 3.91726596706926e-283, 2.36534175024629e+188, 4.62886637564784e+149, 1.95531992383552e-132, 2.24216371882707e+243, 3.15962229513625e-133, -Inf, 1.03502208669886e-277, 1.44329558427272e+189, 2.15560984776751e+185, 1.75933361941065e-114, 8.24221549962438e-287, 6.79398327699747e+55, 7.20263011526498e+40, 3.80926860974838e-156, 1.33550472691882e+204, 2.62538996893194e+129, 6.8576940616979e-16, 1.98743400939048e+154, 1.51886024823543e-282, 9.00123031400698e+84, 3.0243884984874e+234, 1.08707866440307e+120, 2.96591522379483e-146, 1.95816798750811e-131, 1.1753306209927e-122, 1.0936207305258e-194, 6.71962574015995e-160, Inf, -Inf, 1.92199862573809e-190, 4.96534090618195e+107, 1.35722207577192e-292, 3.18497333306282e+232, 3.64103714844602e-233, 2.88131094116101e+218, 76065827.688744, Inf, 2.8816084901775e+131, 1.27133442567742e+256, Inf, 2.58069493284837e+92, 1.83131586623993e+43, 2.30802117553111e-243, 3.00755495315194e+162, 9.88725471179051e+56, 6.83873559857537e-277, 4.07538849532164e+27, 1.15617076673217e+141, 5.3595347089513e+194, 1.83289283459492e-105, 3.22121394014806e-307, 5.10252627988266e-139, 1.55281134536723e-61, 2.06418845533417e+82, 8.83202732272626e-282, 4.79072923958292e+75, 6.2030748819062e-218, 27.5113146236504, 7.46244315476878e+67, 2460.21952908724), .Dim = c(9L, 9L)), DATRESP = structure(c(2.29157327002727e+103, 1.71090868935708e-32, 5.31232893578367e+184, 6147.55175587533, 6.93103357665744e+279, 5.92871189432898e+180), .Dim = c(6L, 1L )), GUESS = c(1.55591213325014e+162, 8.63031018389494e-255, NaN, 1.61089170743615e+221, NaN, -2.97824390177137e-198, -2.02672679124856e+265, -4.09672374931837e+105, -3.55042108182604e+163, -1.9150834128595e+25, 3.03926171802815e-246, 8.75722384783549e-71, -5.9539182104698e+28, 9.7054729016666e+22, NaN, -382818358160.389, -1.69542457924557e+47, 2.64297568621164e-111, 8.46097541770778e+100, -1.19732208473033e+90, -Inf), LATRESP = structure(c(NA, NaN, NA, 3.19343794378365e-193, 2.38321605042757e-73, 3.22001366855571e-128), .Dim = c(1L, 6L )), SLIP = c(-3.77063484535263e-05, 6.28890620448226e+190, 6.08729433160384e-232, -1.61117534396225e+300, 3.61015168119058e+131, 8.041084637703e-159, -9.63564433138483e-293, -9.60941475400201e+153, 2.76131403207845e+80, -1.18033525358934e+188, 1.55329352025042e+109, -3.02382294508374e+224, 7.50163458170595e-87, 4.20512184659921e-74, -2.84719579668055e-06, 4.50552038952894e+266, -1.92601461032577e-262, -3.28123543137527e-305, 1.22974973746519e-265, 3.11543962813383e-114, 5.2232756672494e-106, 4.77946622220252e+115, -5.68111847630834e-164, -Inf, -2.36808496497317e+49, -1.6023561721826e-75, NaN, 5.95905851469336e-174, -1.27549007575047e+189, -6.58490364599251e-43, 6.19214849642716e+187, 6.59067728250347e-16, 1.07687189901527e+222, -2.09951154432044e-103, 3.53686265923991, 7.50472634476625e+195, 2.47258019511576e+112, Inf, -5.76947889082735e+46, -3.47717096246514e+154, -1.25619439876261e-99, 9.6463253813567e+187, 1.63809301132753e+155, 8.53645486225398e-260, 1.95830155307574e-297, 5.06171079016514e-58, 160902267687.653, -5.54671001171036e+58, Inf, -5.14204436699264e+67, 2.71854784686493e+110, -8.88242953026711e-197, 1.95844540598717e-85, -6.42686074719734e-86, 2.99178843246918e-245, -3.75569745417869e+227, -4.74057848799521e-82, -4.79800845303098e-296, -1.98597194599615e-206, -6.73212413673609e+63, 2.66530388339769e-305, -5.86855380753907e-298, 7.60372464445266e-106, 0)) result <- do.call(CDM:::cdm_rcpp_din_deterministic_devcrit,testlist) str(result)