Hi, just to clarify I added parantheses: Change: Filt <-- Filt + (New - Filt)*FFrac to: Filt <-- Filt + ((New - Filt)+1)*FFrac -- http://www.piclist.com#nomail Going offline? Don't AutoReply us! email listserv@mitvma.mit.edu with SET PICList DIGEST in the body