union(asar, 0, # asar) = as -- adr, n < # asar ⊦ asar[n] ⊆ as
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic