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