Problem: compression challenge but not in the way you think

Code: compression+challenge+but+not+in+the+way+you+think/tails_1658458351

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\ reverse[[chr]]
* 1/ foldr[[chr]]I:int
** 2\ reverse[[chr]]
*** 3% split (remove empties)[[chr]]
**** 4@ = fstLine[chr]
**** 4~ auto = wordsauto
** 2~ tuple[[chr]],int
*** 3% split (remove empties)[[chr]]
**** 4@ = fstLine[chr]
**** 4@ = fstLine[chr]
*** 30 integerint
** 2implicit tuple[[chr]],intC:[chr] B:[[chr]] A:int
*** 3? if/else[[chr]]H:int
**** 4_ = Aint
**** 4~ tuple[[chr]],intD:int
***** 5: append[[chr]]
****** 6@ = C[chr]
****** 6_ = B[[chr]]
***** 5- subtractint
****** 6;$ = Aint
****** 6~ auto = 1auto
**** 4implicit tuple[[chr]],int
***** 5? if/else[[chr]]G:int
****** 6? indexint
******* 7$ = C[chr]
******* 7'R' charchr
****** 6~ tuple[[chr]],intE:int
******* 7: append[[chr]]
******** 8< take[[chr]]
********* 9; saveintF:int
********** 10`r read intint
*********** 11@ = C[chr]
********* 9;$ = B[[chr]]
******** 8;$ = B[[chr]]
******* 7;@ = Aint
****** 6implicit tuple[[chr]],int
******* 7_ = B[[chr]]
******* 7implicit arg = Fint
***** 5implicit arg = Gint
*** 3implicit arg = Hint