| rk = r0 -- sk, # str < # sk .fs .class .class, # stringvar < # sk .fs .class .class, r -- mkfs(stringvar .class, ty, fieldvar) ' ∈ rks, # str ≤ # stringvar, is_fskey(sk), rk ∈ rks, ∀ rk0. rk0 ≠ r -- mkfs(stringvar .class, ty, fieldvar) ' ∧ rk0 ∈ rks ∧ is_fskey(rk0 .key) → # rk0 .key .fs .class .class < # str, ∀ rks0. # rks0 < # rks → (true → (∃ str. ∀ rk. rk ∈ rks0 ∧ is_fskey(rk .key) → ¬ # str ≤ # rk .key .fs .class .class)) ⊦ # rks = 0, rks = ∅, ∃ str. ∀ rk. rk ∈ rks ∧ is_fskey(rk .key) → ¬ # str ≤ # rk .key .fs .class .class |
# str < # sk .fs .class .class, r0 -- sk ∈ rks, is_fskey(sk), # str ≤ # stringvar, r -- mkfs(stringvar .class, ty, fieldvar) ' ∈ rks, # stringvar < # sk .fs .class .class, ∀ rk0. rk0 ≠ r -- mkfs(stringvar .class, ty, fieldvar) ' ∧ rk0 ∈ rks ∧ is_fskey(rk0 .key) → # rk0 .key .fs .class .class < # str, ∀ rks0. # rks0 < # rks → (true → (∃ str. ∀ rk. rk ∈ rks0 ∧ is_fskey(rk .key) → ¬ # str ≤ # rk .key .fs .class .class)) ⊦ rks = ∅, # rks = 0, ∃ str. ∀ rk. rk ∈ rks ∧ is_fskey(rk .key) → ¬ # str ≤ # rk .key .fs .class .class
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < n → n ≠ 0], [CSIMPFORWARD : ⊦ m < n → n ≠ 0], [CSIMPFORWARD : ⊦ m ≤ n ∧ n < n0 → m < n0])]]