Lines Matching defs:ramg_checkcoarse
135 subroutine ramg_checkcoarse(level1,ilwork,BC,iBC,iper, subroutine
142 integer,intent(in) :: level1
143 integer,intent(in),dimension(nlwork) :: ilwork
144 integer,intent(in),dimension(nshg) :: iBC,iper
145 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
147 logical,intent(inout) :: cfstop
148 integer :: i,numtask,itkbeg,numseg,iacc
149 integer :: j,k,p
151 & :: subcfstop,subnnz,subcf,subcfrev,subnei
152 real(kind=8) :: rhoratio
153 logical :: subneireduce