parameters - ALLOCATABLE 变量的直接初始化

Question

我可以直接初始化其中具有可分配变量的派生类型吗？

在下面的程序中，我想将派生类型变量“零”初始化为包含 0。这可能吗？

PROGRAM testProgram

TYPE IntegerType
INTEGER, ALLOCATABLE :: Num
END TYPE IntegerType

TYPE(IntegerType), PARAMETER :: Zero = IntegerType(ALLOCATE(0))


print*, Zero

END PROGRAM testProgram