| index_add_gnds#(GNDLIST, PRI, PFI, PINVAL, PSTORE0, PNL, PMAXINO, P_OS; ADRLIST, PSTORE; ISYNCED, ERR) {if PNL ≠ [] then {choose LADRLIST, ERR0 with (⌊ERR0⌋ ∨ ERR0 = ESUCCESS) ∧ ¬ dups(PSTORE[PNL.last].ladrlist + LADRLIST) ∧ # LADRLIST ≤ # GNDLIST ∧ inv-flashsize(prefixn(# LADRLIST, GNDLIST), LADRLIST) ∧ (ERR0 = ESUCCESS ↔ # LADRLIST = # GNDLIST) in {ADRLIST := LADRLIST.to-adr(PNL.last), ERR := ERR0; PSTORE[PNL.last].gndlist := PSTORE[PNL.last].gndlist + prefixn(# LADRLIST, GNDLIST); PSTORE[PNL.last].ladrlist := PSTORE[PNL.last].ladrlist + LADRLIST; if ERR ≠ ESUCCESS then ADRLIST := ?}; ISYNCED := ?} else abort } |