Hello,
I am having a problem with one compiler accepting a namelist input for
an array compoment of a derived type.
I have a derived type:
TYPE, PUBLIC :: OpenGL_Options
REAL(KIND=glfloat), DIMENSION(3) :: glw_lookat=0.0_glfloat, &
glw_lookfrom=(/0.0_glfloat, 0.0_glfloat, 1.0_glfloat/)
...
ENDTYPE
I have an object of this type inside a NAMELIST:
TYPE(OpenGL_Options) :: glw_options
NAMELIST /OpenGLOptions/ glw_options, ...
and inside the input file I have:
&OpenGLOptions
glw_options%glw_lookat=0 0 0,
glw_options%glw_lookfrom=0 0 4,
/
One compiler is telling me at runtime:
"Invalid character '0' in NAMELIST input"
Other compiler seem fine. Is there something wrong with my formatting
above?
Thanks,
Aleksandar
|