| 查看: 1437 | 回复: 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 ] |
回复此楼» 收录本帖的淘帖专辑推荐
 资源收集 |
» 猜你喜欢
哪位老哥知道今年的国自然具体哪一天放榜？
已经有9人回复
-
欢迎发来filecode的Mz6后的代码验证其规律
已经有72人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有26人回复
-
我的国基提前知道中了，可是同事的操作让我实在接受不了，怎么会有这样的人
已经有16人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有12人回复
-
招聘 金属平磨液，抛光液研发工程师
已经有3人回复
-
时间戳又变了8-15
已经有23人回复
-
filecode=后面第一个是大写字母
已经有7人回复
-
filecode
已经有12人回复
-
小木虫上这么多卖论文的，真有人买论文么？感觉没必要啊
已经有13人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求助：关于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
- 专业: 理论和计算化学
4楼2013-01-18 22:31:53
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
5楼2013-01-26 21:00:47
