diff --git a/src/framework/MOM_io_file.F90 b/src/framework/MOM_io_file.F90 index 6b69752134..6eaa10f622 100644 --- a/src/framework/MOM_io_file.F90 +++ b/src/framework/MOM_io_file.F90 @@ -1696,9 +1696,9 @@ subroutine read_field_chksum_nc(handle, field, chksum, valid_chksum) !< File where field is stored type(MOM_field), intent(in) :: field !< The field whose checksum attribute is to be read - integer(kind=int64), intent(inout) :: chksum + integer(kind=int64), intent(out) :: chksum !< The checksum for the field. - logical, intent(inout) :: valid_chksum + logical, intent(out) :: valid_chksum !< If true, chksum has been successfully read call MOM_error(FATAL, 'read_field_chksum over netCDF is not yet implemented.')