brittany-0.14.0.0: data/Test232.hs

{-# LANGUAGE LambdaCase #-}
func = \case
  FooBar -> x
  Baz    -> y