fortran90 - Fortran 90/95 : How to convert a 3D array into a 1D array

Question

我有一个 3D 数组 NUM(0:9,0:9,0:9)，它用作各种计数器来跟踪特定坐标之间有多少分子。不管怎样，数组最终是一个数字列表，我想从中制作直方图。如果我将 NUM 写入一个文件，然后用我的直方图程序打开它并将它作为一维数组读入，一切都很好，但我想在一个程序中完成所有这些，我想知道是否有一个获取存储在 NUM 中的所有数字并将其放入一维数组的方法？

如果我不是很清楚，我深表歉意，我是编程新手，而且我还在不断学习!

Answer 1

声明

new_array = pack(old_array,.true.)

会将 rank-3 old_array 展平为 rank-1 new_array。您可以将其声明为

real(kind=...), dimension(:), allocatable :: new_array

用您选择的方法替换 ... 以指定要使用的实数类型。