module Record where

data Foo = Foo {
    bar :: Char,
    baz :: Int
}