>> syms k1 E p C v rg w1 t1 l Tc T1 A M real
>> E=3*10^10;
>> p=2450;
>> C=sqrt(E/p);
>> l=10;
>> Tc=l/C;
>> v=0.2;
>> rg=0.2475;
>> T=2*10^(-3);
>> T1=T/Tc;
>> A=0.3847;
>> k1=w1/(E*Tc^2/p-v^2*rg^2*w1^2)^(1/2);
>> Hv=w1*tan(k1*l)/(E*A*Tc*k1);
>> ezplot(w1,Hv1,[0,100])
>> g1=i*w1*tan(k1*l)*T1*(1+exp(-(i*T1*w1)/2))*exp(i*w1*t1)/(k1*(4*pi^2-T1^2*w1^2))
>> g=ifourier(g1,w1,t1)
g =
-246290604621824/5*i*6^(1/2)*(ifourier(tan(200*w1/(40000-10*w1^2)^(1/2))*exp(i*w1*t1)*(40000-10*w1^2)^(1/2)/(-136124286778060735+1688849860263936*w1^2),w1,t1)+ifourier(tan(200*w1/(40000-10*w1^2)^(1/2))*exp(i*w1*t1)*(40000-10*w1^2)^(1/2)/(-136124286778060735+1688849860263936*w1^2)*exp(-1/7*i*6^(1/2)*w1),w1,t1))
g为桩顶速度时域速度直,可求出的结果里面仍有ifourier符号,图像也画不出来,肯定大家指点 |