module Main where myVar :: String myVar = "23" main :: IO () main = putStrLn "I have {myVar} apples."