Esta função assume que todos os elementos da primeira BST têm chaves inferiores à s dos elementos da segunda BST.
link joinLR(link low, link high) { if (high == z) return low; high = partR(high, 0); high->l = low; return high; }