residues :: UArray Int Int
residues = listArray (0,7) [7,11,13,17,19,23,29,31]
residues :: UArray Int Int
residues = listArray (0,7) [7,11,13,17,19,23,29,31]
residues = listArray (0,7) [7,11,13,17,19,23,29,31]