fourmolu-0.13.0.0: data/examples/declaration/value/function/infix/esqueleto-0-out.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"]