haskell-tools-builtin-refactorings-1.0.0.0: examples/Refactor/ExtractBinding/ListComprehension_res.hs

module Refactor.ExtractBinding.ListComprehension where

filterPrime (p:xs) = 
    p : filterPrime [ x | x <- xs
                        , notDivisible x ]
  where notDivisible x = x `mod` p /= 0