;;;; CONDITIONALS ;@ (define (cl:and? . args) (cond ((null? args) #t) ((car args) (apply cl:and? (cdr args))) (else #f))) ;@