Changeset 1596 for palm/trunk/SOURCE/netcdf.f90

Timestamp:

May 21, 2015 9:34:28 AM (10 years ago)

Author:

gronemeier

Message:

Bugfix in extension of masked data

File:

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

palm/trunk/SOURCE/netcdf.f90

@@ -23 +23 @@
 ! Current revisions:
 ! ------------------
-! 
+! Bugfix in masked data output. Read 'zu_3d' when trying to extend masked data
 ! 
 ! Former revisions:
@@ -804 +804 @@
 !
 !--       Get and compare the number of vertical gridpoints
-          nc_stat = NF90_INQ_VARID( id_set_mask(mid,av), 'zu', &
+          nc_stat = NF90_INQ_VARID( id_set_mask(mid,av), 'zu_3d', &
                                     id_var_zu_mask(mid,av) )
           CALL handle_netcdf_error( 'netcdf', 508 )