[Bug fortran/40196] [F03] [F08] Type parameter inquiry (str%len, a%kind) and Complex parts (z%re, z%im)

[jvdelisle at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=40196

--- Comment #6 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
This works:

type tp(dim)
  integer, KIND :: dim = 3
  real :: dist(dim)
end type tp
type(tp) :: t(5)

print *, t%dist(2)
print *, t

end