| sk .fs = mkfs(class, ty, fieldvar) ⊦ validfieldinits((sk × val) ' + fis, st) ↔ ¬ is_indexkey(sk) ∧ okval(val, ty) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ ty) ∧ (∀ sk, val. sk × val ∈ fis → is_fskey(sk) ∧ oktype(val, sk .fs .type, st) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ sk .fs .type)) |
sk .fs = mkfs(class, ty, fieldvar) ⊦ validfieldinits((sk × val) ' + fis, st) ↔ ¬ is_indexkey(sk) ∧ okval(val, ty) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ ty) ∧ (∀ sk0, val0. sk0 × val0 ∈ fis → ¬ is_indexkey(sk0) ∧ okval(val0, sk0 .fs .type) ∧ ( is_referencevalue(val0) → val0 .refval = jvmref ∨ val0 .refval -- _type ∈ st ∧ is_typevalue(st[val0 .refval -- _type]) ∧ st[val0 .refval -- _type] .type ≤ sk0 .fs .type))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ oktype(val, ty, st) ↔ okval(val, ty)], [CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)])]]