Changeset 1779 for palm/trunk/SOURCE/palm.f90

Timestamp:

Mar 3, 2016 8:01:28 AM (8 years ago)

Author:

raasch

Message:

pmc array management changed from linked list to sequential loop; further small changes and cosmetics for the pmc

File:

• palm/trunk/SOURCE/palm.f90 (modified) (2 diffs)

palm/trunk/SOURCE/palm.f90

@@ -19 +19 @@
 ! Current revisions:
 ! -----------------
-!
+! setting of nest_domain and coupling_char moved to the pmci
 !
 ! Former revisions:
@@ -198 +198 @@
 !-- be changed in init_pegrid).
     IF ( nested_run )  THEN
-!--    TO_DO: move the following two settings somewehere to the pmc_interface
-       IF ( cpl_id >= 2 )  THEN
-          nest_domain = .TRUE.
-          WRITE( coupling_char, '(A1,I1.1)') '_', cpl_id
-       ENDIF
 
        CALL MPI_COMM_SIZE( comm_palm, numprocs, ierr )