| instore(r, class, (sk × val) ' + fis, st), unique_al(fis) ⊦ instore(r, class, fis, st[r -- sk, refval(r1)]), _type = sk, _type ∈ fis, sk ∈ fis |
⊦ instore(r, class, (sk × val) ' + fis, st) ↔ (r -- sk) × val ∈ st ∧ instore(r, class, fis, st)
(r -- sk) × val ∈ st ∧ instore(r, class, fis, st), unique_al(fis) ⊦ instore(r, class, fis, st[r -- sk, refval(r1)]), _type = sk, _type ∈ fis, sk ∈ fis
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, fis, val, sk, class, r)]]