Changeset 2050 for palm/trunk/SOURCE/time_integration.f90

Timestamp:

Nov 8, 2016 3:00:55 PM (8 years ago)

Author:

gronemeier

Message:

Implement turbulent outflow condition

File:

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

palm/trunk/SOURCE/time_integration.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! 
+! Implement turbulent outflow condition
 ! 
 ! Former revisions:
@@ -282 +282 @@
                time_dots, time_do_av, time_do_sla, time_disturb, time_dvrp,    &
                time_run_control, time_since_reference_point,                   &
-               turbulent_inflow, urban_surface,                                &
+               turbulent_inflow, turbulent_outflow, urban_surface,             &
                use_initial_profile_as_reference,                               &
                use_single_reference_value, u_gtrans, v_gtrans, virtual_flight, &
@@ -803 +803 @@
 !--       Impose a turbulent inflow using the recycling method
           IF ( turbulent_inflow )  CALL  inflow_turbulence
+
+!
+!--       Set values at outflow boundary using the special outflow condition
+          IF ( turbulent_outflow )  CALL  outflow_turbulence
 
 !