module Main where -- | Another datatype... data D' deriving (Show) -- ^ ...with two docstrings. -- more