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