Termination of term rewriting by semantic labelling (1995)

by H Zantema
Venue:Caps n := match ts in vector n return Caps n with | Vnil ⇒ Vnil | Vcons t n ′ ts ′ ⇒ Vcons (cap t) (caps n ′ ts ′ ) end in if condition f then mkCap (λv ⇒ Vnth v (lt_O_Sn 0), Vcons t Vnil) else let cs := caps (arity f ) ts in mkCap (λv ⇒ Fun f (Vmap_sum