Feedback on first haskell exercise

* Make only `responseFor` public
* Simplify `isSilentTreatment` by removing all pattern matching and
  guard statements.
* Remove the map to upper case in favor of `not (any isLower s)`.