Changeset 524 for palm/trunk/SOURCE/check_parameters.f90

Timestamp:

Mar 30, 2010 2:04:51 AM (14 years ago)

Author:

raasch

Message:

Bugfix: / in netcdf profile variable names replaced by :

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! Bugfix: "/" in netcdf profile variable names replaced by ":"
 !
 ! Former revisions:
@@ -2073 +2073 @@
              ENDIF
 
-          CASE ( 'w*u*u*/dz' )
+          CASE ( 'w*u*u*:dz' )
              dopr_index(i) = 55
              dopr_unit(i)  = 'm2/s3'
              hom(:,2,55,:) = SPREAD( zu, 2, statistic_regions+1 )
 
-          CASE ( 'w*p*/dz' )
+          CASE ( 'w*p*:dz' )
              dopr_index(i) = 56
              dopr_unit(i)  = 'm2/s3'
              hom(:,2,56,:) = SPREAD( zw, 2, statistic_regions+1 )
 
-          CASE ( 'w"e/dz' )
+          CASE ( 'w"e:dz' )
              dopr_index(i) = 57
              dopr_unit(i)  = 'm2/s3'