clc;
clear all;
syms w z r a x k
a=17.5;
r=17.5;
%b=sqrt(r^2-(r-a)^2);
x=66;
k=0.886;
h=2*sqrt(r^2-w^2);
f2=sqrt(2*h/(3.14*z)*tan(3.14*z/(2*h)))*(0.923+0.199*(1-sin(3.14*z/(2*h)))^4)/cos(3.14*z/(2*h));
f11=(1.122-0.561*(z/h)+0.085*((z/h)^2)+0.018*((z/h)^3))/sqrt(1-(z/h));
%被积函数
y=32*x^2*(r^2-w^2)*z*f2^2+2*r^4*k^4*z*f11^2;
%积分上限
fh=sqrt(r^2-w^2)-(r-a);
%积分结果
F1=int(y,z,0,fh)
F2=eval(int(F1,w,-r,r))
我要用matalb将二重积分换为这样的一重积分计算,程序如上面,但是我的二重积分能够计算,这个一重积分却算不了,提示Error using mupadmex
Error in MuPAD command: Out of memory.
Error in sym/int (line 124)
rSym = mupadmex('symobj::intdef',f.s,x.s,a.s,b.s,options);
Error in Untitled3 (line 17)
F1=int(y,z,0,fh)