helpPrime :: Int -> Int -> Bool
helpPrime numb divider =
    if divider == numb then
        True
    else
        if mod numb divider == 0 then
            False
        else helpPrime numb (divider + 1)

isPrime :: Int -> Bool
isPrime number =
    if helpPrime number 2 == False then False else True