test12.m

matlab中PDE工具箱的帮助文件pde.pdf的例子全部用代码实现,花了我一个月的时间,有限元应用程序

[p,e,t]=initmesh('lshapeg');
[p,e,t]=refinemesh('lshapeg',p,e,t);
[p,e,t]=refinemesh('lshapeg',p,e,t);
c=1;a=0;d=1;r=[0 100];b='lshapeg';
%[v,l]=pdeeig(b,p,e,t,c,a,d,r)
[v,l]=pdeeig('lshapeb',p,e,t,1,0,1,[0 100]);
pdesurf(p,t,v(:,1))
figure
membrane(1,20,9,9)
pause
figure
pdesurf(p,t,v(:,12))
pause
figure
membrane(12,20,9,9)