| sk = fs ', fs = mkfs(class, ty, fieldvar), validval(str, val, ty, st), type∃(str, ty), is_fskey(sk), sk0 = sk ∧ val0 = val ∨ sk0 × val0 ∈ fis, ∀ sk1, val1. sk1 × val1 ∈ fis → is_fskey(sk1) ∧ type∃(str, sk1 .fs .type) ∧ validval(str, val1, sk1 .fs .type, st) ⊦ ¬ is_indexkey(sk0) ∧ type∃(str, sk0 .fs .type) ∧ validval(str, val0, sk0 .fs .type, st) |
validval(str, val, ty, st), type∃(str, ty), sk0 = mkfs(class, ty, fieldvar) ' ∧ val0 = val ∨ sk0 × val0 ∈ fis, ∀ sk1, val1. sk1 × val1 ∈ fis → is_fskey(sk1) ∧ type∃(str, sk1 .fs .type) ∧ validval(str, val1, sk1 .fs .type, st) ⊦ ¬ is_indexkey(sk0) ∧ type∃(str, sk0 .fs .type) ∧ validval(str, val0, sk0 .fs .type, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_fskey(fs ')])]]