(define (p) (p)) (define (test x y) (if (= x 0) 0 y)) (print (test 1 (p)))