Symbol Description Uses
fdiff 8



File Line number Procedure Code
./lsopt/lsline.F 132 LSLINE
         fdiff = fnew - ff
./lsopt/lsline.F 137 LSLINE
         if (fdiff .gt. tact*xpara1*dotdg) then
./lsopt/lsline.F 84 LSLINE
      double precision    fnew, fdiff
./lsopt/lsupdxx.F 47 LSUPDXX
      double precision    fdiff, preco
./lsopt/lsupdxx.F 66 LSUPDXX
         fdiff = fold - ff
./lsopt/lsupdxx.F 67 LSUPDXX
         if (jmax .eq. 0) fdiff = ABS(fdiff)
./lsopt/lsupdxx.F 69 LSUPDXX
         preco = 2. * fdiff / (gnorm0*gnorm0)