分配内存

caimaxwell

!  integer*4, allocatable  :: iblocks(:)%iSubblocks(:)

!  allocate(iblocks(85)%iSubblocks(49))

想请教一下，第一行的声明为什么是不可行的？怎么声明才是正确的呢？

风平老涡

[Fortran] 纯文本查看 复制代码

type :: item
   integer * 4, allocatable :: subitem(:)
end type

type(item), allocatable :: iblocks(:)

allocate(iblocks(85))
do i = 1, 85
allocate(iblocks(i) % subitem(49))
end do

caimaxwell

十分感谢您的解答，已解决，谢谢！