вам нужно определить функцию IS-PRIME? которая проверяет, является ли число простым, а также функцией LEFT-TRUNCATE, которая принимает от 137 до 37, от 37 до 7 и от 7 до 0.
С помощью этих двух частей вы можете построить свою функцию, проверив, является ли ввод простым, затем обрезать его слева, а затем проверять, пока не достигнете нуля.