At: rel subst tc122 1. y: Label 2. r1: Term List 3. as: (LabelTerm) List 4. ds: Collection(dec()) 5. da: Collection(SimpleType) 6. de: sig() 7. ||de.rel(y)|| = ||r1|| 8. i:. i < ||r1|| (de.rel(y))[i] term_types(ds;da;de;r1[i]) 9. x:Label.
(x rel_vars( < inr(y),r1 > ))
(t:SimpleType. mk_dec(x, t) ds t term_types(ds;da;de;apply_alist(as;x;x))) 10. ||de.rel(y)|| = ||map(t.term_subst(as;t);r1)||
i:.
i < ||map(t.term_subst(as;t);r1)||
(de.rel(y))[i] term_types(ds;da;de;map(t.term_subst(as;t);r1)[i]) By: RWW "map_length_nat" -1
THEN
UnivCD
THEN
RWW "map_length" -1
THEN
RWW "map_select" 0
THEN
Reduce 0 Generated subgoal: