| fs ' = _type, is_indexkey(_type), 0 ≤ i, i + n→i(# vals) ≤ n→i(# vals0), _type .index < 0 ∨ n→i(# vals0) ≤ _type .index ⊦ r0 -- _type ∈ st |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ _type ≠ i '], [CSIMPELIM : ⊦ is_indexkey(sk) → (i = sk .index ↔ sk = i ')])], [EXTRATERMS : (_type, i0)]]