| n < # zbrar ⊦ zh[r].zbranches = zbrar ∧ zbrar[n].child = r1 ∧ ¬ zh[r1].dirty ∧ btree-sub-clean(r, n, zh) → btree-sub-clean(r, n + 1, zh[r, zh[r].zbranches:= zbrar[n, mkzbranch(key, adr, r1)]]) |
zbrar[n].child = r1, zh[r].zbranches = zbrar, n < # zbrar, btree-sub-clean(r, n, zh) ⊦ zh[r1].dirty, btree-sub-clean(r, n + 1, zh[r, zh[r].zbranches:= zbrar[n, mkzbranch(key, adr, r1)]])