Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A Delm3keps.f146 & ssq, ssqInv, two3rdq, pk1, pk2, local
336 pk1 = mut*tmp0
340 if (pk1.lt.pk2) then
341 pk = pk1