Tree datastructures: Difference between revisions

m
→‎{{header|zkl}}: Fix code and comment: Perl 6 --> Raku
m (→‎{{header|Perl}}: Fix link: Perl 6 --> Raku)
m (→‎{{header|zkl}}: Fix code and comment: Perl 6 --> Raku)
Line 841:
Is this tree the same as what we started with? True
</pre>
I'm choosing to only allow one root per tree/forest so the Perl6Raku example is coded differently:
<lang zkl>perl6treesrakutrees:=L(
L("RosettaCode",
L("encourages",
Line 855:
)
);
println(perl6treesrakutrees.apply(nestToString).concat());
iTrees := perl6treesrakutrees.apply(nestToIndent);
println(iTrees.apply(indentToString).concat("\n"));
(iTrees.apply(indentToNest)==perl6treesrakutrees).println();</lang>
{{out}}
<pre style="height:40ex">
2,392

edits