annotator/src/Annotator/Util.hs
2023-01-06 15:17:10 +01:00

4 lines
93 B
Haskell

module Annotator.Util where
anyp :: [a -> Bool] -> a -> Bool
anyp preds x = any ($ x) preds