24小时热门版块排行榜    

查看: 1604  |  回复: 6

andersonlyw

新虫 (著名写手)

[求助] Fortran程序,如何实现采用矩阵保存单链表表头?

问题是这样,小弟想做三维网格的DSMC稀薄气体模拟,打算:
用N*N*N的三维矩阵存贮N*N*N个单链表表头,这样每个单链表可以用来存贮该网格内所有的气体分子信息(速度,坐标等),但是不知如何用Fortran程序实现?
请高手指教!可否提供几行程序片段供参考?

相应的物理思想见王学德,发表在2007年空气动力学学报上的论文:
http://d.g.wanfangdata.com.hk.ez ... dlxxb200701020.aspx
题名:一类二维非结构网格DSMC方法的实现策略及其应用
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

andersonlyw

新虫 (著名写手)

解决此问题的虫友,另有100金币可领。见:
http://muchong.com/bbs/viewthread.php?tid=6451229
2楼2013-10-12 17:48:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

andersonlyw

新虫 (著名写手)

我似乎已经想到了一种方式。
如下:采用一个指针数组MP(分配三维N×N×N空间),一个单链表P,一个普通矩阵M(三维N×N×N)可完成任务。首先,单链表P记录所有计算区(三维N×N×N Cells)内的分子信息,分子运动一步后,计算碰撞时,先记录每Cell内的分子数量于普通矩阵M内。然后根据矩阵M提供的信息,给指针数组每个点(共N×N×N个)分配(6×X的二维存贮空间,其中3行存分子速度,3行存贮分子坐标)。这类似于动态矩阵,完成后,在计算分子碰撞时,可以直接采用矩阵方式选择碰撞分子对。完成分子碰撞后,再将指针数组内保存的数据全部转存至单链表。如此循环即可。
3楼2013-10-13 12:34:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

andersonlyw

新虫 (著名写手)

请教各位做稀薄气体DSMC模拟的虫友们,你们是怎么存贮分子信息的?互相交流一下,共同提高。有金币送。
4楼2013-10-13 12:36:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

andersonlyw

新虫 (著名写手)

引用回帖:
3楼: Originally posted by andersonlyw at 2013-10-13 12:34:37
我似乎已经想到了一种方式。
如下:采用一个指针数组MP(分配三维N×N×N空间),一个单链表P,一个普通矩阵M(三维N×N×N)可完成任务。首先,单链表P记录所有计算区(三维N×N×N Cells)内的分子信息,分子运 ...

最近采用此方法编写了程序,完成了分子泵的过渡流态下的压缩比计算,确认该方法可行,占用内存少,可放心使用。
5楼2013-11-27 08:38:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

meigudengfei

新虫 (初入文坛)

楼主,我做的是粘性颗粒的碰撞,最近一直在纠结碰撞信息的存储,想问问运用指针线性链表怎么处理的,还有你是怎么搜索分子颗粒碰撞的,判断分子颗粒之间的距离吗?求教。。。
6楼2014-03-23 20:51:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzpjjjjj

禁虫 (初入文坛)

本帖内容被屏蔽

7楼2016-10-20 08:48:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 andersonlyw 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 时间戳又变了8-15 +13 archvillain 2026-08-15 25/1250 2026-08-16 20:13 by zhaosm1982
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 6/300 2026-08-16 20:07 by 奶牛小黑
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +3 Tide man 2026-08-14 3/150 2026-08-16 17:47 by jurkat.1640
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +11 家与远方 2026-08-10 16/800 2026-08-16 10:28 by ray43
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +10 majunge000 2026-08-11 12/600 2026-08-16 08:18 by xli1984
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] filecode +8 cratir 2026-08-14 12/600 2026-08-15 18:08 by zyfgau
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
信息提示
请填处理意见