向前差分格式求解二维热传导方程.pdf

用向前差分格式求解二维热传导方程

functionvarargout=liu(varargin)

T=1;a=1;h=1/30;dt=1/150;

[X,T,Z]=chfenmethed(h,dt,a,T);

mesh(X,T,Z(:,:,3));

shadingflat;

%xlabel(X,FontSize,14);

%ylabel(t,FontSize,14);

%zlabel(error,FontSize,14);

%title(误差图);

function[X,Y,Z]=chfenmethed(h,dt,a,T);

%求解下问题

%u_t-a*

文档评论(0)

1亿VIP精品文档

相关文档