Lines Matching defs:ramg_mls_calcPAv

496       subroutine ramg_mls_calcPAv(level,u,v,colm,rowp,lhsK,lhsP,  subroutine
503       integer,intent(in),dimension(nlwork)  :: ilwork
504       integer,intent(in),dimension(nshg)    :: iBC,iper
505       integer,intent(in),dimension(nshg+1)       :: colm
506       integer,intent(in),dimension(nnz_tot)      :: rowp
508       real(kind=8),intent(in),dimension(9,nnz_tot)    :: lhsK
509       real(kind=8),intent(in),dimension(4,nnz_tot)    :: lhsP
511       real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
512       real(kind=8),intent(inout),dimension(amg_nshg(level)) :: v  local
513       real(kind=8),intent(inout),dimension(amg_nshg(level)) :: u  local
515       real(kind=8),dimension(amg_nshg(level)) :: aux,aux2,r0