{-# LANGUAGE TemplateHaskell #-}
module Main where

import SafeLang11_A
import SafeLang11_B

$(mkSimpleClass ''A)

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