import "Prelude"

l :: [Integer]
l = [1,2,3,4,5]
main = hash l - foldl (\c x -> 31*c + x) 0 l
--
-1625180697