| rs1 ∩ rs0 = ∅, a[r => o0][rs1, f, g], R[rs0, f, g], r ∈ rs0 ⊦ # rs0 = 0, rs0 = ∅, R[rs0, f(r; o1), g], (a[r => o1] * R)[rs1 ∪ rs0, f(r; o1), g] ∧ f(r) = o0 |
⊦ R[rs, f, g] ↔ R(mk(rs, f, g))
rs1 ∩ rs0 = ∅, R[rs0, f, g], a[r => o0](mk(rs1, f, g)), r ∈ rs0 ⊦ # rs0 = 0, rs0 = ∅, R[rs0, f(r; o1), g], (a[r => o1] * R)[rs1 ∪ rs0, f(r; o1), g] ∧ f(r) = o0
Used terms: g, f, rs1, a[r => o0]