\\ f(v1,...) if v=[v1,...].
t_evalf (f,v=[]) = {my (u);
u=t_word(vector(n,i,Strprintf("v[%d]",i)),,","); eval(Strprintf("f(%s)",u))}