| rs1 ∩ rs0 = ∅, r ==>(o, a)[rs1, f, g], R[rs0, f, g] ⊦ (a[r =>_] * R)[rs1 ∪ rs0, f, g], a[r =>_][rs1, f, g] |
⊦ R[rs, f, g] ↔ R(mk(rs, f, g))
rs1 ∩ rs0 = ∅, R[rs0, f, g], r ==>(o, a)[rs1, f, g] ⊦ a[r =>_](mk(rs1, f, g)), (a[r =>_] * R)[rs1 ∪ rs0, f, g]
Used terms: g, f, rs1, a[r =>_]