Changeset 1560 for palm/trunk/SOURCE/parin.f90

Timestamp:

Mar 6, 2015 10:48:54 AM (9 years ago)

Author:

keck

Message:

implemented possibility of adding a y shift to the recycled inflow turbulence

File:

• palm/trunk/SOURCE/parin.f90 (modified) (3 diffs)

palm/trunk/SOURCE/parin.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! +recycling_yshift
 ! 
 ! Former revisions:
@@ -214 +214 @@
                q_vertical_gradient_level, random_generator,                    &
                random_heatflux, rayleigh_damping_factor,                       &
-               rayleigh_damping_height, recycling_width, reference_state,      &
-               residual_limit, restart_time, return_addres, return_username,   &
+               rayleigh_damping_height, recycling_width, recycling_yshift,     &
+               reference_state, residual_limit,                                &
+               restart_time, return_addres, return_username,                   &
                revision, rif_max, rif_min, roughness_length, runnr,            &
                run_identifier, sa_surface, sa_vertical_gradient,               &
@@ -307 +308 @@
              q_vertical_gradient, q_vertical_gradient_level,                   &
              random_generator, random_heatflux,                                &
-             rayleigh_damping_factor, rayleigh_damping_height, recycling_width,&
+             rayleigh_damping_factor, rayleigh_damping_height,                 &
+             recycling_width, recycling_yshift,                                &
              reference_state, residual_limit,                                  &
              rif_max, rif_min, roughness_length, sa_surface,                   &