我想将一个数组分配B为相同的形状,并具有与另一个数组相同的下限和上限A.例如,我可以使用
allocate(B(lbound(A,1):ubound(A,1), lbound(A,2):ubound(A,2), lbound(A,3):ubound(A,3)))
但这不仅不优雅,而且对于(甚至)更高维度的阵列也变得非常烦人.
我希望有更多的东西
allocate(B(shape(A)))
哪个不起作用,即使这确实有效,每个维度也会从1开始,这不是我想要的.
有谁知道如何轻松地为任意数组维度轻松分配数组以具有与另一个数组相同的大小和边界？