## Hints

To complete this exercise you need to to create the data type `Allergen`,
with `Eq` and `Show` instances, and implement the following functions:

- `allergies`
- `isAllergicTo`

Your can use the provided signatures if you are unsure about the types, but
don't let them restrict your creativity.