[Haskell-cafe] Use of STM in business?