Changeset 206 for palm/trunk/SOURCE/timestep.f90
- Timestamp:
- Oct 13, 2008 2:59:11 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/timestep.f90
r110 r206 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 6 ! Implementation of a MPI-1 Coupling: replaced myid with target_id 7 7 ! 8 8 ! Former revisions: … … 219 219 terminate_coupled = 2 220 220 CALL MPI_SENDRECV( & 221 terminate_coupled, 1, MPI_INTEGER, myid, 0, &222 terminate_coupled_remote, 1, MPI_INTEGER, myid, 0, &221 terminate_coupled, 1, MPI_INTEGER, target_id, 0, & 222 terminate_coupled_remote, 1, MPI_INTEGER, target_id, 0, & 223 223 comm_inter, status, ierr ) 224 224 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.