Arrays FORTRAN-90中的数组存储

我正在使用FORTRAN-90。 我有一个问题

我想在三维数组（A（900900），B（900900））中存储数据（即X和Y值）在开始时，我仅使用每个数组的30X30X30元素来存储30X30X30 X和Y的初始值，然后在下一个时间步骤中，我进行了一些科学计算来更改X和Y的值，然后再次希望将30X30X30 X和Y的修改值存储在同一个数组中（31X31X31）两个阵列的第个位置，并再次执行下一时间步骤的相同步骤。这样，我想用我的数据填充数组，最后打印这些数组

你能帮我写下这个算法吗？我的FORTRAN代码是

请帮帮我

请引导我

致以最良好的问候

阿米塔沃好吧，这个怎么样：

real*8 :: A(900,900,900),X(30,30,30)
integer :: offset

offset=0

!   define X however ...

A(1:30,1:30,1:30)=X

do while (offset<900)
! do stuff to X
! do more stuff to X
  offset=offset+30
  A(1+offset:30+offset,1+offset:30+offset,1+offset:30+offset)=X
enddo

real*8:：A（900900），X（30,30,30）
整数：：偏移量
偏移量=0
!   定义X但是。。。
A（1:30,1:30,1:30）=X
do while（偏移11GB以获得双精度。这是您真正想要的吗？除了大小问题外，您是否可以发布一个示例，从3x3x3阵列开始，到4x4x4x4阵列，这样我们就可以了解您到底想要实现什么。如果您永远不会使用交叉项
a（1,31,31）
则不需要所有
900x900x900
元素。只使用
30
子矩阵
30x30x30
，所需空间大大减少。
A
是
x
值还是
B
是
y
值？