| 查看: 1559 | 回复: 4 | ||||
[求助]
求助：用Fortran写一个关于晶粒个数统计和编号的程序。卡了我好久了。
|
|
小生近来自学Fortran，开始编写模拟程序实现晶粒长大过程的模拟。但周围没人做这个，而且没人写代码。因此，没有人可以讨论，我是一个头两个大。 目的：求一个逐个统计并赋值的小程序。也就是常见的晶粒长大模拟。 事件：划定一个N*N二维计算区域，如512*512个格点的区域。每个格点上可存储Q个不同的数值pi（0~1之间的实数），该数值的演化由一个PDE计算得到，并交由一个二维数组P（i,j）来保存pi。经过一段时间演化之后，形成如下图所示的形貌组织，即晶粒形成了。演化到最后，虽然每个格点上可以有Q个值，但只有一个为1，其余全部为0，因此属于一个晶粒。但如果格点处在晶界上，这可能存在好多个pi的值（0~1）。 现在，我需要定义一个变量Q(一维或二维？)来统计生成了多少个晶粒，并给每个晶粒进行编号，如1,2，…等。显然，每个晶粒内含有的格点数目不同。 这里晶粒的定义：在一个晶粒内部，每个格点上的某一个pi相同（均为1，比如p41为1，其余所有Pi都为0）；两个晶粒之间的晶界上0  111.jpg [ Last edited by 鲤鱼飞 on 2013-1-16 at 20:55 ] |
回复此楼» 收录本帖的淘帖专辑推荐
 资源收集 |
» 猜你喜欢
OpenAI又攻克数学难题了，离AI做有机合成还有多远？
已经有12人回复
-
极限拉扯，如何抉择
已经有13人回复
-
课题组会帮你通过考核么？
已经有7人回复
-
入职后第一次管课题组的专利缴费，对账才发现官费比别人多掏了一倍
已经有6人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有9人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有8人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有10人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有9人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有7人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有10人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求助：关于fortran建数组问题，谢谢！
已经有4人回复
- 又来求助啦，fortran里使用多文件，其中的子程序文件怎么观察参数值啊？
已经有3人回复
- 求助fortran编程时怎么使用数据库
已经有4人回复
- 写了一个fortran90的小程序，编译通不过，请大侠帮忙
已经有59人回复
- 【求助】matlab数据导入Fortran
已经有9人回复
- 【求助】FORTRAN写文件时每行开头都多了一个空格？
已经有6人回复
- 【求助】FEDORA12下用FORTRAN编写程序需要下一个FORTRAN编译器么
已经有18人回复
- 【求助】求高手关于Fortran数据读写的问题。【已完结】
已经有12人回复
- 【求助】fortran语言, 如何计算卡方分布？
已经有4人回复
- 【求助】求指点，在Fortran里面，怎样实现“数组维度可调”的数组?
已经有5人回复
- 【求助】急求一个NAG FORTRAN LIBRARY里的一个Fortran程序，名字是”F02FJF“！谢谢！
已经有10人回复
- 【求助】这样的公式，在fortran里该怎么写了，谢谢【求助成功】
已经有4人回复
- 【求助】有关fortran进行数值模拟
已经有10人回复
chembetsey
木虫 (小有名气)
- 应助: 125 (高中生)
- 金币: 3820.1
- 散金: 5
- 红花: 9
- 帖子: 262
- 在线: 281.8小时
- 虫号: 1781694
- 注册: 2012-04-27
- 专业: 理论和计算化学
2楼2013-01-16 23:14:23
3楼2013-01-18 08:31:05
chembetsey
木虫 (小有名气)
- 应助: 125 (高中生)
- 金币: 3820.1
- 散金: 5
- 红花: 9
- 帖子: 262
- 在线: 281.8小时
- 虫号: 1781694
- 注册: 2012-04-27
- 专业: 理论和计算化学
4楼2013-01-18 22:31:53
5楼2013-01-26 21:00:47
