data Foo = Bar
  { foo, biz :: Baz
  , bar      :: Bizzz
  }