Haskell: детекторы числа простых чисел

Question

Я пытаюсь изучить Haskell, и я застрял в проблеме с рекурсией. То, что мне нужно сделать, это найти, что число простое или нет. Это моя попытка. Но это не работает. Он дает «False» для не простых чисел, но он застревает в бесконечном цикле, когда число является простым.

isPrime :: Int -> Bool 
isPrime num = primeTest num 2 
    where 
     primeTest :: Int -> Int -> Bool 
     primeTest num x 
      | x == num  = True 
      | num `mod` x == 0 = False 
      | otherwise = primeTest num (x + 1) 
       where 
       x = 2 

Answer 1

Вам не нужно

where 
    x = 2 

Вот почему он работает в бесконечном цикле. Например, рассмотрим ввод 2, num mod x вернет 0, поэтому он вернет False. Рассмотрите ввод 5, num mod x вернется 1 (с x в этом случае 1). Таким образом, он переходит в другую часть, где вызывается primeTest num (x + 1) с назначением x = 2. Таким образом, всегда этот цикл будет выполняться бесконечно, с x значения 3.

Answer 2

where x=2 в конце вызывает каждый экземпляр x после primeTest num x быть 2, независимо от значения, переданного primeTest в «слоте x. " Избавьтесь от where x=2.