bp=: list2tree p: i.11
ubp=: p:L:0] 10;~list2tree i.10