Changeset 4599 for palm/trunk/SOURCE/data_output_netcdf4_module.f90

Timestamp:

Jul 10, 2020 12:42:02 PM (4 years ago)

Author:

gronemeier

Message:

bugfix: set no-fill mode per variable (data_output_netcdf4_module.f90)

File:

• palm/trunk/SOURCE/data_output_netcdf4_module.f90 (modified) (2 diffs)

palm/trunk/SOURCE/data_output_netcdf4_module.f90

@@ -24 +24 @@
 ! -----------------
 ! $Id$
+! bugfix: set no-fill mode per variable
+!
+! 4597 2020-07-09 19:21:53Z gronemeier
 ! bugfix: - allow writing of unlimited dimensions in parallel mode
 !         - prevent unused-variable warning if preprocessor directives are not given
@@ -483 +486 @@
           nc_stat = NF90_DEF_VAR( file_id, variable_name, nc_variable_type,                        &
                                   dimension_ids, variable_id )
+!
+!--       Set no-fill mode
+          IF ( nc_stat == NF90_NOERR )  &
+             nc_stat = NF90_DEF_VAR_FILL( file_id, variable_id, NF90_NOFILL, NF90_FILL_BYTE )
 
 #if defined( __netcdf4_parallel )