improvement to 4, second test not compiling yet..weird error on isP <- primeF k c...