 |
 |
 |
| 24小時(shí)熱門(mén)版塊排行榜 |
- >論壇更新日志 (3979)
- >導(dǎo)師招生 (511)
- >考研 (500)
- >文獻(xiàn)求助 (206)
- >蟲(chóng)友互識(shí) (190)
- >基金申請(qǐng) (140)
- >休閑灌水 (104)
- >論文投稿 (80)
- >考博 (64)
- >碩博家園 (60)
- >教師之家 (58)
- >招聘信息布告欄 (55)
- >博后之家 (42)
- >留學(xué)生活 (30)
- >論文道賀祈福 (29)
- >無(wú)機(jī)/物化 (22)
 |
 |
 |
||
 |
 |
 |
 |
 |
| 6 | 1/1 | 返回列表 |
| 查看: 2578 | 回復(fù): 5 | |||
nano_xinxin金蟲(chóng) (小有名氣)
|
[交流]
【求助】求指點(diǎn)，在Fortran里面，怎樣實(shí)現(xiàn)“數(shù)組維度可調(diào)”的數(shù)組?
|
|
我剛開(kāi)始學(xué)習(xí) Fortran 語(yǔ)言編程，最近在編程時(shí)，遇到一個(gè)問(wèn)題，因?yàn)橐诔绦蚶锩嫔婕耙粋�(gè)do 循環(huán)，希望通過(guò)控制 do 循環(huán)的循環(huán)變量 I ，來(lái)調(diào)用一個(gè)維度可以改變的三維數(shù)組(第一維度已經(jīng)確定)，例如數(shù)組 A (I ，：，：) . 例如，我希望： .............. real(8) , allocatable :: A ( ： ，： ，：) .............. I=1 時(shí)， A (1 ，： ，：) 數(shù)組元素是一個(gè)4*3（四乘三) 的二維矩陣； I=2 時(shí)， A (2 ，：，：) 數(shù)組元素是一個(gè)3*5 的二維矩陣； .............. I=N時(shí)， A (N ，： ，：) 數(shù)組元素 是一個(gè)X*Y的二維矩陣. .............. 請(qǐng)問(wèn)，怎樣定義、賦值、調(diào)用這樣一個(gè)維度可以改變的動(dòng)態(tài)數(shù)組？（三個(gè)維度同時(shí)改變或者只改變第二、第三維度？） 謝謝！ [ Last edited by nano_xinxin on 2010-9-2 at 19:26 ] |
回復(fù)此樓» 猜你喜歡
0703化學(xué)調(diào)劑
已經(jīng)有7人回復(fù)
-
0854，計(jì)算機(jī)類招收調(diào)劑
已經(jīng)有6人回復(fù)
-
【0703化學(xué)調(diào)劑】-一志愿華中師范大學(xué)-六級(jí)475
已經(jīng)有6人回復(fù)
-
0854可跨調(diào)劑，一作一項(xiàng)核心論文五項(xiàng)專利，省、國(guó)級(jí)證書(shū)40+數(shù)一英一287
已經(jīng)有4人回復(fù)
-
能源材料化學(xué)課題組招收碩士研究生8-10名
已經(jīng)有8人回復(fù)
-
0817 化學(xué)工程 299分求調(diào)劑 有科研經(jīng)歷 有二區(qū)文章
已經(jīng)有3人回復(fù)
-
281求調(diào)劑（0805）
已經(jīng)有11人回復(fù)
-
299求調(diào)劑
已經(jīng)有5人回復(fù)
-
收復(fù)試調(diào)劑生
已經(jīng)有3人回復(fù)
-
280求調(diào)劑
已經(jīng)有7人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- Matlab的熟練用戶或者大神看過(guò)來(lái)，兩個(gè)隨機(jī)變量存在相互關(guān)系的簡(jiǎn)單問(wèn)題。重金求助！
已經(jīng)有1人回復(fù)
- 【求助】matlab帶有變量的矩陣求導(dǎo)
已經(jīng)有4人回復(fù)
- 【交流/求助】第一次發(fā)帖，請(qǐng)教藍(lán)白篩選后質(zhì)�；厥盏膯�(wèn)題
已經(jīng)有0人回復(fù)
- 【求助】一道算法題目
已經(jīng)有6人回復(fù)
- 【求助成功】murn.f用ifort編譯完運(yùn)行時(shí)不能正確執(zhí)行
已經(jīng)有2人回復(fù)
- 【求助】一個(gè)求積分的fortran程序，請(qǐng)高手指點(diǎn)（還是在物理區(qū)問(wèn)好些）
已經(jīng)有4人回復(fù)
- 【求助】溶膠凝膠法制備TiO2，粒徑太大，求牛人指點(diǎn)
已經(jīng)有3人回復(fù)
- 【求助/交流】種子液中出現(xiàn)晶體，求指點(diǎn)
已經(jīng)有3人回復(fù)
- 【求助】癸酰乙醛能用HPLC分析嗎
已經(jīng)有0人回復(fù)
- 碩博家園求助匯總貼（發(fā)求助貼的可PM版主）
已經(jīng)有1人回復(fù)
- 【求助】關(guān)于擬合得到體彈性模量&自旋極化&LDA+U等問(wèn)題，望大家指點(diǎn)指點(diǎn)
已經(jīng)有4人回復(fù)
- 【求助】太陽(yáng)能極限效率計(jì)算程序中的積分運(yùn)算
已經(jīng)有0人回復(fù)
- 【求助】求短日照處理在林木育苗及草坪草方面的文章
已經(jīng)有1人回復(fù)
- 【求助】關(guān)于共形映射的問(wèn)題，不甚感激！
已經(jīng)有12人回復(fù)
- 【求助】高人能給指點(diǎn)下不？【已解決】
已經(jīng)有3人回復(fù)
- 【分享】羊皮卷國(guó)語(yǔ)語(yǔ)音，療傷心靈的神藥【已搜索無(wú)重復(fù)】
已經(jīng)有2人回復(fù)
- 【求助】請(qǐng)問(wèn)下面MATLAB程序哪兒不對(duì)呢
已經(jīng)有9人回復(fù)
nano_xinxin
金蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 919.1
- 散金: 311
- 紅花: 1
- 帖子: 189
- 在線: 33小時(shí)
- 蟲(chóng)號(hào): 927575
- 注冊(cè): 2009-12-14
- 性別: GG
- 專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)
2樓2010-09-04 09:46:05
hakekill
木蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1709.3
- 帖子: 131
- 在線: 19小時(shí)
- 蟲(chóng)號(hào): 246017
- 注冊(cè): 2006-04-29
- 性別: GG
- 專業(yè): 水環(huán)境與生態(tài)水利
3樓2010-09-04 11:14:23
250748574
銀蟲(chóng) (正式寫(xiě)手)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 375.9
- 帖子: 315
- 在線: 9.6小時(shí)
- 蟲(chóng)號(hào): 946303
- 注冊(cè): 2010-01-21
- 性別: GG
- 專業(yè): 運(yùn)籌學(xué)
4樓2010-09-05 20:22:26
liubin1984
木蟲(chóng) (著名寫(xiě)手)
不糾結(jié)的男人
- 應(yīng)助: 1 (幼兒園)
- 金幣: 2635.1
- 散金: 827
- 紅花: 3
- 帖子: 2874
- 在線: 447小時(shí)
- 蟲(chóng)號(hào): 627659
- 注冊(cè): 2008-10-16
- 性別: GG
- 專業(yè): 粉末冶金與粉體工程
5樓2010-09-07 17:53:25
nano_xinxin
金蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 919.1
- 散金: 311
- 紅花: 1
- 帖子: 189
- 在線: 33小時(shí)
- 蟲(chóng)號(hào): 927575
- 注冊(cè): 2009-12-14
- 性別: GG
- 專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)
|
謝謝你！ 我仔細(xì)思考了一下，用子例行程序 SUBROTINE XX(A,I,J,K) 的話，假設(shè) XX 是程序名， A 是返回的矩陣，調(diào)用的時(shí)候，通過(guò)改變 I,J,K 的值，的確可以改變 A 的數(shù)組維度（需重新定義A）。但是，在調(diào)用的時(shí)候，首先要定義 A 的矩陣維度，當(dāng)改變I，J，K 的時(shí)候，相當(dāng)于又要重新定義一個(gè)矩陣A*，等價(jià)于在調(diào)用之前要定義N個(gè)不同維度的矩陣A1，A2，...，AN，即通過(guò)調(diào)用該 子例行程序 SUBROTINE XX(A,I,J,K) ，只是起到了一個(gè)定義多個(gè)矩陣維度不同的矩陣這樣一個(gè)功能，實(shí)際上數(shù)組名 A 已經(jīng)發(fā)生了變化。 我設(shè)想的是在數(shù)組名 A 不變的情況下，怎樣實(shí)現(xiàn)改變其數(shù)組維度。 感謝你的幫助！ |
6樓2010-09-07 22:10:01
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 nano_xinxin 的主題更新
| 6 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 生物學(xué)071000 329分求調(diào)劑 +3 | 我愛(ài)生物生物愛(ài)?/a> 2026-03-17 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 297求調(diào)劑 +4 | 戲精丹丹丹 2026-03-17 | 4/200 |
|
|
|
[考研] 293求調(diào)劑 +11 | zjl的號(hào) 2026-03-16 | 16/800 |
|
|
|
[考研] 085601專碩，總分342求調(diào)劑，地區(qū)不限 +4 | share_joy 2026-03-16 | 4/200 |
|
|
|
[考研] 268求調(diào)劑 +7 | 好運(yùn)連綿不絕 2026-03-12 | 8/400 |
|
|
|
[考研] 302求調(diào)劑 +9 | 負(fù)心者當(dāng)誅 2026-03-11 | 9/450 |
|
|
|
[考研] 332求調(diào)劑 +6 | Zz版 2026-03-13 | 6/300 |
|
|
|
[考研] 302求調(diào)劑 +4 | 小賈同學(xué)123 2026-03-15 | 8/400 |
|
|
|
[考研] 289求調(diào)劑 +6 | 步川酷紫123 2026-03-11 | 6/300 |
|
|
|
[考研] 0703化學(xué)調(diào)劑 +6 | 妮妮ninicgb 2026-03-15 | 9/450 |
|
|
|
[考研] 材料與化工一志愿南昌大學(xué)327求調(diào)劑推薦 +7 | Ncdx123456 2026-03-13 | 8/400 |
|
|
|
[考研]
 機(jī)械專碩調(diào)劑
+3
|
笨笨兔子 2026-03-12 | 3/150 |
|
|
|
[考研] 070305求調(diào)劑 +3 | mlpqaz03 2026-03-14 | 4/200 |
|
|
|
[基金申請(qǐng)] 現(xiàn)在如何回避去年的某一個(gè)專家，不知道名字 +3 | zk200107 2026-03-12 | 6/300 |
|
|
|
[考研] 復(fù)試調(diào)劑 +3 | 呼呼？~+123456 2026-03-14 | 3/150 |
|
|
|
[考研] 求材料調(diào)劑 085600英一數(shù)二總分302 前三科235 精通機(jī)器學(xué)習(xí) 一志愿哈工大 +4 | 林yaxin 2026-03-12 | 4/200 |
|
|
|
[考研] 0703化學(xué)一志愿211 總分320求調(diào)劑 +5 | 瑪卡巴卡啊哈 2026-03-11 | 5/250 |
|
|
|
[考研] 281求調(diào)劑 +9 | Koxui 2026-03-12 | 11/550 |
|
|
|
[考研] 333求調(diào)劑 +3 | 152697 2026-03-12 | 4/200 |
|
|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +3 | 崔wj 2026-03-12 | 4/200 |
|