git.iko.soy/elk
on master help sign in
Define List.and and List.or
0bd8759Evan Czaplicki
libraries/List.elm+2−2
compare with master
unifiedsplit
@@ -91,11 +91,11 @@ any = Native.List.any
91
91
92-- Check to see if all elements are True.
92-- Check to see if all elements are True.
93and : [Bool] -> Bool
93and : [Bool] -> Bool
94−and = Native.List.and
94+and = foldl (&&) True
95
95
96-- Check to see if any elements are True.
96-- Check to see if any elements are True.
97or : [Bool] -> Bool
97or : [Bool] -> Bool
98−or = Native.List.or
98+or = foldl (||) False
99
99
100-- Concatenate a list of appendable things:
100-- Concatenate a list of appendable things:
101--
101--