For[u = 0.1,  u < 1.0, u += 0.1, v = Search[u]; i1 = v[[1]]; 
      i2 = v[[2]]; t1 = w1[[i1]]; t2 = w1[[i2]]; 
      s = (u - t1)/(t2 - t1); s1  =  (i1)/100;  
      s2  =  (i2)/100;  s3  =  s1  +  s*(s2 - s1); 
      Print[{u, s3}]]