| mk(rs1, f(r; o1)) = (∅ ++ r)[r, o1], rs1 ∩ rs0 = ∅, R[rs0, f(r; o1), g], r ∈ rs0, ∀ r. r ∈ rs1 → g(r) = a ⊦ # rs0 = 0, r = null, rs0 = ∅, (a[r => f(r)] * R)[rs1 ∪ rs0, f, g], a[r => f(r)][rs1, f, g] ∧ R[rs0, f, g] |
mk(rs1, f(r; o1)) = (∅ ++ r)[r, o1], rs1 ∩ rs0 = ∅, R[rs0, f(r; o1), g], r ∈ rs0, ∀ r. r ∈ rs1 → g(r) = a ⊦ # rs0 = 0, r = null, rs0 = ∅, (a[r => f(r)] * R)[rs1 ∪ rs0, f, g], a[r => f(r)][rs1, f, g] ∧ R[rs0, f, g]