File |
Line number |
Procedure |
Code |
./lsopt/lsline.F |
233 |
LSLINE |
if (td-tg .lt. tmin) go to 920 |
./lsopt/lsline.F |
56 |
LSLINE |
double precision ff, dotdg, tmin, tmax, tact, epsx |
./lsopt/lsline.F |
7 |
LSLINE |
& , tmin, tmax, tact, epsx |
./lsopt/lsopt_top.F |
106 |
LSOPT_TOP |
tmin = 0. |
./lsopt/lsopt_top.F |
424 |
LSOPT_TOP |
& , tmin, tmax, tact, epsx |
./lsopt/lsopt_top.F |
441 |
LSOPT_TOP |
& , tmin, tmax, tact, epsx |
./lsopt/lsopt_top.F |
606 |
LSOPT_TOP |
& , tmin, tmax, tact, epsx |
./lsopt/lsopt_top.F |
81 |
LSOPT_TOP |
double precision r1, tmin, tmax, tact, gnorm, gnorm0, eps1 |
./lsopt/lsupdxx.F |
112 |
LSUPDXX |
tmin = 0. |
./lsopt/lsupdxx.F |
114 |
LSUPDXX |
tmin = max( tmin, abs(dd(i)) ) |
./lsopt/lsupdxx.F |
116 |
LSUPDXX |
tmin = epsx/tmin |
./lsopt/lsupdxx.F |
125 |
LSUPDXX |
if (tact.le.tmin) then |
./lsopt/lsupdxx.F |
126 |
LSUPDXX |
tact = tmin |
./lsopt/lsupdxx.F |
128 |
LSUPDXX |
tmin = tmax |
./lsopt/lsupdxx.F |
40 |
LSUPDXX |
double precision tmin, tmax, tact, epsx |
./lsopt/lsupdxx.F |
7 |
LSUPDXX |
& , tmin, tmax, tact, epsx |