List rooted trees: Difference between revisions

m
m (syntax highlighting fixup automation)
m (→‎{{header|Wren}}: Minor tidy)
 
(One intermediate revision by one other user not shown)
Line 1,341:
ReplacePart[config, pos -> Append[Extract[config, pos], bag[]]]
With[{n = 5}, Nest[Addbags, {cabinet[bag[]]}, n - 1] // Column]</syntaxhighlight>
The output can be viewed as a tree graph by replacing the last line with <Langsyntaxhighlight Mathematicalang="mathematica">With[{n = 5}, TreeForm /@ Nest[Addbags, {cabinet[bag[]]}, n - 1]]</syntaxhighlight>
 
{{out}}
Line 2,111:
{{trans|Kotlin}}
{{libheader|Wren-long}}
<syntaxhighlight lang="ecmascriptwren">import "./long" for ULong
import "os" for Process
 
9,476

edits