on 5e6a67f help sign in
42 lines 547 B history raw
1### `++swp`
3Reverse block order
5Switches little endian to big and vice versa: produces an atom by
6reversing the block order of `b` using block size `a`.
9Accepts
10-------
12`a` is a block size (see `++bloq`).
14`b` is an atom.
16Produces
17--------
19An atom
21Source
22------
24 ++ swap |=({a/bloq b/@} (rep a (flop (rip a b)))) :: reverse bloq order
26Examples
27--------
29 ~zod/try=> `@ub`24
30 0b1.1000
31 ~zod/try=> (swap 0 24)
32 3
33 ~zod/try=> `@ub`3
34 0b11
35 ~zod/try=> (swap 0 0)
36 0
37 ~zod/try=> (swap 0 128)
38 1
42***