| 查看: 1226 | 回复: 7 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
5点差分格式解边值问题。。。求大神帮忙 已有1人参与
|
||
有没有类似的程序，哪位大神给我发一下，或者帮我写以下程序。 IMG_20151229_193059.jpg |
回复此楼» 猜你喜欢
综述论文作为代表作会不会影响评审专家的印象分？
已经有12人回复
-
2019年青年基金涵评意见，大家看看几个A，几个B?
已经有4人回复
-
应该是93bebmhtak前后十一个字符比较关键
已经有29人回复
-
奇怪，两个人的filecode固定段从头到尾一模一样
已经有9人回复
-
是这周出结果还是下周出结果？
已经有3人回复
-
小木虫上这么多卖论文的，真有人买论文么？感觉没必要啊
已经有9人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有4人回复
-
帮忙看看fileCode
已经有13人回复
-
为什么网上很多人说本周 12号出结果
已经有7人回复
-
读博的好处
已经有3人回复
5楼2015-12-30 07:36:59
米米米BO
金虫 (初入文坛)
- 应助: 6 (幼儿园)
- 金币: 2065.3
- 红花: 4
- 帖子: 48
- 在线: 12.5小时
- 虫号: 2814649
- 注册: 2013-11-20
- 性别: GG
- 专业: 土壤学
2楼2015-12-29 19:55:20
|
下面别人的程序，我该如何利用我的问题里面的边值条件呢？ function [ u x y k]=wudianchafenfa1(h,m,n,kmax,ep) % g-s迭代法解五点差分法问题 %kmax为最大迭代次数 %m,n为x,y方向的网格数，例如（2-0）/0.01=200;aa syms temp; u=zeros(n+1,m+1); x=-1+(0:m)*h; y=-1+(0:n)*h; for(i=1:n+1) u(i,1)=sin(3*pi/4+pi*y(i)/4); u(i,m+1)=sin(3*pi/4+pi*y(i)/4); end for(i=1:n) for(j=1:m) f(i,j)=32*u(i,j); end end t=zeros(n-1,m-1); for(k=1:kmax) for(i=2:n) for(j=2:m) temp=h*h*f(i,j)/4+(u(i,j+1)+u(i,j-1)+u(i+1,j)+u(i-1,j))/4; t(i,j)=(temp-u(i,j))*(temp-u(i,j)); u(i,j)=temp; end end t(i,j)=sqrt(t(i,j)); if(k>kmax) break; end if(max(max(t))<ep) break; end end |
3楼2015-12-29 21:42:43
米米米BO
金虫 (初入文坛)
- 应助: 6 (幼儿园)
- 金币: 2065.3
- 红花: 4
- 帖子: 48
- 在线: 12.5小时
- 虫号: 2814649
- 注册: 2013-11-20
- 性别: GG
- 专业: 土壤学
4楼2015-12-30 00:13:43
