on 492ae2f help sign in
39 lines 565 B history raw
1### `++reap`
3Replicate
5Replicate: produces a `++list` containing `a` copies of `b`.
7Accepts
8-------
10`b` is a noun.
12Produces
13--------
15A list.
17Source
18------
20 ++ reap :: replicate
21 ~/ %reap
22 |* {a/@ b/*}
23 |- ^- (list _b)
24 ?~ a ~
25 [b $(a (dec a))]
27Examples
28--------
30 ~zod/try=> (reap 20 %a)
31 ~[%a %a %a %a %a %a %a %a %a %a %a %a %a %a %a %a %a %a %a %a]
32 ~zod/try=> (reap 5 ~s1)
33 ~[~s1 ~s1 ~s1 ~s1 ~s1]
34 ~zod/try=> `@dr`(roll (reap 5 ~s1) add)
35 ~s5
39***