[Haskell-cafe] Unambiguous choice implementation