Effective Haskell: wrong definition of sumOfUniques (page 393 on Kindle)

Community PragProg Customers
,
1

@RebeccaSkinner

Currently, it is:

sumOfUniques n = ​ foldr (add n) (additiveIdentity n) . unique n

It should be:

sumOfUniques n = ​ foldr add additiveIdentity . unique n