Changeset 3685 for palm/trunk/SOURCE/indoor_model_mod.f90

Timestamp:

Jan 21, 2019 1:02:11 AM (5 years ago)

Author:

knoop

Message:

Some interface calls moved to module_interface + cleanup

File:

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

palm/trunk/SOURCE/indoor_model_mod.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! Some interface calls moved to module_interface + cleanup
+! 
+! 3597 2018-12-04 08:40:18Z maronga
 ! Renamed t_surf_10cm to pt_10cm
 ! 
@@ -388 +391 @@
                                                            !< on local subdomain
 
+    CALL location_message( 'initializing indoor model', .FALSE. )
+
 !
 !-- Initializing of indoor model is only possible if buildings can be 
@@ -814 +819 @@
     theta_m_t_prev = initial_indoor_temperature
 
+    CALL location_message( 'finished', .TRUE. )
 
  END SUBROUTINE im_init