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