| n ≤ i→n(st[r -- _length] .intval), n ≤ # getbytearray(r, st), n→i(n) ≤ st[r -- _length] .intval ⊦ i→n(st[r -- _length] .intval) = (# getbytearray(r, st) - n) + n |
n ≤ i→n(st[r -- _length] .intval), n ≤ # getbytearray(r, st), n→i(n) ≤ st[r -- _length] .intval ⊦ # getbytearray(r, st) = i→n(st[r -- _length] .intval)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m + n = m + n0 ↔ n = n0], [CSIMPSEQ : n ≤ m ⊦ (m - n) + n0 = n1 ↔ m + n0 = n + n1], [CSIMPSEQ : ⊦ ¬ m ≤ n ↔ n < m], [CSIMPSEQ : ⊦ m ≤ n → (n < m ↔ false)])]]