Problem: uppercase the 17th letter

Code: uppercase+the+17th+letter/darrenks_1684605276

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! zip with[chr]
* 1@ = fstLine[chr]
* 1, range from 1[int]A:chr
** 2~ auto = infinityauto
* 1~ zipop: bynull
* 1- subtractchrC:chr B:int
** 2$ = Cchr
** 2* multiplyint
*** 3== equal?int
**** 4@ = Bint
**** 4? indexintD:int
***** 5`\ special scans[int]
****** 6. map[int]
******* 7;@ = fstLine[chr]
******* 7, lengthintE:chr
******** 8\ char class[chr]
********* 9$ = Echr
********* 9l isLowernull
****** 6+ foldop: addnull
***** 517 integerint
*** 332 integerint