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

Timestamp:

Nov 14, 2018 4:06:14 PM (5 years ago)

Author:

kanani

Message:

Changes related to clean-up of biometeorology (by dom_dwd_user)

File:

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

palm/trunk/SOURCE/time_integration.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Changes related to clean-up of biometeorology (dom_dwd_user)
+! 
+! 3524 2018-11-14 13:36:44Z raasch
 ! unused variables removed
 ! 
@@ -412 +415 @@
 
     USE biometeorology_mod,                                                    &
-        ONLY:  biom_calculate_static_grid, time_biom_results
+        ONLY:  bio_calculate_thermal_index_maps, time_bio_results
 
     USE bulk_cloud_model_mod,                                                  &
@@ -1363 +1366 @@
 !--    Biometeorology calculation of stationary thermal indices
        IF ( biometeorology  .AND.  time_do3d >= dt_do3d )  THEN
-          CALL biom_calculate_static_grid ( .FALSE. )
-          time_biom_results = time_since_reference_point
+          CALL bio_calculate_thermal_index_maps ( .FALSE. )
+          time_bio_results = time_since_reference_point
        ENDIF