Problem: VIDE DICEQVE

Code: VIDE+DICEQVE/tails_1645065284

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)


DepthLitDescTypeArgLet
0< take[[chr]]
* 120 integerint
* 1`. iterate while uniq[[chr]]
** 2"I" string[chr]
** 2+ concat[chr]A:[chr]
*** 3. map[[chr]]
**** 4`= chunk by[[chr]]
***** 5$ = A[chr]
***** 5$ = BchrB:chr
**** 4: append[chr]C:[chr]
***** 5= subscript (wrapped)[chr]
****** 6, lengthint
******* 7$ = C[chr]
****** 6% split (remove empties)[[chr]]
******* 7! zip with[chr]
******** 8"IV " string[chr]
******** 8`D to base from data[int]D:chr
********* 93 to base from data argnull
******** 8= zipop: subscriptnull
******* 7~ auto = wordsauto
***** 5/ foldr1chr
****** 6$ = C[chr]
****** 6$ = FchrF:chr E:chr