Changeset 2776 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

Jan 31, 2018 10:44:42 AM (7 years ago)

Author:

Giersch

Message:

Skipping of module related restart data changed + adapting synthetic turbulence generator to current restart procedure

File:

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

palm/trunk/SOURCE/read_var_list.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Change skip_var_list: Skipping of module related parameter is only necessary 
+! if restart data was outputted at the end of the precursor run
+! 
+! 2718 2018-01-02 08:49:38Z maronga
 ! Corrected "Former revisions" section
 ! 
@@ -1094 +1098 @@
 
     USE control_parameters,                                                    &
-        ONLY: wind_turbine, virtual_flight, synthetic_turbulence_generator
+        ONLY: wind_turbine, wind_turbine_prerun, virtual_flight,               & 
+              virtual_flight_prerun, syn_turb_gen, syn_turb_gen_prerun
 
     USE wind_turbine_model_mod,                                                &
@@ -1128 +1133 @@
 !-- In case of virtual flights, skip also variables related to
 !-- this module.
-    IF ( wind_turbine )  CALL wtm_skip_var_list
+    IF ( wind_turbine_prerun )  CALL wtm_skip_var_list
 
 !
 !-- In case of virtual flights, skip also variables related to
 !-- this module.
-    IF ( virtual_flight )  CALL flight_skip_var_list
+    IF ( virtual_flight_prerun)  CALL flight_skip_var_list
 
 !
 !-- In case of virtual flights, skip also variables related to
 !-- this module.
-    IF ( synthetic_turbulence_generator )  CALL stg_skip_var_list
+    IF ( syn_turb_gen_prerun )  CALL stg_skip_var_list