agr.m

有限元法计算平板受集中载荷的程序

function finresult=agr(exgcoord,result)

%------------------------------------------------------------------------
%  目的：
%     将全板的节点坐标和节点位移对应起来，i->节点号，j->对应坐标和位移
%
%  变量：
%     finresult - 节点坐标和对应位移对应起来的矩阵
%     result - 节点位移矩阵
%     exgcoord - 节点坐标矩阵
%------------------------------------------------------------------------

finresult=zeros(5,25);
for i=1:5;
    if i<=2;
        finresult(i,:)=exgcoord(:,i);
    else
        finresult(i,:)=result(:,i-2);
    end
end