import B
y = foo x
main = do
    print y
    print mkT
    print (foo y)