1 | 1. r: rel() 2. as: (Label Term) List 3. ds: Collection(dec()) 4. da: Collection(SimpleType) 5. de: sig() 6. tc(r;ds;da;de) 7. x:Label.
(x rel_primed_vars(r)) 
( t:SimpleType. mk_dec(x, t) ds  t term_types(ds;da;de;apply_alist(as;x;x))) tc(rel_subst2(as;r);ds;da;de) |