Problem: A001037 long

Code: A001037+long/tails+%28xnor%29_1691059537

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/ foldr[int]G:int
* 1\ reverse[int]
** 2, range from 1[int]
*** 350 integerint
* 1~ tuple[int],int
** 2_ = ints[int]
** 2$ = fstIntint
* 1implicit tuple[int],intC:int B:[int] A:int
** 2: append[int]
*** 3@ = B[int]
*** 3/ divideint
**** 4; saveintF:int
***** 5- subtractint
****** 6; saveintD:int
******* 7^ powint
******** 82 integerint
******** 8$ = Cint
****** 6% modulusint
******* 7/ divideint
******** 8;$ = Aint
******** 8; saveintE:int
********* 9^ powint
********** 10$ = Dint
********** 1050 integerint
******* 7@ = Dint
**** 4;$ = Cint
** 2+ addint
*** 3;_ = Aint
*** 3* multiplyint
**** 4/ divideint
***** 5^ powint
****** 6@ = Eint
****** 610 integerint
***** 5- subtractint
****** 6@ = Eint
****** 6~ auto = 1auto
**** 4implicit arg = Fint