610     if ( tb->lnum[h] == 0 && tb->rnum[h] == 0 ) {  in balance_internal_when_delete()
646 	RFALSE( tb->rnum[h] != 0,  in balance_internal_when_delete()
648 		h, tb->rnum[h]);  in balance_internal_when_delete()
656     if ( tb->R[h] &&  tb->rnum[h] == -B_NR_ITEMS(tb->R[h]) - 1 ) { /* join S[h] with R[h] */  in balance_internal_when_delete()
668 	RFALSE( tb->rnum[h] != 0,  in balance_internal_when_delete()
669 		"wrong tb->rnum[%d]==%d when borrow from L[h]", h, tb->rnum[h]);  in balance_internal_when_delete()
675     if ( tb->rnum[h] < 0 ) { /* borrow from right neighbor R[h] */  in balance_internal_when_delete()
679 …internal_shift_left (INTERNAL_SHIFT_FROM_R_TO_S, tb, h, -tb->rnum[h]);/*tb->S[h], tb->CFR[h], tb->…  in balance_internal_when_delete()
684 	RFALSE( tb->rnum[h] == 0 || tb->lnum[h] + tb->rnum[h] != n + 1,  in balance_internal_when_delete()
686 		h, tb->lnum[h], h, tb->rnum[h], n);  in balance_internal_when_delete()
689 	internal_shift_right (INTERNAL_SHIFT_FROM_S_TO_R, tb, h, tb->rnum[h]);  in balance_internal_when_delete()
696 		    h, tb->lnum[h], h, tb->rnum[h]);  in balance_internal_when_delete()
851     if ( tb->rnum[h] > 0 ) {  in balance_internal()
855 	if ( n - tb->rnum[h] >= child_pos )  in balance_internal()
858 	    internal_shift_right (INTERNAL_SHIFT_FROM_S_TO_R, tb, h, tb->rnum[h]);  in balance_internal()
860 	    if ( n + insert_num - tb->rnum[h] < child_pos )  in balance_internal()
865 		internal_shift_right (INTERNAL_SHIFT_FROM_S_TO_R, tb, h, tb->rnum[h] - insert_num);  in balance_internal()
872 …l_insert_childs (&bi, /*tb->R[h],tb->S[h-1]->b_next*/ child_pos - n - insert_num + tb->rnum[h] - 1,  in balance_internal()
883 		k = tb->rnum[h] - n + child_pos - 1;  in balance_internal()