File tree Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Original file line number Diff line number Diff line change 26
26
# (let collection [1 2 5 12])
27
27
# (let p (product collection)) # => 120
28
28
# =end
29
- # @author https://github.com/FrenchMasterSword
29
+ # @author https://github.com/Unactived
30
30
(let product (fun (_L) {
31
31
(mut _index 0)
32
32
(mut _output 1)
44
44
# (let collection [1 2 5 12])
45
45
# (let p (sum collection)) # => 20
46
46
# =end
47
- # @author https://github.com/FrenchMasterSword
47
+ # @author https://github.com/Unactived
48
48
(let sum (fun (_L) {
49
49
(mut _index 0)
50
50
(mut _output 0)
144
144
# (let cool [1 2 3 4 5 6 7 8 9])
145
145
# (print (reduce cool (fun (a b) (+ a b)))) # 45
146
146
# =end
147
- # @author https://github.com/FrenchMasterSword
147
+ # @author https://github.com/Unactived
148
148
(let reduce (fun (_L _f) {
149
149
(mut _index 1)
150
150
(mut _output (@ _L 0))
243
243
# (let zipped [[1 5] [2 6] [3 7] [4 8]])
244
244
# (print (unzip zipped)) # [[1 2 3 4] [5 6 7 8]]
245
245
# =end
246
- # @author https://github.com/FrenchMasterSword
246
+ # @author https://github.com/Unactived
247
247
(let unzip (fun (_L) {
248
248
(let _m (len _L))
249
249
(mut _list1 [])
266
266
# (let b [5 6 7 8])
267
267
# (print (zip a b)) # [[1 5] [2 6] [3 7] [4 8]]
268
268
# =end
269
- # @author https://github.com/FrenchMasterSword
269
+ # @author https://github.com/Unactived
270
270
(let zip (fun (_a _b) {
271
271
(let _m (math:min (len _a) (len _b)))
272
272
(mut _c [])
You can’t perform that action at this time.
0 commit comments