%一維插值函數，用于氣動參數插值，輸入變量依次為：攻角數組，二維待插參數數組，插值點攻角值，二維待插參數數組中要插值的行數
function W = oneinterp2(t1,t3,t4,t6)
[x y]=size(t3);

if t4<=t1(1)%攻角小于或者等于最小給定攻角值
    j=1;
end    

if t4>t1(y)%攻角大于最大給定攻角值
    j=y-1;
else
     j=1;
     while t4>t1(j+1)
          j=j+1;
     end    
end     

W=t3(t6,j)+(t3(t6,j)-t3(t6,j+1))*(t4-t1(j))/(t1(j)-t1(j+1));