make :: [Int] -> ST s (STUArray s Int Int)
make xs = newListArray (1, length xs) xs
make :: [Int] -> ST s (STUArray s Int Int)
make xs = newListArray (1, length xs) xs
make xs = newListArray (1, length xs) xs