index
:
lambdacube-compiler.git
master
sigs
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
testdata
/
concatmap01.lc
blob: 022b103bdc130b84248076ef6d939dbb27007d5b (
plain
)
1
2
3
4
5
6
a :: [Float] a = concatMap (\x -> [x]) [1.0] main :: Bool main = case a of [1.0] -> True