我想知道 Fortran 中是否有类似构造函数的派生类型机制，这样，无论何时创建类型的实例，都会自动调用构造函数。我读这个问题，但对我来说并不满意。
完整性的示意图示例：
module mod
integer :: n=5
type array
real, dimension(:), allocatable :: val
contains
procedure :: array()
end type
subroutine array(this)
allocate(this%val(n))
end subroutine
end module
现在，当我创建一个实例时，type(array) :: instance我想要构造函数array(instance)自动调用，而无需call array(instance)在手动添加的代码中添加任何额外内容。
我在这个站点上找到了一些有希望的信息，但在其他地方找不到：它指定了一个类似构造函数的机制，并声明了类型绑定过程initial,pass :: classname_ctor0。这是什么标准？ifort在版本 16 中不会编译发布在那里的示例，而且我没有可用的标准。