| sk = fs ', is_fskey(sk), okfieldinits(fs .class, fis0), mkfs(class, ty, fieldvar) ' ∈ fis0 .keys, ∀ class0, class, ty, fieldvar. okfieldinits(class0, fis0) ∧ mkfs(class, ty, fieldvar) ' ∈ fis0 .keys → class = class0 ⊦ class = fs .class, fs .type = abstract_type, mkfs(class, ty, fieldvar) ' = sk |
okfieldinits(fs .class, fis0), mkfs(class, ty, fieldvar) ' ∈ fis0 .keys, ∀ class0, class, ty, fieldvar. okfieldinits(class0, fis0) ∧ mkfs(class, ty, fieldvar) ' ∈ fis0 .keys → class = class0 ⊦ class = fs .class, fs .type = abstract_type, mkfs(class, ty, fieldvar) = fs
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_fskey(fs ')], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0])]]