Welcome to the CHICKEN Scheme pasting service
no title added by logothesia on Sat Dec 16 21:22:35 2023
#;1323> (alist-ref 'foo alist) bar #;1347> (alist-ref 'xyzzy alist) #f #;1356> (alist-ref 'plugh alist) #f #;1362> (cond ((alist-ref 'foo alist) => (lambda (val) 'yea)) (else 'nay)) yea #;1443> (cond ((alist-ref 'xyzzy alist) => (lambda (val) 'yea)) (else 'nay)) nay #;1449> (cond ((alist-ref 'plugh alist) => (lambda (val) 'yea)) (else 'nay)) nay #;1456>