| 4 | 1/1 | 返回列表 |
| 查看: 2968 | 回復(fù): 3 | |||
songyunl1980銀蟲 (小有名氣)
|
[求助]
關(guān)于復(fù)數(shù)在Fortran中如何定義的問題
|
|
最近剛剛接觸復(fù)數(shù)求解的問題,不知道哪位曾經(jīng)做過。 我想定義一個(gè)6×1的實(shí)數(shù)向量,共13個(gè)向量的話可以定義 REAL A(6,1,13) 那如果我想定義一個(gè)6×1的復(fù)數(shù)向量,實(shí)部6個(gè),虛部6個(gè)。共13個(gè)復(fù)數(shù)向量的話是否是 COMPLEX A(6,6,13) ??求明白人幫助,十分感謝! |
經(jīng)典帖子集合 |
木蟲 (職業(yè)作家)
中國(guó)特色

鐵桿木蟲 (著名寫手)
工程和科學(xué)數(shù)值計(jì)算咨詢
|
如果想定義一個(gè)6×1的復(fù)數(shù)向量,A complex*16, dimension (6) :: A 或 complex*16 :: A(6) 如果想定義一個(gè)6×13的復(fù)數(shù)數(shù)組,A complex*16, dimension (6,13) :: A 或 complex*16 :: A(6,13) 這里 complex*16 是雙精度, 如果單精度足夠,就用 complex*8 |
| 4 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 考研求調(diào)劑 +3 | 橘頌. 2026-03-17 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 085601專碩,總分342求調(diào)劑,地區(qū)不限 +4 | share_joy 2026-03-16 | 4/200 |
|
|
[考研] 293求調(diào)劑 +7 | zjl的號(hào) 2026-03-16 | 12/600 |
|
|
[考研] 304求調(diào)劑 +8 | 小熊joy 2026-03-14 | 8/400 |
|
|
[考研] 211本,11408一志愿中科院277分,曾在中科院自動(dòng)化所實(shí)習(xí) +6 | Losir 2026-03-12 | 7/350 |
|
|
[考研] 一志愿南京大學(xué),080500材料科學(xué)與工程,調(diào)劑 +4 | Jy? 2026-03-16 | 4/200 |
|
|
[考研] 267一志愿南京工業(yè)大學(xué)0817化工求調(diào)劑 +6 | SUICHILD 2026-03-12 | 6/300 |
|
|
[基金申請(qǐng)] 國(guó)自科面上基金字體 +6 | iwuli 2026-03-12 | 7/350 |
|
|
[考研] 085600材料與化工 求調(diào)劑 +13 | enenenhui 2026-03-13 | 14/700 |
|
|
[考研] 0703 物理化學(xué)調(diào)劑 +3 | 我可以上岸的對(duì)?/a> 2026-03-13 | 5/250 |
|
|
[考研] 289求調(diào)劑 +4 | 這么名字咋樣 2026-03-14 | 6/300 |
|
|
[考研] 中科大材料專碩319求調(diào)劑 +3 | 孟鑫材料 2026-03-13 | 3/150 |
|
|
[考研] 328求調(diào)劑 +3 | 5201314Lsy! 2026-03-13 | 6/300 |
|
|
[考研] 四川大學(xué)085601材料工程專碩 初試294求調(diào)劑 +4 | 祝我們好在冬天 2026-03-11 | 4/200 |
|
|
[考研] 315求調(diào)劑 +9 | 小羊小羊_ 2026-03-11 | 10/500 |
|
|
[考研] 工科278分求調(diào)劑 +5 | 周慢熱啊 2026-03-12 | 7/350 |
|
|
[考研] 工科材料085601 279求調(diào)劑 +8 | 困于星晨 2026-03-12 | 10/500 |
|
|
[考研] 0856化學(xué)工程280分求調(diào)劑 +4 | shenzxsn 2026-03-11 | 4/200 |
|
|
[考研] 070303一志愿西北大學(xué)學(xué)碩310找調(diào)劑 +3 | d如愿上岸 2026-03-13 | 3/150 |
|
|
[考博] 26讀博 +4 | Rui135246 2026-03-12 | 10/500 |
|