Skip to content

Commit

Permalink
document the change in the code
Browse files Browse the repository at this point in the history
  • Loading branch information
isouopgui-redline committed Nov 29, 2023
1 parent 225bf95 commit 6ba12c1
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/netcdf_io/interp_inc.fd/driver.F90
Original file line number Diff line number Diff line change
Expand Up @@ -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)
Expand Down

0 comments on commit 6ba12c1

Please sign in to comment.