[ >R 2 slot R> 2 slot >R >R R> R> swap swap >R 4 { int-array 2 1 tuple 57438726 int-array 12314669694609411 } R> 4 { int-array 2 1 tuple 57438726 int-array 12314669694609411 } >R R> "COMPLEX SHUFFLE" "COMPLEX SHUFFLE" R> swap swap [ / ] "COMPLEX SHUFFLE" "COMPLEX SHUFFLE" "COMPLEX SHUFFLE" R> >R >R >R 4 R> R> R> >R >R >R R> R> [ 2nth-unsafe ] { curry 2 1 tuple 57438726 curry -49469977 } { curry 2 1 tuple 57438726 curry -49469977 } R> >R R> { compose 2 1 tuple 57438726 compose 103930120 } 16 (byte-array) 4 { int-array 2 1 tuple 57438726 int-array 12314669694609411 } dup >R [ [ keep ] dip set-nth-unsafe ] { curry 2 1 tuple 57438726 curry -49469977 } { curry 2 1 tuple 57438726 curry -49469977 } swap (unrolled-each-integer) R> 2 slot 0 swap swap \ int-4-rep "COMPLEX SHUFFLE" "COMPLEX SHUFFLE" (simd-select) ]