day 10 ivy tweak
parent
43118ba386
commit
28f7fcb605
|
@ -4,8 +4,8 @@ op run ins =
|
|||
((1 + ins != 0), 0) sel +\ 1, ins
|
||||
|
||||
op signal xs =
|
||||
n = rho xs
|
||||
i = (20 == (iota n) mod 40) sel iota n
|
||||
cycle = iota rho xs
|
||||
i = (20 == cycle mod 40) sel cycle
|
||||
+/ xs[i] * i
|
||||
|
||||
op render xs =
|
||||
|
|
Loading…
Reference in New Issue