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

Timestamp:

Apr 19, 2016 12:30:36 PM (8 years ago)

Author:

hellstea

Message:

New simpler synchronization for nested runs

File:

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

palm/trunk/SOURCE/time_integration.f90

@@ -19 +19 @@
 ! Current revisions:
 ! ------------------
-! 
+! Synchronization for nested runs rewritten
 ! 
 ! Former revisions:
@@ -282 +282 @@
     USE pmc_interface,                                                         &
         ONLY:  client_to_server, nested_run, nesting_mode,                     &
-               pmci_client_synchronize, pmci_datatrans,                        &
-               pmci_ensure_nest_mass_conservation,                             &
-               pmci_server_synchronize, server_to_client
+               pmci_datatrans, pmci_ensure_nest_mass_conservation,             &
+               pmci_synchronize, server_to_client
 
     USE production_e_mod,                                                      &
@@ -325 +324 @@
 !
 !-- Synchronize the timestep in case of nested run.
-!-- The server side must be called first
     IF ( nested_run )  THEN
-       CALL pmci_server_synchronize
-       CALL pmci_client_synchronize
+!
+!--    Synchronization by unifying the time step.
+!--    Global minimum of all time-steps is used for all.
+       CALL pmci_synchronize
     ENDIF
 
@@ -368 +368 @@
        IF ( simulated_time /= 0.0_wp )  THEN
           CALL timestep
-
+!
+!--       Synchronize the timestep in case of nested run.
           IF ( nested_run )  THEN
 !
-!--          TO_DO: try to give more detailed and meaningful comments here
-!--          Server side must be called first
-             CALL pmci_server_synchronize
-             CALL pmci_client_synchronize
-          ENDIF
-       ENDIF
-
+!--          Synchronize by unifying the time step.
+!--          Global minimum of all time-steps is used for all.      
+             CALL pmci_synchronize
+          ENDIF
+       ENDIF
 
 !