| ∀ a0. a0 ∈ st0[a, d] → precise(adP(a0, st0[a, d][a0])), ∀ st1, adP. # st1 < # st0[a, d] → (∀ a. a ∈ st1 → precise(adP(a, st1[a]))) → precise(adP ⊗_ st1) ⊦ precise(adP(a, d) * adP ⊗_ st0), a ∈ st0, precise(adP(a, d)) ∧ precise(adP ⊗_ st0) |
∀ a0. a0 ∈ st0[a, d] → precise(adP(a0, st0[a, d][a0])), ∀ st1, adP. # st1 < # st0[a, d] → (∀ a. a ∈ st1 → precise(adP(a, st1[a]))) → precise(adP ⊗_ st1) ⊦ precise(adP(a, d) * adP ⊗_ st0), a ∈ st0, precise(adP(a, d)) ∧ precise(adP ⊗_ st0)