λ> :l p1.hs
[1 of 1] Compiling Main             ( p1.hs, interpreted )
Ok, modules loaded: Main.
λ> removeMults 2 [2..100]
[3,5,7,9,11,13,15,17,19,21,23,25,27,29,31,33,35,37,39,41,43,45,47,49,51,53,55,57,59,61,63,65,67,69,71,73,75,77,79,81,83,85,87,89,91,93,95,97,99]
λ> :r
[1 of 1] Compiling Main             ( p1.hs, interpreted )
Ok, modules loaded: Main.
λ> primes [1..100]
[1]
λ> primes [2..100]
[2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97]
λ>