module MultiVirtual1 where foo :: Int foo = 1