23 lines
433 B
Plaintext
23 lines
433 B
Plaintext
var iota = [n |
|
|
var iter = [start stop |
|
|
if (start >= stop) [[]] [flat start (iter (start+1) stop)]
|
|
];
|
|
iter 0 n
|
|
];
|
|
|
|
var map = [array fun|
|
|
var iter = [start stop |
|
|
if (start >= stop) [[]] [flat (fun (array.start)) (iter (start+1) stop)]
|
|
];
|
|
iter 0 (len array)
|
|
];
|
|
|
|
var each = [array fun|
|
|
var iter = [start stop |
|
|
if (start >= stop) [nil] [fun (array.start); iter (start+1) stop]
|
|
];
|
|
iter 0 (len array)
|
|
];
|
|
|
|
var cdur = c47;
|