oneinterp2.m

垂直发射弹道仿真程序(采用四元数法).matlab编写。

%一维插值函数，用于气动参数插值，输入变量依次为：攻角数组，二维待插参数数组，插值点攻角值，二维待插参数数组中要插值的行数
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));