| r ∈ H ⊦ (∃ o0. ((r => o0 * P))(H[r, o])) ↔ ((r => o * P))(H[r, o]) |
((r => o * P))(H[r, o]), r ∈ H ⊦ ∃ o0. ((r => o0 * P))(H[r, o])
Used simplifier rules: map-write: r ∈ H ⊦ ((r => o0 * P))(H[r, o1]) → o0 = o1;%sep-ass: ⊦ (P0 * P1) * P2 = P0 * P1 * P2; from specification heap-sep%sep-com: ⊦ P0 * P1 = P1 * P0; from specification heap-sep