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.1.0.20 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.19 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.18 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.17 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.16 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.15 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.14 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.13 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.12 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.11 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.10 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.9 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.8 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.7 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.6 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.5 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.4 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.3 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.2 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs
trackler-2.1.0.1 tracks/haskell/exercises/strain/examples/fail-reverse/src/Strain.hs