- 积分
- 0
- 注册时间
- 2008-8-30
- 仿真币
-
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2011-10-25 22:23:15
|
显示全部楼层
来自 陕西西安
本帖最后由 chentao807 于 2011-10-25 22:24 编辑
这里附上Comsol做的两段代码,用3.5的朋友可以测试一下。另外各位帮我看一下代码是否有问题。
第一个问题
- clear all; clc;
- hmax = ones(1,5)./[5 10 20 40 80];
- mat = ones(1,5);
- for s = 1:5
- fem.geom = rect2;
- fem.mesh = meshinit(fem, 'hmax', hmax(s));
- fem.equ.f = '2*pi^2*sin(pi*x)*sin(pi*y)'; fem.equ.c = 1;
- fem.bnd.h = 1; fem.bnd.r = 'sin(pi*x)*sin(pi*y)';
- fem.shape = 2;
- fem.xmesh = meshextend(fem);
- fem.sol = femstatic(fem);
- mat(s) = postint(fem, '(u-sin(pi*x)*sin(pi*y))^2');
- end
- loglog(hmax, mat);
复制代码
第二个问题
- clear all; clc;
- hmax = ones(1,5)./[5 10 20 40 80];
- mat = ones(1,5);
- for s = 1:5
- fem.geom = rect2;
- fem.mesh = meshinit(fem, 'hmax', hmax(s));
- fem.equ.f = 1; fem.equ.c = 1;
- fem.bnd.h = 1; fem.bnd.r = '(1-x^2-y^2)/4';
- fem.shape = 3;
- fem.xmesh = meshextend(fem);
- fem.sol = femstatic(fem);
- mat(s) = postint(fem, '(u-(1-x^2-y^2)/4)^2');
- end
- loglog(hmax, mat);
复制代码
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册
×
|