应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 动态数组分配
51/1返回列表
查看: 589  |  回复: 10
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

贺仪

铁杆木虫 (著名写手)

[求助] 动态数组分配

我有一个数组cc（：，：，：）我通过读取文件 知道其中的前两维如（8,6，：），第三维要在定义以后才知道。
程序结构是这样的：
读取文件知道cc大小是(8,6,，第三维未知
然后进入循环读取
do i=1,8
           do j=1,6
            读取文件,知道cc（i,j,:）的第三维,但是每次大小都不一样：如cc（1,1,:）有5623个,cc(2,1,有1234个，（这里面最大的也不知道）
            然后读取     给 cc(i,j,5623)赋值
           enddo
enddo

请问只里面怎么是用动态分配？可以这样吗？：
      ALLOCATE（CC(NBAND,NKPTS, ）先定下二维，然后在循环里面定义第三维吗？可以的话应该怎么弄？这样就会不会多次分配而出错？

或者有什么方法可以读取出来？
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
嘟啦啦嘟啦啦嘟
1楼 2011-11-10 15:35:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fubao-411

木虫 (小有名气)

【答案】应助回帖

★
xzhdty: 欢迎常来程序语言讨论 2011-11-11 10:46:29
余泽成(金币+1): 谢谢参与应助！欢迎常来程序语言版！ 2011-11-13 21:04:04
可以先定义一个足够大的数组，全部初始化为0，读取完数据后，再处理其中有用的数据，其他的数据可以丢掉，如只处理其中不为0的数据 ....
赞一下(2人) 回复此楼
轻松走一回！
9楼2011-11-11 09:57:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 11 个回答

koorb

铁虫 (初入文坛)

【答案】应助回帖

★
贺仪(金币+2): 多谢建议 2011-11-10 16:40:46
余泽成(金币+1): 谢谢参与应助！欢迎常来程序语言版！ 2011-11-10 21:47:42
数组的3个维数是只能到程序运行到最后才能知道第3维的最大值，比如是D3。这时候数组才最后确定为ALLOCATE（CC(NBAND,NKPTS,D3 ）。之前可以再定义一个临时变量暂时保存数据。

或者用链表，也就另外一种数据结构。
赞一下(1人) 回复此楼
天道
4楼2011-11-10 15:53:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

koorb

铁虫 (初入文坛)

【答案】应助回帖

贺仪(金币+2): 多谢建议 2011-11-10 16:40:54
如果我没理解错的话，你是要将48个长度未知且不等的数组保存起来。
先动态定义一个6×8的二维数组。这个二维数组的数据类型是“数组”，也就是之前说的48个数组。
赞一下 回复此楼
天道
5楼2011-11-10 16:01:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
引用回帖:
5楼: Originally posted by koorb at 2011-11-10 16:01:14:
如果我没理解错的话，你是要将48个长度未知且不等的数组保存起来。
先动态定义一个6×8的二维数组。这个二维数组的数据类型是“数组”，也就是之前说的48个数组。

是的 但这只是举个例子，真正的数组会达到30*50

但是变成48个二维数组也没什意义，还是不能在这之前定义保存起来。

前面说的用一个临时变量那也要48个变量呀……

另外链表怎么用？可否大概说一下我的这个问题怎么解决？
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
6楼2011-11-10 16:40:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 11 个回答
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭