module B001 where

b :: Char
b = 'c'