OFFSET
1,2
LINKS
Wouter Meeussen, Solid Partitions Mathematica functions
EXAMPLE
Solid partition [{{3,1,1,1},{3}},{{2,1}},{{1}},{{1}},{{1}}] lapses (L) into
[{{4,1},{2},{1},{1},{1}},{{1,1},{1}},{{1,1}}], then into
[{{2,1,1,1,1},{2,1},{2}},{{1,1}},{{1}},{{1}}], further into
[{{5,2,1},{2},{1},{1}},{{1,1,1}}] and returns after L^4 to
[{{3,1,1,1},{3}},{{2,1}},{{1}},{{1}},{{1}}]
MATHEMATICA
See link above.
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Wouter Meeussen, Jun 27 2004
STATUS
approved