OFFSET
1,3
COMMENTS
Permutes the 4 axes of the 4D-Ferrers plot of the solid partitions as 2143.
LINKS
EXAMPLE
z[{{2},{2}}] -> z[{{1,1}},{{1,1}}] -> z[{{2},{2}}] under the 'lapse' operation.
MATHEMATICA
Tr/@Table[Count[solidformBTK[par], arg_z/; Nest[lapse, arg, 2]===arg], {n, 20}, {par, IntegerPartitions[n]}]
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Wouter Meeussen, Mar 19 2025
STATUS
approved
