applicare_funzione(f,r)=applicare_funzione(f,lista(r))
applicare_funzione(f,{x1→y1,...,xm→ym})={f(x1,y1),...,f(xm,ym)}