corrects type signature for `ask` in the reader-monad section

The type signature for ask should be:

ask :: Reader r a

and not:

ask :: Reader r a -> a

(thanks for the great guide!)