module Bar (Bar(..)) where -- | Bar Haddock data Bar = Bar