Home
last modified time | relevance | path

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

/phasta/phSolver/AMG/
H A Dramg_smoother.f346 integer :: titer,cl local
356 titer = 0
370 do while ( (mres_n.gt.mres_o).and.(titer.lt.1000) )
381 titer = titer + 1
385 & colm,rowp,lhsK,lhsP,ilwork,BC,iBC,iper,titer)