fourmolu-0.13.0.0: data/examples/declaration/value/function/infix/esqueleto-0.hs

import Database.Esqueleto.Experimental

foo = select $ do
  t <- from $ table @Bar
    `innerJoin` table @Baz
      `on` do
        \(br :& bz) -> whatever
  where_ $
    t ^. BarInt ==. val 3
   &&. t ^. BarName `in_` valList ["hello", "world"]