Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_smoother.f344 real(kind=8) :: mres_i,mres_n,mres_o local
355 mres_o = 1e-7*mres_i
370 do while ( (mres_n.gt.mres_o).and.(titer.lt.1000) )