24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1436  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 086000生物与医药求调剂 +3 老天眷顾之人 2026-03-31 3/150 2026-04-05 22:24 by syh9288
[考研] 326求调剂 +3 顾若浮生 2026-04-05 3/150 2026-04-05 18:32 by 蓝云思雨
[考研] 一志愿北交大材料工程总分358求调剂 +6 cs0106 2026-04-05 6/300 2026-04-05 16:34 by imissbao
[考研] 求调剂 +3 小沢 2026-04-03 3/150 2026-04-05 09:10 by sihailian3
[考研] 278求调剂 +14 范婷娜 2026-04-04 15/750 2026-04-04 22:15 by lqwchd
[考研] 085601,一志愿厦大334复试被刷求调剂 +13 曾仰之 2026-04-03 15/750 2026-04-04 20:13 by dongzh2009
[考研] 一志愿南农090401,268,求调剂 +5 一木鸟然 2026-04-04 5/250 2026-04-04 17:07 by babysonlkd
[考研] 293分求调剂,外语为俄语 +6 加一一九 2026-03-31 6/300 2026-04-04 14:57 by 聪明的大松鼠
[考研] 357求调剂 +13 1050389037 2026-04-03 13/650 2026-04-03 22:27 by 无际的草原
[考研] 295求调剂 +3 尚偌呀 2026-04-03 4/200 2026-04-03 21:23 by zhq0425
[考研] 266分,求材料相关专业调剂 +13 哇呼哼呼哼 2026-03-30 15/750 2026-04-03 15:24 by arrow8852
[考研] 求调剂 +4 15064154688 2026-04-03 5/250 2026-04-03 15:07 by zrongyan
[考研] 330求调剂 +3 白神呜呼呼 2026-04-02 3/150 2026-04-03 10:15 by 蓝云思雨
[考研] 274求调剂 +10 薛定谔的虎。 2026-04-01 10/500 2026-04-03 10:13 by tianyyysss
[考研] 085600 295分求调剂 +19 W55j 2026-03-30 23/1150 2026-04-03 09:53 by 千千运气
[考研] 0703化学 +7 goldtt 2026-04-02 9/450 2026-04-03 09:36 by 蓝云思雨
[考研] 312求调剂 +4 赊月色 2026-04-02 5/250 2026-04-03 08:21 by fangshan711
[考研] 265求调剂 +11 yelck 2026-04-01 12/600 2026-04-01 19:12 by 549790059
[考研] 349求调剂 +6 吃的不少 2026-04-01 6/300 2026-04-01 17:55 by JYD2011
[硕博家园] 考研调剂 +5 骆驼男人 2026-04-01 5/250 2026-04-01 14:28 by syjjj0321
信息提示
请填处理意见