Add missing haddock documentation.

src/Mock.hs

@@ -62,6 +62,7 @@ toDouble c
     | 97 <= ord c && ord c <= 122 = chr $ ord c - 97 + 120146  -- Lowercase letter
 toDouble c = c
 
+-- |Transforms a double-struck letter into its normal variant. If it isn't double-struck, it is left unchanged.
 fromDouble :: Char -> Char
 fromDouble c = case ord c of
     8450 -> 'C'

src/Mock/Help.hs

@@ -5,6 +5,7 @@ module Mock.Help (styleHelp) where
 import qualified Data.Text as T
 import Data.Text (Text)
 
+-- |Returns help string for a given style name (or a fitting message if no help is available).
 styleHelp :: Text -> Text
 styleHelp styleName = case styleName of
     "random" -> "Flips lowercase characters pseudo-randomly into uppercase letters."