269      &               clevel,  argument
278       integer, intent(in)         :: clevel  local
293       real(kind=8),dimension(amg_nshg(clevel)) :: vF
300       call ramg_calcAv_g(clevel,vF,ramg_rhs,colm,rowp,lhsK,lhsP,
315      &               clevel,  argument
323       integer, intent(in)         :: clevel  local
324       real(kind=8),intent(inout),dimension(amg_nshg(clevel))
337       real(kind=8),dimension(amg_nshg(clevel)) :: ggberr
346       call ramg_calcAv_g(clevel,ggberr,ramg_sol,colm,rowp,lhsK,lhsP,
353          do j=1,amg_nshg(clevel)
373          do j=1,amg_nshg(clevel)