Changeset 3870 for palm/trunk/SOURCE/module_interface.f90

Timestamp:

Apr 8, 2019 1:44:34 PM (5 years ago)

Author:

knoop

Message:

Moving prognostic equations of bcm into bulk_cloud_model_mod

File:

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

palm/trunk/SOURCE/module_interface.f90

@@ -146 +146 @@
                bcm_init,                                                       &
                bcm_header,                                                     &
+               bcm_actions,                                                    &
+               bcm_prognostic_equations,                                       &
                bcm_swap_timelevel,                                             &
                bcm_3d_data_averaging,                                          &
@@ -876 +878 @@
 
 
+    IF ( bulk_cloud_model    )  CALL bcm_actions( location )
     IF ( gust_module_enabled )  CALL gust_actions( location )
     IF ( user_module_enabled )  CALL user_actions( location )
@@ -896 +899 @@
 
 
+    IF ( bulk_cloud_model    )  CALL bcm_actions( i, j, location )
     IF ( gust_module_enabled )  CALL gust_actions( i, j, location )
     IF ( user_module_enabled )  CALL user_actions( i, j, location )
@@ -911 +915 @@
 
 
+    IF ( bulk_cloud_model    )  CALL bcm_prognostic_equations()
     IF ( gust_module_enabled )  CALL gust_prognostic_equations()
     IF ( ocean_mode          )  CALL ocean_prognostic_equations()
@@ -933 +938 @@
 
 
+    IF ( bulk_cloud_model    )  CALL bcm_prognostic_equations( i, j, i_omp_start, tn )
     IF ( gust_module_enabled )  CALL gust_prognostic_equations( i, j, i_omp_start, tn )
     IF ( ocean_mode          )  CALL ocean_prognostic_equations( i, j, i_omp_start, tn )