table[mod[(2(floor[y/4]))-(mod[y, 4]),7], {y, 0,99}]