如何在haskell中使用列表理解来编写函数？

Question

我已使用map编写此函数，但我需要使用列表解析来编写此函数：

alter = map (\x -> if x == 0 then 1 else 0)

它给出了例如

alter [1,1,0]  
> [0,0,1]

Answer 1

你不能使用列表理解来无点地写它：

alter xs = [if x == 0 then 1 else 0 | x <- xs]