分配N个动态数组
大家好，我想向大家请教一个问题。
我想构建N个动态数组，但N的数值以及每个动态数组的大小，事先并不知道，而是从文件里读到的。
请问大家，有什么办法构建起N个这样的动态数组（尤其是，给每个动态数组设定一个变量名）呢？
麻烦大家给些建议吧。
谢谢啦。
祝好！
Kieran
type :: T_dArray
real , allocatable :: d(:)
end type T_dArray
Type( T_dArray ) , allocatable :: da(:)
Allocate( da(N))
Do i = 1 , N
Allocate( da(i)%d(m(i)) )
End Do fcode 发表于 2022-3-14 08:14
type :: T_dArray
real , allocatable :: d(:)
end type T_dArray
非常感谢你的建议，这个代码结构对我很有帮助。
谢谢啦！:-)
页:
[1]