| ∀ str, str0, st. level⊆(str, str0) ∧ validstatfields(str, sks0, st) → validstatfields(str0, sks0, st), level⊆(str, str0), validstatfields(str, sk + sks0, st) ⊦ validstatfields(str0, sk + sks0, st) |
⊦ validstatfields(str, sk ' + sks, st) ↔ validstatfield(str, sk, st) ∧ validstatfields(str, sks, st)
level⊆(str, str0), validstatfield(str, sk, st), validstatfields(str, sks0, st), ∀ str, str0, st. level⊆(str, str0) ∧ validstatfields(str, sks0, st) → validstatfields(str0, sks0, st) ⊦ validstatfields(str0, sk ' + sks0, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPSEQ : ⊦ sk + sks = sk ' + sks])]]