Lines Matching defs:ramg_interface
285 subroutine ramg_interface( subroutine
293 integer,intent(in),dimension(nshg+1) :: colm
294 integer,intent(in),dimension(nnz_tot) :: rowp
295 real(kind=8),intent(in),dimension(9,nnz_tot) :: lhsK
296 real(kind=8),intent(in),dimension(4,nnz_tot) :: lhsP
297 real(kind=8),intent(in),dimension(nshg) :: mcgR
298 real(kind=8),intent(inout),dimension(nshg) :: mcgZ
299 integer, intent(in), dimension(nlwork) :: ilwork
300 integer, intent(in),dimension(nshg) :: iBC,iper
301 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
302 real(kind=8),dimension(nshg) :: myR
303 real(kind=8),intent(in),dimension(nshg,4) :: flowDiag
305 integer::i,j,k,amgmode
306 logical :: precflag