Lines Matching defs:ramg_PPEAps
542 subroutine ramg_PPEAps(q,p,diag, subroutine
549 real(kind=8),intent(in),dimension(nshg) :: p local
550 real(kind=8),intent(inout),dimension(nshg) :: q local
551 real(kind=8),intent(in),dimension(nshg,4) :: diag
552 integer,intent(in),dimension(nshg+1) :: colm
553 integer,intent(in),dimension(nnz_tot) :: rowp
554 real(kind=8),intent(in),dimension(9,nnz_tot) :: lhsK
555 real(kind=8),intent(in),dimension(4,nnz_tot) :: lhsP
556 integer,intent(in),dimension(nlwork) :: ilwork
557 integer,intent(in),dimension(nshg) :: iBC,iper
558 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
560 real(kind=8),dimension(nshg,1) :: t1,t1a
561 real(kind=8),dimension(nshg,3) :: t2,t2a
562 real(kind=8),dimension(nshg,4) :: t2b