Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_coarse.f30 integer,dimension(amg_nnz(level1)) :: amg_S,amg_Ip local
177 amg_Ip = 0
183 amg_Ip(i) = I_nnz
222 amg_I_rowp%pp(i)%p(1) = amg_Ip(i)
357 amg_I_rowp%pp(i)%p(k) = amg_Ip(amg_Fn(k))