DATA (IDUP(i, 1),i=1, 6)/ -4, 4, 2,-24, -1, 25/ DATA (MOTHUP(1,i, 1),i=1, 6)/ 0, 0, 1, 1, 1, 1/ DATA (MOTHUP(2,i, 1),i=1, 6)/ 0, 0, 2, 2, 2, 2/ DATA (ICOLUP(1,i, 1),i=1, 6)/ 0,501,501, 0, 0, 0/ DATA (ICOLUP(2,i, 1),i=1, 6)/502, 0, 0, 0,502, 0/ DATA (ICOLUP(1,i, 2),i=1, 6)/ 0,501,502, 0, 0, 0/ DATA (ICOLUP(2,i, 2),i=1, 6)/501, 0, 0, 0,502, 0/