Permalink
Browse files

Added `or` function in Generic.Data.List

  • Loading branch information...
1 parent e917fe7 commit 44638c4c7b87adaaa26bf9cceffcfe8da1f0b7ef @tomlokhorst committed Feb 15, 2010
Showing with 3 additions and 0 deletions.
  1. +3 −0 src/Generic/Data/List.hs
View
@@ -63,3 +63,6 @@ reverse l = rev `app` l `app` nil
and :: (BoolC j, RecFunC j, ListC j) => j [Bool] -> j Bool
and = foldr (&&) true
+or :: (BoolC j, RecFunC j, ListC j) => j [Bool] -> j Bool
+or = foldr (||) true
+

0 comments on commit 44638c4

Please sign in to comment.