Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_coarse.f593 real(kind=8),dimension(anshg) :: rowmax,prowmax local
614 rowmax(i) = 1E+10
618 if ((cfilter.eq.afmap(k)).and.(alhs(j).lt.rowmax(i))) then
619 rowmax(i) = alhs(j)
625 rowmax(i) = eps_str*rowmax(i)
639 if (alhs(j) .lt. rowmax(i)) then
642 if (alhs(j) .lt. rowmax(k)) then