if(mod(j,5000).eq.0) then print*,baz, div,div1,div2 endif