Sha256: 53becf58cd9a8ebb04df792b9b5bcf649a678bde777d0437aa21a916b406dcef

Contents?: true

Size: 225 Bytes

Versions: 312

Compression:

Stored size: 225 Bytes

Contents

module Strain (keep, discard) where

keep, discard :: (a -> Bool) -> [a] -> [a]

keep p = keep' []
  where keep' acc [] = reverse acc
        keep' acc (x:xs) = keep' (if p x then x:acc else acc) xs

discard = keep . (not .)

Version data entries

312 entries across 312 versions & 1 rubygems

Version Path
trackler-2.2.1.180 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.179 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.178 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.177 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.176 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.175 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.174 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.173 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.172 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.171 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.170 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.169 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.167 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.166 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.165 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.164 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.163 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.162 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.161 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.2.1.160 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs