>module Foo where


>data Foo = Foo  | Bar | Bub