11      &               ilwork,BC,iBC,iper)  argument
28       integer,intent(in),dimension(nshg)              :: iBC,iper  local
488      &                      ilwork,BC,iBC,iper)  argument
500       integer,intent(in),dimension(nshg)              :: iBC,iper  local
515       call commOut(t1,ilwork,1,iper,iBC,BC)
517       call commIn(t2,ilwork,3,iper,iBC,BC)
526       call commOut(t2b,ilwork,4,iper,iBC,BC)
528       call commIn(t1,ilwork,1,iper,iBC,BC)
544      &                      ilwork,BC,iBC,iper)  argument
557       integer,intent(in),dimension(nshg)              :: iBC,iper  local
569       call commOut(t1,ilwork,1,iper,iBC,BC)
571       call commIn(t2,ilwork,3,iper,iBC,BC)
580       call commOut(t2b,ilwork,4,iper,iBC,BC)
582       call commIn(t1,ilwork,1,iper,iBC,BC)
595      &                      ilwork,BC,iBC,iper)  argument
608       integer,intent(in),dimension(nshg)              :: iBC,iper  local
620       call commIn(t1,ilwork,1,iper,iBC,BC)
621       call commOut(t1,ilwork,1,iper,iBC,BC)
622       call commIn(t2,ilwork,3,iper,iBC,BC)
623       call commOut(t2,ilwork,3,iper,iBC,BC)
627       call commOut(t2,ilwork,3,iper,iBC,BC)
629       call commIn(rhsp,ilwork,1,iper,iBC,BC)
630       call commOut(rhsp,ilwork,1,iper,iBC,BC)
631       call ramg_zeroOut(rhsp,ilwork,BC,iBC,iper)
646       subroutine ramg_init_ilwork(ilwork,BC,iBC,iper)  argument
652       integer, intent(in),dimension(nshg)              :: iBC,iper  local
744       subroutine ramg_initBCflag(flag,ilwork,BC,iBC,iper)
753       integer, intent(in),dimension(nshg)              :: iBC,iper  variable
869       subroutine commOut_i(global,ilwork,n,iper,iBC,BC)  argument
873       integer ilwork(nlwork),iper(nshg),iBC(nshg)  local
882       call commOut(aglobal,ilwork,n,iper,iBC,BC)
893       subroutine ramg_commOut(global,level,ilwork,redun,iper,iBC,BC)  argument
904       integer,intent(in),dimension(nshg)            :: iBC,iper  local
917          call commOut(global,ilwork,1,iper,iBC,BC)
989       subroutine ramg_commIn(global,level,ilwork,redun,iper,iBC,BC)  argument
1000       integer,intent(in),dimension(nshg)            :: iBC,iper  local
1013          call commIn(global,ilwork,1,iper,iBC,BC)