Changeset 3885 for palm/trunk/SOURCE/pmc_handle_communicator_mod.f90

Timestamp:

Apr 11, 2019 11:29:34 AM (5 years ago)

Author:

kanani

Message:

restructure/add location/debug messages

File:

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

palm/trunk/SOURCE/pmc_handle_communicator_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Changes related to global restructuring of location messages and introduction 
+! of additional debug messages
+! 
+! 3819 2019-03-27 11:01:36Z hellstea
 ! Adjustable anterpolation buffer introduced on all nest boundaries, it is controlled
 ! by the new nesting_parameters parameter anterpolation_buffer_width.
@@ -524 +528 @@
 !
 !-- Output location message
-    CALL location_message( 'initialize communicators for nesting', .FALSE. )
+    CALL location_message( 'initialize communicators for nesting', 'start' )
 !
 !-- Assign the layout to the corresponding internally used variable m_couplers
@@ -563 +567 @@
     ENDIF
 
+    CALL location_message( 'initialize communicators for nesting', 'finished' )
+
  END SUBROUTINE read_coupling_layout