Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_coarse.f33 integer,dimension(amg_nshg(level1)) :: amg_Fn,amg_Fp local
240 amg_Fp(n) = 1
242 amg_Fp(n) = 0
266 amg_Fp(m) = 0
272 amg_Fp(m) = 1
274 amg_Fp(m) = 0
298 if (amg_Fp(k).eq.1) then