Fix gcc compiler error (#42)

NOAA-EMC · May 15, 2024 · bb03e17 · bb03e17
1 parent 0cdc3b4
commit bb03e17
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/EnKF/gfs/src/getsigensmeanp_smooth.fd/getsigensmeanp_smooth_ncep.f90 b/src/EnKF/gfs/src/getsigensmeanp_smooth.fd/getsigensmeanp_smooth_ncep.f90
@@ -108,7 +108,7 @@ program getsigensmeanp_smooth
   endif
 
   if ( mype == 0 ) then
-     write(6,'(a,i,a)')  'Command line input for ',iargc(),' arguments'
+     write(6,'(a,i3,a)')  'Command line input for ',iargc(),' arguments'
      write(6,'(a,a)')' datapath    = ',trim(datapath)
      write(6,'(a,a)')' filenameout = ',trim(filenameout)
      write(6,'(a,a)')' fileprefix  = ',trim(fileprefix)