Automatic object of parameterized derived type

[FortranFan]

@septc

By the way, if I attach the default value to the component el

    real :: el( dim ) = 0

the compilation fails like

internal compiler error: in gfc_conv_expr_descriptor,
at fortran/trans-array.c:7216

but first of all, I am not sure whether my code above is okay (valid) to have the
default value in PDT (?)…

For whatever it’s worth, I find the above component initialization to be non-conformant to the Fortran standard. The shown initialization violates a constraint and thus the compiler is required to issue a diagnostic. That gfortran does not do so is another bug in that compiler.

C762 (R737) If component-initialization appears, every type parameter and
array bound of the component shall be a colon or constant expression.

C:\Temp>type m.f90
module m
type :: t(n)
integer, len :: n
real :: x(n) = 0.0
end type
end module

C:\Temp>gfortran -c -Wall m.f90

C:\Temp>