Добре дошли в DrRacket, версия 7.0 [3m]. Език: R5RS [потребителски]; memory limit: 128 MB. > al ((a . 1) (b . 2) (c . 3)) > (keys al) (a b c) > (values al) (1 2 3) > (assoc 'a al) (a . 1) > (assq 'a al) (a . 1) > (assv 'a al) (a . 1) > (del-assoc 'a al) ((b . 2) (c . 3)) > (del-assoc 'c al) ((a . 1) (b . 2)) > (add-assoc 'a 10 al) ((a . 10) (b . 2) (c . 3)) > (add-assoc 'c 10 al) ((c . 10) (a . 1) (b . 2)) > (exists? odd? '(1 2 3 4 5)) #t > (exists? negative? '(1 2 3 4 5)) #f > (exists? negative? '(1 2 3 4 5)) #f > (exists? (lambda (l) (memq 1 l)) '((2 4 6) (3 2 5) (7 8 9))) #f > (exists? (lambda (l) (memq 1 l)) '((2 4 6) (3 1 5) (7 8 9))) (1 5) #t #f > (search (lambda (l) (memq 1 l)) '((2 4 6) (3 1 5) (7 8 9))) #t #f > (exists? (lambda (l) (memq 1 l)) '((2 4 6) (3 2 5) (7 8 9))) #f > (exists? (lambda (l) (memq 1 l)) '((2 4 6) (3 1 5) (7 8 9))) #t > (search (lambda (l) (memq 1 l)) '((2 4 6) (3 1 5) (7 8 9))) (1 5) > (assoc 'a al) (a . 1) > (assoc 'c al) (c . 3) #t #f > (all? odd? '(1 3 5)) #t > (all? odd? '(1 3 2 5)) #f > (all? odd? '(1 3 2 5)) #f > (all? odd? '(1 3 5)) #t > (not 'a) #f