Skip to content

Commit

Permalink
Merge branch 'develop' into rm_warning
Browse files Browse the repository at this point in the history
Fixes #959.
  • Loading branch information
GeorgeGayno-NOAA committed Jul 15, 2024
2 parents f063e06 + de2608b commit 769a54f
Show file tree
Hide file tree
Showing 6 changed files with 27 additions and 20 deletions.
2 changes: 1 addition & 1 deletion fix/link_fixdirs.sh
Original file line number Diff line number Diff line change
Expand Up @@ -55,7 +55,7 @@ elif [ $machine = "wcoss2" ]; then
elif [ $machine = "s4" ]; then
FIX_DIR="/data/prod/glopara/fix"
elif [ $machine = "gaea" ]; then
FIX_DIR="/gpfs/f5/epic/proj-shared/global/glopara/data/fix"
FIX_DIR="/gpfs/f5/ufs-ard/world-shared/global/glopara/data/fix"
fi

am_ver=${am_ver:-20220805}
Expand Down
19 changes: 5 additions & 14 deletions modulefiles/build.hera.gnu.lua
Original file line number Diff line number Diff line change
Expand Up @@ -5,12 +5,12 @@ Load environment to compile UFS_UTILS on Hera using Gnu
hpss_ver=os.getenv("hpss_ver") or ""
load(pathJoin("hpss", hpss_ver))

prepend_path("MODULEPATH", "/scratch1/NCEPDEV/nems/role.epic/spack-stack/spack-stack-1.6.0/envs/unified-env-rocky8/install/modulefiles/Core")
prepend_path("MODULEPATH", "/scratch1/NCEPDEV/nems/role.epic/spack-stack/spack-stack-1.6.0/envs/unified-env-rocky8-ompi416/install/modulefiles/Core")

stack_gcc_ver=os.getenv("stack_gcc_ver") or "9.2"
load(pathJoin("stack-gcc", gnu_ver))

stack_openmpi_ver=os.getenv("stack_openmpi_ver") or "4.1.5"
stack_openmpi_ver=os.getenv("stack_openmpi_ver") or "4.1.6"
load(pathJoin("stack-openmpi", stack_openmpi_ver))

cmake_ver=os.getenv("cmake_ver") or "3.23.1"
Expand Down Expand Up @@ -41,22 +41,13 @@ load(pathJoin("w3emc", w3emc_ver))
sigio_ver=os.getenv("sigio_ver") or "2.3.2"
load(pathJoin("sigio", sigio_ver))

hdf5_ver=os.getenv("hdf5_ver") or "1.14.0"
load(pathJoin("hdf5", hdf5_ver))

netcdf_c_ver=os.getenv("netcdf_c_ver") or "4.9.2"
load(pathJoin("netcdf-c", netcdf_c_ver))

netcdf_fortran_ver=os.getenv("netcdf_fortran_ver") or "4.6.1"
load(pathJoin("netcdf-fortran", netcdf_fortran_ver))

nccmp_ver=os.getenv("nccmp_ver") or "1.9.0.1"
nccmp_ver=os.getenv("nccmp_ver") or "1.9.1"
load(pathJoin("nccmp", nccmp_ver))

esmf_ver=os.getenv("esmf_ver") or "8.6.0"
esmf_ver=os.getenv("esmf_ver") or "8.5.0"
load(pathJoin("esmf", esmf_ver))

nco_ver=os.getenv("nco_ver") or "5.0.6"
nco_ver=os.getenv("nco_ver") or "5.1.6"
load(pathJoin("nco", nco_ver))

whatis("Description: UFS_UTILS build environment")
2 changes: 1 addition & 1 deletion reg_tests/cpld_gridgen/parm/grid.nml.IN
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
& grid_nml
&grid_nml
ni=NI_GLB
nj=NJ_GLB
dirsrc='FIXDIR'
Expand Down
2 changes: 1 addition & 1 deletion sorc/chgres_cube.fd/program_setup.F90
Original file line number Diff line number Diff line change
Expand Up @@ -296,7 +296,7 @@ subroutine read_setup_namelist(filename)
print*,'- INPUT DATA FROM SPECTRAL GFS GAUSSIAN NEMSIO FILE.'
case ("gfs_sigio")
print*,'- INPUT DATA FROM SPECTRAL GFS SIGIO/SFCIO FILE.'
#endif()
#endif
case ("gaussian_netcdf")
print*,'- INPUT DATA FROM FV3 GAUSSIAN NETCDF FILE.'
case ("grib2")
Expand Down
20 changes: 18 additions & 2 deletions sorc/global_cycle.fd/cycle.f90
Original file line number Diff line number Diff line change
Expand Up @@ -154,7 +154,15 @@ PROGRAM SFC_DRV
PRINT*,"READ NAMCYC NAMELIST."

CALL BAOPENR(36, "fort.36", IERR)
READ(36, NML=NAMCYC)
IF (IERR /= 0) THEN
PRINT*,'FATAL ERROR READING FORT.36 NAMELIST. IERR: ', IERR
CALL MPI_ABORT(MPI_COMM_WORLD, 32, IERR)
ENDIF
READ(36, NML=NAMCYC, IOSTAT=IERR)
IF (IERR /= 0) THEN
PRINT*,'FATAL ERROR READING FORT.36 NAMELIST. IERR: ', IERR
CALL MPI_ABORT(MPI_COMM_WORLD, 33, IERR)
ENDIF
!IF (MYRANK==0) WRITE(6,NAMCYC)

IF (MAX_TASKS < 99999 .AND. MYRANK > (MAX_TASKS - 1)) THEN
Expand Down Expand Up @@ -412,7 +420,15 @@ SUBROUTINE SFCDRV(LUGB, IDIM,JDIM,LENSFC,LSOIL,DELTSFC, &
INPUT_NML_FILE = "NULL"

CALL BAOPENR(37, "fort.37", IERR)
READ (37, NML=NAMSFCD)
IF (IERR /= 0) THEN
PRINT*,'FATAL ERROR OPENING FORT.37 NAMELIST. IERR: ', IERR
CALL MPI_ABORT(MPI_COMM_WORLD, 30, IERR)
ENDIF
READ (37, NML=NAMSFCD, IOSTAT=IERR)
IF (IERR /= 0) THEN
PRINT*,'FATAL ERROR READING FORT.37 NAMELIST. IERR: ', IERR
CALL MPI_ABORT(MPI_COMM_WORLD, 31, IERR)
ENDIF

PRINT*
PRINT*,'IN ROUTINE SFCDRV,IDIM=',IDIM,'JDIM=',JDIM,'FH=',FH
Expand Down
2 changes: 1 addition & 1 deletion ush/global_cycle.sh
Original file line number Diff line number Diff line change
Expand Up @@ -379,7 +379,7 @@ cat << EOF > fort.36
&NAMCYC
idim=$CRES, jdim=$CRES, lsoil=$LSOIL,
iy=$iy, im=$im, id=$id, ih=$ih, fh=$FHOUR,
deltsfc=$DELTSFC,ialb=$IALB,use_ufo=$use_ufo,donst=$DONST,
deltsfc=$DELTSFC,ialb=$IALB,use_ufo=$use_ufo,donst="$DONST",
do_sfccycle=$DO_SFCCYCLE,do_lndinc=$DO_LNDINC,isot=$ISOT,ivegsrc=$IVEGSRC,
zsea1_mm=$zsea1,zsea2_mm=$zsea2,MAX_TASKS=$MAX_TASKS_CY,
frac_grid=$FRAC_GRID
Expand Down

0 comments on commit 769a54f

Please sign in to comment.