paramBaseHtml :: ParamBase Info VName -> Html
paramBaseHtml (NamedParam v t _) =
  parens $ vnameHtml v <> ": " <> typeDeclHtml t
paramBaseHtml :: ParamBase Info VName -> Html
paramBaseHtml (NamedParam v t _) =
  parens $ vnameHtml v <> ": " <> typeDeclHtml t
paramBaseHtml (NamedParam v t _) =
  parens $ vnameHtml v <> ": " <> typeDeclHtml t