main = do
    let b = c :: A
    putStrLn $ "I have a value of A :: " ++ show b
main = do
    let b = c :: A
    putStrLn $ "I have a value of A :: " ++ show b
main = do
    let b = c :: A
    putStrLn $ "I have a value of A :: " ++ show b