record an example suggested by a #haskell discussion