fourmolu-0.0.6.0: data/examples/declaration/value/function/parallel-comprehensions-complex-out.hs

baz x y z w =
  [ ( a,
      b,
      c,
      d,
      e,
      f,
      g,
      h,
      i,
      j
    )
    | a <- -- Foo 1
        x, -- Foo 2
      b <- -- Bar 1
        y, -- Bar 2
      a
        `mod` b -- Value
        == 0
    | c <- -- Baz 1
        z
          * z -- Baz 2
          -- Baz 3
    | d <- w -- Other
    | e <- x * x -- Foo bar
    | f <- -- Foo baz 1
        y + y -- Foo baz 2
    | h <- z + z * w ^ 2 -- Bar foo
    | i <- -- Bar bar 1
        a
          + b, -- Bar bar 2
          -- Bar bar 3
      j <- -- Bar baz 1
        a + b -- Bar baz 2
  ]