| n→i(# refs) = countrefs(i0 ' + ints0), is_fskey(sk), posints(ints0), 0 ≤ i0 ⊦ sk = _length, sk = _type, r -- sk ∈ addmultiarrays(refs, i0, [], mktype_from_dims(ty, countdims(i0 ' + ints0, i)), getdims(i0 ' + ints0), st) ↔ r -- sk ∈ st |
⊦ is_fskey(sk) ↔ (∃ fs. sk = fs ')
n→i(# refs) = countrefs(i0 ' + ints0), ∃ fs. sk = fs ', posints(ints0), 0 ≤ i0 ⊦ sk = _length, sk = _type, r -- sk ∈ addmultiarrays(refs, i0, [], mktype_from_dims(ty, countdims(i0 ' + ints0, i)), getdims(i0 ' + ints0), st) ↔ r -- sk ∈ st
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sk)]]