t:=t+((D[i])/Y)-d.