module A where foo :: Int foo = 4