adr ∈ as ⊦ (as -- adr).size = as.size - adr.size
Used simplifier rules: ⊦ ¬ adr ∈ as → as -- adr = as; (s)% ⊦ m - 0 = m; (s)