reemplazar({l1,...,li,...,lm},i,x)={l1,...,li-1,x,li+1,...,lm}
reemplazar({l1,...,li1 ,...,lm},i1,...,in,x)={l1,...,li-1,reemplazar(li1 ,i2,...,in,x),li1+1,...,lm}
si r:Recorrido entonces reemplazar(l,i1,...,r,...,in,x)=reemplazar(l,i1,...,[r],...,in,x)
si n=longitud(l) & 1<=i<=n
si i<1 | i>n devuelve un error.
si m=longitud(l), 1<=ik<=m con k=1,...,n