File: list-comprehensions.hs

package info (click to toggle)
haskell-ormolu 0.1.2.0-1
  • links: PTS
  • area: main
  • in suites: bullseye
  • size: 3,392 kB
  • sloc: haskell: 11,134; makefile: 7
file content (22 lines) | stat: -rw-r--r-- 330 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
foo x =  [a |a<-x]

bar x y = [  (a, b)  |  a<-x, even a  , b<-y, a != b  ]

barbaz x y z w = [
    (a, b, c, d) | -- Foo
    a <-
      x, -- Bar
    b<-y,  -- Baz
    any even [a, b],
    c <- z *
         z ^ 2,     -- Bar baz
    d <-
    w
    +
    w, -- Baz bar
     all
      even [
        a, b,
        c, d
      ]
  ]