Problem: Derangements

Code: Derangements/tails_1645189937

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
0implicit map[[[int]]]
* 1| filter[[int]]
** 2``p permutations[[int]]
*** 3, range from 1[int]
**** 46 integerint
** 2`* productintA:[int]
*** 3! zip with[int]
**** 4$ = A[int]
**** 4, range from 1[int]B:int
***** 56 integerint
**** 4! zipop: abs diffnull
* 1: append[[int]]D:[int] C:[int]
** 2$ = D[int]
** 2~ auto = []auto