Changeset 20 for palm/trunk/SOURCE/write_var_list.f90

Timestamp:

Feb 26, 2007 12:12:32 AM (17 years ago)

Author:

raasch

Message:

new parameter use_top_fluxes, Bugfix: ddzw dimensioned 1:nzt+1

File:

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

palm/trunk/SOURCE/write_var_list.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! +top_heatflux
+! +top_heatflux, use_top_fluxes
 !
 ! Former revisions:
@@ -338 +338 @@
     WRITE ( 14 )  'use_surface_fluxes            '
     WRITE ( 14 )  use_surface_fluxes
+    WRITE ( 14 )  'use_top_fluxes                '
+    WRITE ( 14 )  use_top_fluxes
     WRITE ( 14 )  'use_ug_for_galilei_tr         '
     WRITE ( 14 )  use_ug_for_galilei_tr