Provide Pool as additional parameter to `destroy`.
Rename Data.Pool to Data.KPool
Express `Data.Pool` via `Data.KPool`.