| 7 | 1/1 | 返回列表 |
| 查看: 1421 | 回復: 6 | ||
andersonlyw新蟲 (著名寫手)
|
[求助]
Fortran程序,如何實現(xiàn)采用矩陣保存單鏈表表頭?
|
|
問題是這樣,小弟想做三維網(wǎng)格的DSMC稀薄氣體模擬,打算: 用N*N*N的三維矩陣存貯N*N*N個單鏈表表頭,這樣每個單鏈表可以用來存貯該網(wǎng)格內(nèi)所有的氣體分子信息(速度,坐標等),但是不知如何用Fortran程序?qū)崿F(xiàn)? 請高手指教!可否提供幾行程序片段供參考? 相應的物理思想見王學德,發(fā)表在2007年空氣動力學學報上的論文: http://d.g.wanfangdata.com.hk.ez ... dlxxb200701020.aspx 題名:一類二維非結(jié)構(gòu)網(wǎng)格DSMC方法的實現(xiàn)策略及其應用 |
新蟲 (著名寫手)
新蟲 (著名寫手)
|
我似乎已經(jīng)想到了一種方式。 如下:采用一個指針數(shù)組MP(分配三維N×N×N空間),一個單鏈表P,一個普通矩陣M(三維N×N×N)可完成任務。首先,單鏈表P記錄所有計算區(qū)(三維N×N×N Cells)內(nèi)的分子信息,分子運動一步后,計算碰撞時,先記錄每Cell內(nèi)的分子數(shù)量于普通矩陣M內(nèi)。然后根據(jù)矩陣M提供的信息,給指針數(shù)組每個點(共N×N×N個)分配(6×X的二維存貯空間,其中3行存分子速度,3行存貯分子坐標)。這類似于動態(tài)矩陣,完成后,在計算分子碰撞時,可以直接采用矩陣方式選擇碰撞分子對。完成分子碰撞后,再將指針數(shù)組內(nèi)保存的數(shù)據(jù)全部轉(zhuǎn)存至單鏈表。如此循環(huán)即可。 |
新蟲 (著名寫手)
新蟲 (著名寫手)
新蟲 (初入文壇)
|
本帖內(nèi)容被屏蔽 |
| 7 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 329求調(diào)劑,一志愿西北工業(yè)大學,材料工程(085601) +4 | 小小機靈蟲 2026-03-29 | 10/500 |
|
|---|---|---|---|---|
|
[考研] 22408 359分調(diào)劑 +4 | Qshers 2026-03-27 | 6/300 |
|
|
[考研]
|
nnnnnnn5 2026-03-25 | 10/500 |
|
|
[考研] 332求調(diào)劑 +8 | 蕉蕉123 2026-03-28 | 8/400 |
|
|
[考研] 352分-085602-一志愿985 +5 | 海納百川Ly 2026-03-29 | 5/250 |
|
|
[考研] 0703化學 +11 | 妮妮ninicgb 2026-03-27 | 11/550 |
|
|
[碩博家園] 求調(diào)劑 有機化學考研356分 +3 | Nadiums 2026-03-25 | 4/200 |
|
|
[考研] 數(shù)一英一271專碩(085401)求調(diào)劑,可跨 +7 | 前行必有光 2026-03-28 | 8/400 |
|
|
[考研] 一志愿太原理工安全工程300分,求調(diào)劑 +5 | 0857求調(diào)劑. 2026-03-24 | 6/300 |
|
|
[考研] 343求調(diào)劑 +5 | 愛羈絆 2026-03-28 | 5/250 |
|
|
[考研]
|
孅華 2026-03-22 | 17/850 |
|
|
[考研] 333求調(diào)劑 +3 | question挽風 2026-03-23 | 3/150 |
|
|
[考研] 286求調(diào)劑 +4 | lim0922 2026-03-26 | 4/200 |
|
|
[考研] 284求調(diào)劑 +11 | junqihahaha 2026-03-26 | 12/600 |
|
|
[考研] 342求調(diào)劑 +3 | 加油a李zs 2026-03-26 | 3/150 |
|
|
[考研] 321求調(diào)劑 +6 | wasdssaa 2026-03-26 | 6/300 |
|
|
[考研] 求b區(qū)院校調(diào)劑 +4 | 周56 2026-03-24 | 5/250 |
|
|
[考研] 318求調(diào)劑 +3 | plum李子 2026-03-23 | 3/150 |
|
|
[考研] 調(diào)劑 +4 | 13853210211 2026-03-24 | 4/200 |
|
|
[考研] 一志愿山東大學藥學學碩求調(diào)劑 +3 | 開開心心沒煩惱 2026-03-23 | 4/200 |
|