Problem: Stars and Bars

Code: Stars+and+Bars/tails_1644992679

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= subscript (wrapped)[[chr]]
* 1;$ = sndIntint
* 1=~ group by (also sorts)[[[chr]]]
** 2`* nary cartesian product[[chr]]
*** 3. map[[chr]]
**** 4, range from 1[int]
***** 5- subtractint
****** 6+ sumint
******* 7_ = ints[int]
****** 6~ auto = 1auto
**** 4"*|" string[chr]A:int
** 2`< sort[chr]B:[chr]
*** 3$ = B[chr]