你好,
以下是实现正确吗?
函数DiffusionConvection
m = 0;
x = linspace (0、62、10);
t = linspace (0, 10100);
索尔= pdepe (m, @pdefun, @icfun @bcfun x, t)
函数[g、f、s] = pdefun (x、t、c、DcDx)
D = 900;
v = 10;
g = 1;
f = D * DcDx;
s = - v * DcDx;
结束
函数c0 = icfun (x)
c0 = 80;
结束
函数[pl, ql,公关,qr] = bcfun (xl, cl, xr、铬、t)
pl = cl -10;
ql = 1;
公关= cr;
qr = 1;
结束
结束