testlist <- list(d = c(1610069884L, 55352472L, -90979182L, -1105141917L,  1368557731L, 952609652L, -1889431607L, 375399285L, 1490743643L,  646902560L, 565687263L, -661503191L, 617335900L, -1837575902L,  -647959569L, -1056021479L, -396987378L, -462999803L, 518186230L,  1019786523L, -202574715L, 1690675005L, 647179495L, -1584332662L,  -411789109L, -607661831L, -1447759843L, -602884657L, -55946143L,  1878826645L, -1882489808L, 1551678019L, -262992181L, 450807236L,  -1833574034L, -979943999L, 1100096176L, -1899936227L, -1933423128L,  1057499951L, 1530526581L, 398473641L, 1019786523L, -1302987789L,  -417422475L, -538340757L, -1394584597L, -394388925L, -1223313202L,  -705530038L, 227509439L, -444550452L, -1638579587L, 1070917867L,  -1271146852L, -1175396496L, 110640859L, -1967839593L, 1168791082L,  705230536L, 1563968924L, 221087681L, 1750949409L, 1312657748L,  -707842209L, -2057963830L, 5043242L, 1424683954L, 590892592L,  1725362638L, 860876929L, -1920871070L, 1359332054L, 1522049114L,  93619545L, 2121796513L, -1336225514L, 818144611L, 316007839L,  1455030951L, -1077641958L, 2082305153L, -1309025488L, 1910952226L,  1084438640L, 1713230968L, -222750647L, 1931145267L), e = c(-221216048L,  1053764298L, -1878653109L, -1116440485L, -1295631980L, 1300749298L,  -1432647291L, 1936315493L, 961951096L, 627065526L, 1716060452L,  -1116110993L, 1085801357L, 1071611881L, 2047373294L, 1900237739L,  -1702288449L, -379226801L, -1367903381L, NA, -1428242710L, -1120021705L,  1178740151L, -2038865376L, 42328043L, -363513192L, -861011012L,  -1596002997L, -1129630343L, -402083794L, -1541226345L, 1330180433L,  -825213768L, 628511217L, 609529541L, 849023214L, 1178953518L,  1293442456L, -297572035L, -1956999591L, 734663248L, 1080246885L,  -1208997142L, -1959077679L, 2134966220L, 1482450246L, -1613855957L,  689013844L, -610884581L, -102334287L, -693462175L), m1 = c(1.86510843342709e-245,  -1.6578235520724e-126, 8.31920255513824e+76, 1.21214794644861e-73,  -1.82852408321013e+183, 4.29485968908016e-206, 4.54964027613698e+119,  -1.51652249314335e+167, -3.75004888626212e-129, 3.69390615123829e+234,  5.50122451930252e+234, -5.85649931437095e+106, 2.33603150842745e+187,  -2.61014782890184e-89, 5.39802665415686e+140, 4.34952641997584e-92,  4.43042828616646e-127))
result <- do.call(trackdem:::cb1,testlist)
str(result)