Problem: count up digits
Code: count+up+digits/tails_1645093087
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)
| Depth | Lit | Desc | Type | Arg | Let |
|---|---|---|---|---|---|
| 0 | \ | reverse | [[chr]] | ||
| * 1 | `. | iterate while uniq | [[chr]] | ||
| ** 2 | @ | = fstLine | [chr] | ||
| ** 2 | : | append | [chr] | A:[chr] | |
| *** 3 | : | append | [chr] | ||
| **** 4 | `<~ | take drop while | [chr] | D:[chr] | |
| ***** 5 | $ | = A | [chr] | ||
| ***** 5 | == | equal? | int | B:chr | |
| ****** 6 | $ | = B | chr | ||
| ****** 6 | 0 | integer | int | C:chr | |
| **** 4 | ?, | if/else (lazy list) | [chr] | ||
| ***** 5 | $ | = D | [chr] | ||
| ***** 5 | - | subtract | chr | E:[chr] | |
| ****** 6 | `( | uncons | chr | F:[chr] | |
| ******* 7 | @ | = D | [chr] | ||
| ****** 6 | ~ | auto = 1 | auto | ||
| ***** 5 | $ | = F | [chr] | ||
| *** 3 | | implicit arg = F | [chr] |