Searched refs:Lmax (Results 1 – 1 of 1) sorted by relevance
591 real(kind=8) :: Lmax local694 Lmax = -1.0e+6 ! Lmax stores max value of lambda, m points to it720 if (amg_L(i).gt.Lmax) then721 Lmax = amg_L(i)739 Lmax = amg_L(m)-iabs(afmap(m))-m*MSCALE ! reuse Lmax740 if (Lmax.lt.LSCALE) then