схема рекурсии - мощность в Int

Question

Я пытаюсь реализовать функцию, которая говорит, если параметр является степенью 2. Вот что я имею

(define (powof2 x) (cond 
    [(and (even? x) (> x 1)) ((powof2 (/ x 2)))] 
    [else (equal?(x 1))])) 

Но когда я пытаюсь запустить его с параметром 12 I получите сообщение об ошибке: Ошибка: 3 не является функцией [powof2, powof2, powof2, (anon)]

Любая помощь?

Спасибо!

Answer 1

А те скобка ;-)

(define (powof2 x) 
    (cond 
    [(and (even? x) (> x 1)) (powof2 (/ x 2))] 
    [else (= x 1)])) 

Обратите внимание, что в 3-й линии и четвёртой линии вы имели дополнительную пару скобок, а в 4-й строке, что вы должны использовать = для сравнения чисел.