| σ0 = ⌜x⌝ , ⌜nf⌝ = σ0 + σ1, # σ0 = ⌜n⌝ ⊦ σ0 = ⌜nf to n⌝ ∧ σ1 = ⌜nf from n⌝ |
⌜nf⌝ = ⌜x⌝ + σ1 ⊦ x = nf to # x ∧ σ1 = ⌜nf from # x⌝
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