Negligible terms in polynomials



you may find it advantageous to use atoms instead of subscripted names.
You can do this:   I[k]:= concat("i_",k);

RJF