[project @ 2003-06-04 14:52:09 by ralf]
[haskell-directory.git] / Control / Monad / X / tests / Nondet.hs
1 import Control.Monad.X.Nondet
2
3 assoc1 a b c = (a `mplus` b) `mplus` c
4 assoc2 a b c = a `mplus` (b `mplus` c)
5