Consider the following scheme function. Is it tail recursive?
(DEFINE (fun1 x y)
(cond
((NULL? x) y)
((ZERO? (car x)) (fun1 (cdr x) (cons (car x) y)))
(ELSE (fun1 (cdr x) y)) )