Symbol Description Uses
r 6



File Line number Procedure Code
./lsopt/hessupd.F 101 HESSUPD
            dd(i) = dd(i) + r*xdiff(i)
./lsopt/hessupd.F 48 HESSUPD
      double precision    r
./lsopt/hessupd.F 73 HESSUPD
         r = DDOT( nn, dd, 1, xdiff,1 )
./lsopt/hessupd.F 75 HESSUPD
         alpha(jp) = r
./lsopt/hessupd.F 77 HESSUPD
            dd(i) = dd(i) - r*xdiff(i)
./lsopt/hessupd.F 98 HESSUPD
         r = alpha(jp) - DDOT( nn, dd,1 , xdiff, 1 )