	&trace = 0
	&stlimit = 100000
	&trim = 1
	trace("line","value")
	trace("flag","value")
	trace("part1","value")
	trace("part2","value")
	trace("part3","value")
	trace("part4","value")
loopA	flag = 0
loopB	output = line
loop	line = input :f(end)
	eq(flag,1)   :s(skip1)   
	line "method dump_tree(" :f(loopB)s(skip2) 
skip1   line "method dump(" :s(loopA)	
skip2   flag = 1	
	line "nodeinfo(left(" arb . part1 ",40) || dump_info(" arb . part2 "))"   :f(loopB)
	lineout = "proc_dump_tree(self," part1 ", " part2 ")"
	output = lineout :(loop)
end
