We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 3ebff8e commit 2a3b4b2Copy full SHA for 2a3b4b2
src/tests/unit/teams/get-communicator.f90
@@ -84,7 +84,6 @@ pure function destination_team(image,numTeams) result(team)
84
85
subroutine mpi_matches_caf(comm)
86
use iso_c_binding, only : c_int
87
- use mpi, only : MPI_COMM_SIZE, MPI_COMM_RANK
88
integer(c_int), intent(in) :: comm
89
!! MPI communicator
90
integer(c_int) :: isize,ierror,irank
0 commit comments