syms rb H i k ts t t1 r a b c d e f g h DA DB A B G
H=100
rb=0.15
i=rb/H
k=1.2.*10.^(-6)
ts=H.^2/(9.*k)
t=24.*3600
t1=t./ts
r=3./2.*sqrt(t1)
a=sqrt((i.^2)+1)
b=sqrt((i.^2)+4)
c=exp(-r.^2.*((i.^2)+1))
d=exp(-r.^2.*((i.^2)+4))
e=exp(-r.^2.*i.^2)
f=erfc(r.*i)
g=erfc(r.*b)
h=erfc(r.*a)
DA=a.*h-i.*f-(c-e)./(i.*sqrt(3.1415))
DB=a.*h-0.5.*(r.*f+b.*g)-(c-0.5.*(e+d))/(i.*sqrt(3.1415))
A=quadl('erfc(0.0145.*z)./sqrt(z.^2-0.0015.^2)',0.0015,sqrt(0.0015.^2+1))
B=quadl('erfc(0.0145.*z)./sqrt(z.^2-0.0015.^2)',sqrt(0.0015.^2+1),sqrt(0.0015.^2+4))
G=A-B-DA-DB
回复此楼
+2/90
