module Affection ( someFunc ) where someFunc :: IO () someFunc = putStrLn "someFunc"