| # gndx0 = # lax, # buf0 = gndx0.flashsize, # buf1 = gndx1.flashsize, # lax + # gndx1 ≠ 0, gndx1 ≠ [], abs-nodes(buf0, n, gndx0, lax, false) ⊦ ⟪let m3 = ? in {buf := buf0 + buf1; encode_group_node#((gndx0 + gndx1)[# lax], gndx0.flashsize; m3, buf; err); ax := lax.to-adr(m2) + @(m2, n + gndx0.flashsize, m3) '; m0 := gndx0.flashsize + m3}; m1 := # gndx0 + 1⟫ ( m1 ≤ # gndx0 + # gndx1 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → # buf = gndx0.flashsize + gndx1.flashsize ∧ (∃ gndx2, gndx3. gndx0 + gndx1 = gndx2 + gndx3 ∧ # gndx2 = m1 ∧ m0 = gndx2.flashsize ∧ (∃ lax, buf0, buf1. lax.to-adr(m2) = ax ∧ buf = buf0 + buf1 ∧ # buf0 = gndx2.flashsize ∧ abs-nodes(buf0, n, gndx2, lax, false)))) ∧ # gndx0 + # gndx1 - m1 < # gndx1) |
# buf1 = gndx1.flashsize, # buf0 = gndx0.flashsize, # gndx0 = # lax, abs-nodes(buf0, n, gndx0, lax, false) ⊦ ⟪buf := buf0 + buf1; encode_group_node#((gndx0 + gndx1)[# lax], gndx0.flashsize; m3, buf; err); ax := lax.to-adr(m2) + @(m2, n + gndx0.flashsize, m3) '; m0 := gndx0.flashsize + m3; m1 := # gndx0 + 1⟫ ( m1 ≤ # gndx0 + # gndx1 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → # buf = gndx0.flashsize + gndx1.flashsize ∧ (∃ gndx2, gndx3. gndx0 + gndx1 = gndx2 + gndx3 ∧ # gndx2 = m1 ∧ m0 = gndx2.flashsize ∧ (∃ lax, buf0, buf1. lax.to-adr(m2) = ax ∧ buf = buf0 + buf1 ∧ # buf0 = gndx2.flashsize ∧ abs-nodes(buf0, n, gndx2, lax, false)))) ∧ # gndx0 + # gndx1 - m1 < # gndx1), # lax + # gndx1 = 0, gndx1 = []