Lines Matching defs:ramg_commIn
989 subroutine ramg_commIn(global,level,ilwork,redun,iper,iBC,BC) subroutine
995 integer,intent(in) :: level
996 integer,intent(in) :: redun
998 & :: global
999 integer,intent(in),dimension(nlwork) :: ilwork
1000 integer,intent(in),dimension(nshg) :: iBC,iper
1001 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
1003 integer :: numtask,iacc,itag(ilwork(1)),i,j,m,k
1004 integer :: iother(ilwork(1)),ierr,iotheri
1005 integer :: numseg(ilwork(1))
1006 integer :: mstat(MPI_STATUS_SIZE,ilwork(1))
1007 integer :: req(ilwork(1))
1008 type(r2d),dimension(ilwork(1)) :: tmparray