Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A Delem-search.f29 integer testing(4), found(nelint), negativ(nelint) local
72 negativ(:) = 0
118 negativ(counting) = i
126 negativ(counting) = 4
145 if (negativ(find) .eq. 4) then
150 xsic(negativ(find)) = 0.0