xihuangdongling
2011-07-28, 22:44
clear
mt=3.734;u=0.0685;M=20;n=0.3;Dl=0.35;Dt=0.1;t=30;
X=-50:50:250;Y=-50:50:50;
[x,y]=meshgrid(X,Y);
bata=sqrt(u^2*x.^2/(4*Dl^2)+u^2*y.^2./(4*Dl*Dt));
K0=besselk(0,bata)
miu=u^2*t/(4*Dl)
W=int(y.^(-1)*exp(-y.-bata^2/(4*y.)),miu;inf)
C=mt*exp(x.*u./(2*Dl))*(2*K0.-W.)/(4*pi*M*n*sqrt(Dl*Dt).;
figure(4);
surf(x,y,C);
mt=3.734;u=0.0685;M=20;n=0.3;Dl=0.35;Dt=0.1;t=30;
X=-50:50:250;Y=-50:50:50;
[x,y]=meshgrid(X,Y);
bata=sqrt(u^2*x.^2/(4*Dl^2)+u^2*y.^2./(4*Dl*Dt));
K0=besselk(0,bata)
miu=u^2*t/(4*Dl)
W=int(y.^(-1)*exp(-y.-bata^2/(4*y.)),miu;inf)
C=mt*exp(x.*u./(2*Dl))*(2*K0.-W.)/(4*pi*M*n*sqrt(Dl*Dt).;
figure(4);
surf(x,y,C);