| ⊦ validfieldinits((sk × val) ', st) ↔ 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) |
⊦ validfieldinits((sk × val) ', st) ↔ ¬ is_indexkey(sk) ∧ okval(val, sk .fs .type) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ sk .fs .type)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ oktype(val, ty, st) ↔ okval(val, ty)], [CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)])]]