Lines Matching refs:ierr

58       integer :: igeom, ibndc, irstin, ierr  local
94       call mpi_barrier(mpi_comm_world, ierr)
95       call mpi_bcast(exinput,1,MPI_LOGICAL,0,mpi_comm_world,ierr)
101         call mpi_bcast(irstart,1,MPI_INTEGER,0,mpi_comm_world,ierr)
102         call mpi_bcast(iybar,1,MPI_INTEGER,0,mpi_comm_world,ierr)
103         call mpi_bcast(ierror,1,MPI_INTEGER,0,mpi_comm_world,ierr)
104         call mpi_bcast(numphavg,1,MPI_INTEGER,0,mpi_comm_world,ierr)
105         call mpi_bcast(ivort,1,MPI_INTEGER,0,mpi_comm_world,ierr)
106         call mpi_bcast(idwal,1,MPI_INTEGER,0,mpi_comm_world,ierr)
151       call mpi_barrier(mpi_comm_world, ierr)
279       call mpi_barrier(mpi_comm_world, ierr)
340          call mpi_barrier(mpi_comm_world, ierr)
557         call mpi_barrier(mpi_comm_world, ierr)
614       call mpi_barrier(mpi_comm_world, ierr)  ! make sure every rank is synced here
623           call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
629             call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
638             call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
648               call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
656             call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
663             call mpi_barrier(mpi_comm_world, ierr)  ! make sure everybody is done with ilwork
670       call mpi_barrier(mpi_comm_world, ierr)
679      &                                  MPI_MAX, mpi_comm_world, ierr ) 
681      &                                  MPI_MIN, mpi_comm_world, ierr ) 
694      &                                  MPI_MAX, mpi_comm_world, ierr ) 
696      &                                  MPI_MIN, mpi_comm_world, ierr ) 
710      &                      MPI_DOUBLE,MPI_MAX, mpi_comm_world, ierr ) 
712      &                      MPI_DOUBLE,MPI_MIN, mpi_comm_world, ierr ) 
727      &                     MPI_DOUBLE, MPI_MAX, mpi_comm_world, ierr ) 
729      &                     MPI_DOUBLE, MPI_MIN, mpi_comm_world, ierr ) 
745      &                      MPI_DOUBLE,MPI_MAX, mpi_comm_world, ierr ) 
747      &                      MPI_DOUBLE,MPI_MIN, mpi_comm_world, ierr ) 
760      &                                 MPI_MAX, mpi_comm_world, ierr ) 
762      &                                 MPI_MIN, mpi_comm_world, ierr ) 
775       call mpi_barrier(mpi_comm_world, ierr)