[project @ 1997-05-26 01:54:18 by sof]
[ghc-hetmet.git] / ghc / compiler / tests / stranal / moo.lhs
1 > data Moo a b = Msimple | Mcompl (Moo b a)
2
3
4 > idMoo :: Moo a -> Moo a
5 > idMoo x = x