Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A Dfillsparse.f245 integer rowvl, rowvh, rowv local
251 rowvh = n + 1
255 100 if ( rowvh-rowvl .gt. 1 ) then
256 rowv = ( rowvh + rowvl ) / 2
258 rowvh = rowv