Searched refs:norm_e (Results 1 – 1 of 1) sorted by relevance
131 real(kind=8) :: tmp,norm_0,norm_1,norm_e,norm_c local137 norm_e = norm_0*1e-7148 do while ( (norm_c .gt. norm_e).and.(iterNum.lt.500) )191 real(kind=8) :: tmp,norm_0,norm_p,norm_e,norm_c variable206 norm_e = norm_0 * epstol(2)237 do while ( (norm_c.gt.norm_e).and.(iterNum.lt.maxiters))