Visualize a tree: Difference between revisions
→{{header|REXX}}: replaced repl by (Standard) changestr
Walterpachl (talk | contribs) (→{{header|REXX}}: added the rep procedure) |
Walterpachl (talk | contribs) (→{{header|REXX}}: replaced repl by (Standard) changestr) |
||
Line 1,202:
If st<>'' Then
st=left(st,length(st)-2)' '
st=
Say st||s||node.c.0name
Call tt c,st||s
Line 1,252:
node.a.0level=node.father.0level+1
Return
</lang>
{{out}}
| |||