Fix a bug in the answer of Exercise 8.8

The flatMap function should take a function that returns Gen[A], not A.