187 	tree *p1, *p2, *sub;  in sprout()  local
235 				p1 = (*ppr)->left;  in sprout()
236 				if (p1->bal == -1) {		/*%< LL */  in sprout()
238 					(*ppr)->left = p1->right;  in sprout()
239 					p1->right = *ppr;  in sprout()
241 					*ppr = p1;  in sprout()
245 					p2 = p1->right;  in sprout()
246 					p1->right = p2->left;  in sprout()
247 					p2->left = p1;  in sprout()
258 						p1->bal = -1;  in sprout()
260 						p1->bal = 0;  in sprout()
291 				p1 = (*ppr)->right;  in sprout()
292 				if (p1->bal == 1) {		/*%< RR */  in sprout()
294 					(*ppr)->right = p1->left;  in sprout()
295 					p1->left = *ppr;  in sprout()
297 					*ppr = p1;  in sprout()
301 					p2 = p1->left;  in sprout()
302 					p1->left = p2->right;  in sprout()
303 					p2->right = p1;  in sprout()
314 						p1->bal = 1;  in sprout()
316 						p1->bal = 0;  in sprout()
417 	tree *p1, *p2;  in bal_L()  local
435 		p1 = (*ppr_p)->right;  in bal_L()
436 		b1 = p1->bal;  in bal_L()
439 			(*ppr_p)->right = p1->left;  in bal_L()
440 			p1->left = *ppr_p;  in bal_L()
444 				p1->bal = -1;  in bal_L()
449 				p1->bal = 0;  in bal_L()
451 			*ppr_p = p1;  in bal_L()
454 			p2 = p1->left;  in bal_L()
456 			p1->left = p2->right;  in bal_L()
457 			p2->right = p1;  in bal_L()
465 				p1->bal = 1;  in bal_L()
467 				p1->bal = 0;  in bal_L()
477 	tree *p1, *p2;  in bal_R()  local
494 		p1 = (*ppr_p)->left;  in bal_R()
495 		b1 = p1->bal;  in bal_R()
498 			(*ppr_p)->left = p1->right;  in bal_R()
499 			p1->right = *ppr_p;  in bal_R()
503 				p1->bal = 1;  in bal_R()
508 				p1->bal = 0;  in bal_R()
510 			*ppr_p = p1;  in bal_R()
513 			p2 = p1->right;  in bal_R()
515 			p1->right = p2->left;  in bal_R()
516 			p2->left = p1;  in bal_R()
524 				p1->bal = -1;  in bal_R()
526 				p1->bal = 0;  in bal_R()