| (p ' + P0)[n] = pe(m, m0, m1), Fok(F, p ' + P0, n0), n ≤ # P0, ∀ n, m, m0, m1, F, n0, m2. P0[n] = pe(m, m0, m1) ∧ n < # P0 ∧ Fok(F, P0, n0) → P0 = [] ∨ Fok(F, P0[n, pe(m, m0, m2)], n0) ⊦ Fok(F, (p ' + P0)[n, pe(m, m0, m2)], n0) |
P0 = [], (p ' + P0)[n] = pe(m, m0, m1), Fok(F, p ' + P0, n0), n ≤ # P0, ∀ n, m, m0, m1, F, n0, m2. P0[n] = pe(m, m0, m1) ∧ n < # P0 ∧ Fok(F, P0, n0) → P0 = [] ∨ Fok(F, P0[n, pe(m, m0, m2)], n0) ⊦ Fok(F, (p ' + P0)[n, pe(m, m0, m2)], n0)
[Concretesimprules(()), Extrafmas((P0 = []))]