(define-module srfi-1 (export xcons cons* list-tabulate circular-list iota not-pair? list= first second third fourth fifth sixth seventh eighth ninth tenth car+cdr take drop take-right drop-right take! drop-right! split-at! last concatenate concatenate! append-reverse append-reverse! zip unzip1 unzip2 unzip3 unzip4 unzip5 count unfold pair-fold reduce unfold-right pair-fold-right reduce-right append-map append-map! map! pair-for-each filter-map map-in-order filter partition remove filter! partition! remove! member find-tail every list-index take-while drop-while take-while! span break span! break! delete delete-duplicates delete! delete-duplicates! assoc alist-cons alist-copy alist-delete alist-delete! lset<= lset= lset-adjoin lset-union lset-union! lset-intersection lset-intersection! lset-difference lset-difference! lset-xor lset-xor! lset-diff+intersection lset-diff+intersection!))
(select-module srfi-1)
(dynamic-load "srfi-1-lib")
(provide "srfi-1")
