Chapter 11 - sumArrayWriter

No-peek solution is too convoluted. Alternative solution:

```PureScript
sumArrayWriter ∷ Array Int → Writer (Additive Int) Unit
sumArrayWriter = traverse_ (\n → tell $ Additive n)
```