PTT數位生活區 / Fortran

[問題] 沿著邊界切割成小塊的element

看板Fortran作者 (qq)時間13年前 (2011/06/16 03:30), 編輯推噓7(7推 0噓 15→)
留言22則, 8人參與, 最新討論串1/1
我是fortran程式新手 現在有一個作業是要把一個長方體 沿著x軸20(長度)和y軸15(長度)大小 我現在4個邊先假設都要分20段 請問要如何寫出以(0,0)為起點 然後逆時針繞一圈 例如點二就是(1.0) 三 (2,0) 謝謝大家可以回覆我的問題 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.112.217.10
→
06/16 09:44, , 1F
土法煉鋼四個迴圈
06/16 09:44, 1F
推
06/16 12:52, , 2F
BEM?? 做i=1 to 20的迴圈，則四個邊的ELEMENT編號分別為:
06/16 12:52, 2F
→
06/16 12:53, , 3F
i、i+20、i+40、i+60，而四個邊的node座標則為
06/16 12:53, 3F
→
06/16 12:55, , 4F
(DBLE(i-1)*dx,0d0)、(15d0,DBLE(i-1)*dy)
06/16 12:55, 4F
→
06/16 12:56, , 5F
(20d0-DBLE(i-1)*dx,15d0)、(0d0,15d0-DBLE(i-1)*dy)
06/16 12:56, 5F
→
06/16 12:57, , 6F
上上行的第二組座標打錯了XD 應該是(20d0,DBLE(i-1)*dy)
06/16 12:57, 6F
→
06/16 12:59, , 7F
如果會寫隱藏式迴圈的話，會更簡短
06/16 12:59, 7F
推
06/16 13:10, , 8F
喔忘了說 dx、dy是上下與左右邊上node與node的間距
06/16 13:10, 8F
→
06/16 13:13, , 9F
還有上面的座標寫成CODE是(/ x座標,y座標 /)，記得要加"/"
06/16 13:13, 9F
→
06/16 13:43, , 10F
可以直接寫progrsm mmain出來給我學習嗎? 謝謝
06/16 13:43, 10F
推
06/16 15:41, , 11F
你怎麼不問做你後面的帥哥學長呢??
06/16 15:41, 11F
推
06/16 15:43, , 12F
拜託你趕快自D，別在這邊丟臉了.....
06/16 15:43, 12F
→
06/16 16:18, , 13F
謝指教
06/16 16:18, 13F
→
06/16 16:19, , 14F
有收到你寄的信 感謝解答
06/16 16:19, 14F
→
06/16 20:26, , 15F
某樓 不用這麼酸吧!?
06/16 20:26, 15F
→
06/16 22:11, , 16F
雖然作業文不好，請k板友語氣和緩一點。
06/16 22:11, 16F
→
06/18 02:04, , 17F
cool123415:可以直接寫progrsm mmain出來給我學習嗎?
06/18 02:04, 17F
→
06/18 02:05, , 18F
K版友應該是這句推文才會那樣推
06/18 02:05, 18F
推
06/18 17:51, , 19F
其實不是啦...kai就是原po的帥哥學長，原po都是他教的!哈
06/18 17:51, 19F
→
06/18 19:02, , 20F
認識的啊…嘛…
06/18 19:02, 20F
推
06/21 13:18, , 21F
p大不就是傳說中的....原po旁邊之極帥學長
06/21 13:18, 21F
推
06/21 14:39, , 22F
kai哥的同學
06/21 14:39, 22F
‣ 更多 cool123415 的文章
文章代碼(AID): #1D-GXPM7 (Fortran)
Fortran 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 cool123415 的文章
文章代碼(AID): #1D-GXPM7 (Fortran)