RosettaCodeData/Task/List-rooted-trees/Mathematica/list-rooted-trees-2.math

2 lines
66 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
With[{n = 5}, TreeForm /@ Nest[Addbags, {cabinet[bag[]]}, n - 1]]