replace({l1,...,li,...,lm},i,x)={l1,...,li-1,x,li+1,...,lm}
replace({l1,...,li1 ,...,lm},i1,...,in,x)={l1,...,li-1,replace(li1 ,i2,...,in,x),li1+1,...,lm}
if r:Range then replace(l,i1,...,r,...,in,x)=replace(l,i1,...,[r],...,in,x)
if n=length(l) & 1<=i<=n
if i<1 | i>n returns an error.
if m=length(l), 1<=ik<=m with k=1,...,n