forked from akeep/chez-srfi
-
Notifications
You must be signed in to change notification settings - Fork 0
/
%3a1.sls
155 lines (155 loc) · 1.98 KB
/
%3a1.sls
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
#!r6rs
;; Automatically generated by private/make-aliased-libraries.sps
(library (srfi :1)
(export
alist-cons
alist-copy
alist-delete
alist-delete!
any
append
append!
append-map
append-map!
append-reverse
append-reverse!
assoc
assq
assv
break
break!
caaaar
caaadr
caaar
caadar
caaddr
caadr
caar
cadaar
cadadr
cadar
caddar
cadddr
caddr
cadr
car
car+cdr
cdaaar
cdaadr
cdaar
cdadar
cdaddr
cdadr
cdar
cddaar
cddadr
cddar
cdddar
cddddr
cdddr
cddr
cdr
circular-list
circular-list?
concatenate
concatenate!
cons
cons*
count
delete
delete!
delete-duplicates
delete-duplicates!
dotted-list?
drop
drop-right
drop-right!
drop-while
eighth
every
fifth
filter
filter!
filter-map
find
find-tail
first
fold
fold-right
for-each
fourth
iota
last
last-pair
length
length+
list
list-copy
list-index
list-ref
list-tabulate
list=
lset-adjoin
lset-diff+intersection
lset-diff+intersection!
lset-difference
lset-difference!
lset-intersection
lset-intersection!
lset-union
lset-union!
lset-xor
lset-xor!
lset<=
lset=
make-list
map
map!
map-in-order
member
memq
memv
ninth
not-pair?
null-list?
null?
pair-fold
pair-fold-right
pair-for-each
pair?
partition
partition!
proper-list?
reduce
reduce-right
remove
remove!
reverse
reverse!
second
set-car!
set-cdr!
seventh
sixth
span
span!
split-at
split-at!
take
take!
take-right
take-while
take-while!
tenth
third
unfold
unfold-right
unzip1
unzip2
unzip3
unzip4
unzip5
xcons
zip)
(import (srfi :1 lists))
)