Merge pull request #15171 from marcosvanella/master

FDS Source: Add FYI message for &GEOM line.

Author: marcosvanella

Source/geom.f90

@@ -22177,6 +22177,7 @@ SUBROUTINE READ_GEOM
                            DEVC_ID,CTRL_ID,SURF_IDS(3),SURF_ID6(6),MOVE_ID
 CHARACTER(FN_LENGTH) :: BUFFER,FN_BINGEOM,BINARY_FILE
 CHARACTER(LABEL_LENGTH),  ALLOCATABLE, DIMENSION(:) :: SURF_ID
+CHARACTER(MESSAGE_LENGTH) :: FYI
 REAL(EB), ALLOCATABLE, DIMENSION(:) :: ZVALS,TFACES
 REAL(EB), ALLOCATABLE, TARGET, DIMENSION(:) :: VERTS,VERTS_AUX
 INTEGER, ALLOCATABLE, DIMENSION(:) :: SURF_ID_IND,POLY
@@ -22235,7 +22236,7 @@ SUBROUTINE READ_GEOM
 
 NAMELIST /GEOM/ BNDF_GEOM,BINARY_FILE,CELL_BLOCK_IOR,CELL_BLOCK_ORIENTATION,COLOR,CYLINDER_ORIGIN,CYLINDER_AXIS,&
                 CYLINDER_RADIUS,CYLINDER_LENGTH,CYLINDER_NSEG_THETA,CYLINDER_NSEG_AXIS,&
-                EXTRUDE,EXTEND_TERRAIN,FACES,ID,IJK,IS_TERRAIN,MOVE_ID,N_LAT,N_LEVELS,N_LONG,POLY,&
+                EXTRUDE,EXTEND_TERRAIN,FACES,FYI,ID,IJK,IS_TERRAIN,MOVE_ID,N_LAT,N_LEVELS,N_LONG,POLY,&
                 RGB,SPHERE_ORIGIN,SPHERE_RADIUS,SPHERE_TYPE,SURF_ID,SURF_IDS,SURF_ID6,&
                 TEXTURE_MAPPING,TEXTURE_ORIGIN,TEXTURE_SCALE,TRANSPARENCY,&
                 VERTS,XB,ZMIN,ZVALS,ZVAL_HORIZON
@@ -24311,6 +24312,7 @@ SUBROUTINE SET_GEOM_DEFAULTS
    MOVE_ID = 'null'
    DEVC_ID = 'null'
    CTRL_ID = 'null'
+   FYI     = 'null'
    HAVE_SURF = .TRUE.
    HAVE_MATL = .TRUE.
    TEXTURE_ORIGIN = 0.0_EB