| σ0 = ⌜x0⌝ , ⌜x⌝ = σ0 + σ1, # σ0 = ⌜n⌝ , n ≤ # x ⊦ σ0 = ⌜x to n⌝ ∧ σ1 = ⌜x from n⌝ |
⌜x⌝ = ⌜x0⌝ + σ1, # x0 ≤ # x ⊦ x0 = x to # x0 ∧ σ1 = ⌜x from # x0⌝
Used simplifier rules: size-fin: ⊦ # ⌜x⌝ = ⌜# x⌝ ;%inj-02: ⊦ ⌜x⌝ = ⌜x0⌝ ↔ x = x0; from specification stream-basic%inj: ⊦ ⌜m⌝ = ⌜m0⌝ ↔ m = m0; from specification nat-inf-basic