diff --git a/src/netcdf_io/interp_inc.fd/driver.F90 b/src/netcdf_io/interp_inc.fd/driver.F90 index 584069a6..722b5dde 100644 --- a/src/netcdf_io/interp_inc.fd/driver.F90 +++ b/src/netcdf_io/interp_inc.fd/driver.F90 @@ -250,9 +250,9 @@ program interp_inc if (mype == npes-1) print*,'- OPEN INPUT FILE: ', trim(infile) - ! Opening for parallel access breaks gfsanalcalc & gdasanalcalc on S4 + ! Opening for parallel access breaks global workflow on S4 ! Also there is no parallel access, so there is no need to open for parallel - ! access. By Innocent. + ! access. !error = nf90_open(trim(infile), ior(nf90_nowrite, nf90_mpiio), & ! comm=mpi_comm_world, info = mpi_info_null, ncid=ncid_in) error = nf90_open(trim(infile), ior(nf90_nowrite, nf90_mpiio), ncid=ncid_in)