(define test (lambda (f x)
               (if (f x)
                   x
                   (test f (- x 1)))))
               
(check (= (test (lambda (x) (< x 0)) 2) -1))