| okfieldinits(fs .class, fis0), mkfs(fs .class, abstract_type, fieldvar) ' ∈ (fs ' × initial_value(fs .type)) ' + fis0, ∀ class0, fieldvar0. ¬ okfieldinits(class0, fis0) ∨ ¬ mkfs(class0, abstract_type, fieldvar0) ' ∈ fis0 ⊦ fs .type = abstract_type |
fs = mkfs(class, ty, fieldvar1), okfieldinits(class, fis0), mkfs(class, abstract_type, fieldvar) ' ∈ (fs ' × initial_value(ty)) ' + fis0, ∀ class0, fieldvar0. ¬ okfieldinits(class0, fis0) ∨ ¬ mkfs(class0, abstract_type, fieldvar0) ' ∈ fis0 ⊦ ty = abstract_type
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class, ty, fieldvar1)]]