Symbol Description Uses
tlower 6



File Line number Procedure Code
./lsopt/cubic.F 2 CUBIC
      subroutine CUBIC( t, f, fp, ta, fa, fpa, tlower, tupper )
./lsopt/cubic.F 31 CUBIC
            if (fp.ge.0.) t = tlower
./lsopt/cubic.F 46 CUBIC
            if (fp.ge.0.) t = tlower
./lsopt/cubic.F 65 CUBIC
         if (abs((t-ta)*anum).lt.(tupper-tlower)*abs(den)) then
./lsopt/cubic.F 72 CUBIC
      t = max( t, tlower )
./lsopt/cubic.F 7 CUBIC
      double precision    t, f, fp, ta, fa, fpa, tlower, tupper