module A where thing :: Int thing = 1