haskell-tools-refactor-0.4.1.1: 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