SketchyLISP Reference |
Copyright (C) 2007 Nils M Holm |
<<[caaaar] | [Index] | [caar]>> |
Conformance: R5RS Scheme
Purpose: Access elements of nested pairs.
Arguments:
X - list
Implementation:
(define (caaar x) (car (car (car x)))) (define (caadr x) (car (car (cdr x)))) (define (cadar x) (car (cdr (car x)))) (define (caddr x) (car (cdr (cdr x)))) (define (cdaar x) (cdr (car (car x)))) (define (cdadr x) (cdr (car (cdr x)))) (define (cddar x) (cdr (cdr (car x)))) (define (cdddr x) (cdr (cdr (cdr x))))
Example:
(caddr '(a b c d e f g h)) => c
<<[caaaar] | [Index] | [caar]>> |