Lines Matching refs:mnnz
14 integer :: i,j,k,p,q,mnnz local
17 mnnz = 1
20 c_colm(i) = mnnz
27 mnnz = mnnz + 1
32 c_colm(m+1) = mnnz
46 integer :: i,j,k,p,q,mnnz local
49 mnnz = 0
53 mnnz = mnnz + 1
54 c_rowp(mnnz) = i
63 mnnz = mnnz + 1
64 c_rowp(mnnz) = q
125 integer :: mnnz local
147 mnnz = ITA_colm(amg_nshg(level2)+1)-1
148 allocate(ITA_rowp(mnnz),stat=mem_err)
149 allocate(ITA(mnnz),stat=mem_err)
178 mnnz = ITA_colm(amg_nshg(level2)+1)-1
179 allocate(ITA_rowp(mnnz),stat=mem_err)
180 allocate(ITA(mnnz),stat=mem_err)
210 mnnz = amg_A_colm(level2)%p(amg_nshg(level2)+1)-1
211 call ramg_allocate(level2,0,mnnz,1)