Searched refs:gnshg (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 106 subroutine ramg_calcAv(gcolm,growp,glhs,gnshg,gnnz_tot, argument
109 integer,intent(in) :: gnshg,gnnz_tot local
110 integer,intent(in),dimension(gnshg+1) :: gcolm
113 real(kind=8),intent(in),dimension(gnshg) :: v
114 real(kind=8),intent(inout),dimension(gnshg) :: u
120 do i=1,gnshg
|