From 6ba12c1ddfb341e84843f634308c85d8fe6927c7 Mon Sep 17 00:00:00 2001 From: Innocent Souopgui Date: Wed, 29 Nov 2023 20:01:58 +0000 Subject: [PATCH] document the change in the code --- src/netcdf_io/interp_inc.fd/driver.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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)