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

Timestamp:

Sep 13, 2012 2:08:46 PM (12 years ago)

Author:

raasch

Message:

leapfrog timestep scheme and upstream-spline advection scheme completely removed from the code,
reading of dt_fixed from restart file removed

File:

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

palm/trunk/SOURCE/write_var_list.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-!
+! -cut_spline_overshoot, last_dt_change, long_filter_factor, overshoot_limit_*,
+! ups_limit_*
 !
 ! Former revisions:
@@ -235 +236 @@
     WRITE ( 14 )  'cthf                          '
     WRITE ( 14 )  cthf
-    WRITE ( 14 )  'cut_spline_overshoot          '
-    WRITE ( 14 )  cut_spline_overshoot
     WRITE ( 14 )  'cycle_mg                      '
     WRITE ( 14 )  cycle_mg
@@ -315 +314 @@
     WRITE ( 14 )  'lad_vertical_gradient_level_in'
     WRITE ( 14 )  lad_vertical_gradient_level_ind
-    WRITE ( 14 )  'last_dt_change                '
-    WRITE ( 14 )  last_dt_change
     WRITE ( 14 )  'large_scale_subsidence        '
     WRITE ( 14 )  large_scale_subsidence
     WRITE ( 14 )  'leaf_surface_concentration    '
     WRITE ( 14 )  leaf_surface_concentration
-    WRITE ( 14 )  'long_filter_factor            '
-    WRITE ( 14 )  long_filter_factor
     WRITE ( 14 )  'loop_optimization             '
     WRITE ( 14 )  loop_optimization
@@ -363 +358 @@
     WRITE ( 14 )  'output_for_t0                 '
     WRITE ( 14 )  output_for_t0
-    WRITE ( 14 )  'overshoot_limit_e             '
-    WRITE ( 14 )  overshoot_limit_e
-    WRITE ( 14 )  'overshoot_limit_pt            '
-    WRITE ( 14 )  overshoot_limit_pt
-    WRITE ( 14 )  'overshoot_limit_u             '
-    WRITE ( 14 )  overshoot_limit_u
-    WRITE ( 14 )  'overshoot_limit_v             '
-    WRITE ( 14 )  overshoot_limit_v
-    WRITE ( 14 )  'overshoot_limit_w             '
-    WRITE ( 14 )  overshoot_limit_w
     WRITE ( 14 )  'passive_scalar                '
     WRITE ( 14 )  passive_scalar
@@ -549 +534 @@
     WRITE ( 14 )  'ug_vertical_gradient_level_ind'
     WRITE ( 14 )  ug_vertical_gradient_level_ind
-    WRITE ( 14 )  'ups_limit_e                   '
-    WRITE ( 14 )  ups_limit_e
-    WRITE ( 14 )  'ups_limit_pt                  '
-    WRITE ( 14 )  ups_limit_pt
-    WRITE ( 14 )  'ups_limit_u                   '
-    WRITE ( 14 )  ups_limit_u
-    WRITE ( 14 )  'ups_limit_v                   '
-    WRITE ( 14 )  ups_limit_v
-    WRITE ( 14 )  'ups_limit_w                   '
-    WRITE ( 14 )  ups_limit_w
     WRITE ( 14 )  'use_surface_fluxes            '
     WRITE ( 14 )  use_surface_fluxes