> (cond ((assv 'b '((a 1) (b 2))) => cadr) (else #f)) 2 > (cond ((assv 'b '((a 1) (b 2))) => car) (else #f)) b