module B (b) where import A b :: Char b = a