Sio*_*han 0 multidimensional-array fortran90
我有一个3D数组NUM(0:9,0:9,0:9),用作各种计数器,以跟踪特定坐标之间有多少个分子。无论如何,数组最终是我要制作直方图的数字列表。如果我将NUM写入文件,然后使用直方图程序将其打开并以一维数组的形式读取,那么一切都很好,但是我想在一个程序中完成所有操作,并且我想知道是否有一个取存储在NUM中的所有数字并将其制成一维数组的方法?
如果我不太清楚,我深表歉意,因为我是编程新手,但我仍在学习!
该声明
new_array = pack(old_array,.true.)
Run Code Online (Sandbox Code Playgroud)
会将3级old_array变成1级new_array。您可以将其声明为
real(kind=...), dimension(:), allocatable :: new_array
Run Code Online (Sandbox Code Playgroud)
用...您选择的方法替换,以指定要使用的实数类型。