Symbol Description Uses
rmin 8



File Line number Procedure Code
./lsopt/dgscale.F 27 DGSCALE
      double precision    r1, rmin, den
./lsopt/dgscale.F 2 DGSCALE
      subroutine DGSCALE( nn, gold, xdiff, diag, rmin )
./lsopt/dgscale.F 54 DGSCALE
            diag(i) = rmin
./lsopt/dgscale.F 64 DGSCALE
            diag(i) = rmin
./lsopt/lsopt_top.F 291 LSOPT_TOP
         if (gnorm0 .lt. rmin) then
./lsopt/lsopt_top.F 557 LSOPT_TOP
         call DGSCALE( nn, gold, xdiff, dd, rmin )
./lsopt/lsopt_top.F 92 LSOPT_TOP
      double precision rmin
./lsopt/lsopt_top.F 93 LSOPT_TOP
      parameter( rmin = 1.e-20 )