Home
last modified time | relevance | path

Searched refs:amg_A_rowp (Results 1 – 7 of 7) sorted by relevance

/phasta/phSolver/AMG/
H A Dramg_extract.f204 amg_A_rowp(1)%p(mnnz) = i
227 amg_A_rowp(1)%p(mnnz) = k
234 ki = amg_A_rowp(1)%p(m)
236 kj = amg_A_rowp(1)%p(n)
238 amg_A_rowp(1)%p(m) = kj
239 amg_A_rowp(1)%p(n) = ki
264 j = amg_A_rowp(1)%p(m)
325 do while(amg_A_rowp(1)%p(ki).lt.j)
330 ckk = amg_paramap(1)%p(amg_A_rowp(1)%p(ki))
348 call ramg_global_lhs(amg_A_colm(1)%p,amg_A_rowp(1)%p,
[all …]
H A Dramg_ITAI.f175 & amg_A_colm(level1)%p,amg_A_rowp(level1)%p,
184 & amg_A_colm(level1)%p,amg_A_rowp(level1)%p,
192 & amg_A_colm(level1)%p,amg_A_rowp(level1)%p,
216 & amg_A_rowp(level2)%p,
225 & amg_A_rowp(level2)%p,amg_A_lhs(level2)%p,
248 j = amg_A_rowp(level2)%p(m)
H A Dramg_control.f51 & amg_A_rowp(ramg_levelx)%p,
120 deallocate(amg_A_rowp(1)%p)
195 k = amg_A_rowp(level1)%p(i)
H A Dramg_tools.f173 j = amg_A_rowp(level)%p(k)
231 j = amg_A_rowp(level)%p(k)
569 allocate(amg_A_rowp(level)%p(amg_nnz(level)),
592 amg_A_rowp(level)%p(:) = 0
637 if (associated(amg_A_rowp(level)%p)) then
638 deallocate(amg_A_rowp(level)%p,
H A Dramg_data.f56 type(i1d),dimension(MAXAMGLVL) :: amg_A_rowp variable
H A Dramg_coarse.f105 & amg_A_colm(level1)%p,amg_A_rowp(level1)%p,
236 j = amg_A_rowp(level1)%p(k)
253 j = amg_A_rowp(level1)%p(k)
260 jj = amg_A_rowp(level1)%p(kj)
H A Dramg_smoother.f433 call ramg_gauss(amg_A_colm(level)%p,amg_A_rowp(level)%p,
444 & amg_A_rowp(level)%p,amg_A_lhs(level)%p,