File |
Line number |
Procedure |
Code |
./optim/optim_sub.F |
124 |
OPTIM_SUB |
& , ifail ) |
./optim/optim_sub.F |
81 |
OPTIM_SUB |
integer ifail |
./lsopt/instore.F |
15 |
INSTORE |
ifail = 0 |
./lsopt/instore.F |
2 |
INSTORE |
& cold, ifail ) |
./lsopt/instore.F |
63 |
INSTORE |
ifail = 1 |
./lsopt/instore.F |
6 |
INSTORE |
integer n, is, m, jmin, jmax, ifail |
./lsopt/lsline.F |
139 |
LSLINE |
ifail = 0 |
./lsopt/lsline.F |
147 |
LSLINE |
ifail = 0 |
./lsopt/lsline.F |
151 |
LSLINE |
if (ifail.eq.0) go to 350 |
./lsopt/lsline.F |
186 |
LSLINE |
ifail = 7 |
./lsopt/lsline.F |
192 |
LSLINE |
& 'td, tg, tact, ifail = ', td, tg, tact, ifail |
./lsopt/lsline.F |
216 |
LSLINE |
& 'td, tg, tact, ifail = ', td, tg, tact, ifail |
./lsopt/lsline.F |
247 |
LSLINE |
ifail = 8 |
./lsopt/lsline.F |
279 |
LSLINE |
ifail = 6 |
./lsopt/lsline.F |
4 |
LSLINE |
& , nn, ifail, lphprint |
./lsopt/lsline.F |
55 |
LSLINE |
integer nn, ifail, ifunc, nfunc |
./lsopt/lsline.F |
99 |
LSLINE |
ifail = 9 |
./lsopt/lsopt_top.F |
115 |
LSOPT_TOP |
ifail = 0 |
./lsopt/lsopt_top.F |
169 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
177 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
185 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
193 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
201 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
209 |
LSOPT_TOP |
ifail = 1 |
./lsopt/lsopt_top.F |
217 |
LSOPT_TOP |
& ifail ) |
./lsopt/lsopt_top.F |
226 |
LSOPT_TOP |
if (ifail .ne. 0) then |
./lsopt/lsopt_top.F |
230 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
238 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
246 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
292 |
LSOPT_TOP |
ifail = 3 |
./lsopt/lsopt_top.F |
312 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
320 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
328 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
336 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
344 |
LSOPT_TOP |
ifail = 2 |
./lsopt/lsopt_top.F |
385 |
LSOPT_TOP |
ifail = 10 |
./lsopt/lsopt_top.F |
420 |
LSOPT_TOP |
& nn, ifail, lphprint |
./lsopt/lsopt_top.F |
430 |
LSOPT_TOP |
if ( ifail .eq. 4) goto 1000 |
./lsopt/lsopt_top.F |
438 |
LSOPT_TOP |
& , nn, ifail, lphprint |
./lsopt/lsopt_top.F |
446 |
LSOPT_TOP |
& 'back from optline; ifail = ', ifail |
./lsopt/lsopt_top.F |
471 |
LSOPT_TOP |
if (ifail .eq. 7 |
./lsopt/lsopt_top.F |
472 |
LSOPT_TOP |
& .or. ifail .eq. 8 |
./lsopt/lsopt_top.F |
473 |
LSOPT_TOP |
& .or. ifail .eq. 9) goto 1000 |
./lsopt/lsopt_top.F |
479 |
LSOPT_TOP |
if (ifail .eq. 6) ifail = 0 |
./lsopt/lsopt_top.F |
503 |
LSOPT_TOP |
ifail = 4 |
./lsopt/lsopt_top.F |
504 |
LSOPT_TOP |
print *, 'pathei-lsopt: ys < 0; ifail = ', ifail |
./lsopt/lsopt_top.F |
568 |
LSOPT_TOP |
ifail = 11 |
./lsopt/lsopt_top.F |
579 |
LSOPT_TOP |
ifail = 5 |
./lsopt/lsopt_top.F |
58 |
LSOPT_TOP |
integer nn, iprint, itmax, nfunc, nupdate, ifail |
./lsopt/lsopt_top.F |
602 |
LSOPT_TOP |
& nn, ifail, lphprint |
./lsopt/lsopt_top.F |
642 |
LSOPT_TOP |
if (ifail .ne. 0) then |
./lsopt/lsopt_top.F |
646 |
LSOPT_TOP |
if (ifail .lt. 0) then |
./lsopt/lsopt_top.F |
647 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
649 |
LSOPT_TOP |
else if (ifail .eq. 0) then |
./lsopt/lsopt_top.F |
650 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
652 |
LSOPT_TOP |
else if (ifail .eq. 1) then |
./lsopt/lsopt_top.F |
653 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
655 |
LSOPT_TOP |
else if (ifail .eq. 2) then |
./lsopt/lsopt_top.F |
656 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
658 |
LSOPT_TOP |
else if (ifail .eq. 3) then |
./lsopt/lsopt_top.F |
659 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
661 |
LSOPT_TOP |
else if (ifail .eq. 4) then |
./lsopt/lsopt_top.F |
662 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
664 |
LSOPT_TOP |
else if (ifail .eq. 5) then |
./lsopt/lsopt_top.F |
665 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
667 |
LSOPT_TOP |
else if (ifail .eq. 6) then |
./lsopt/lsopt_top.F |
668 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
670 |
LSOPT_TOP |
else if (ifail .eq. 7) then |
./lsopt/lsopt_top.F |
671 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
673 |
LSOPT_TOP |
else if (ifail .eq. 8) then |
./lsopt/lsopt_top.F |
674 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
676 |
LSOPT_TOP |
else if (ifail .eq. 9) then |
./lsopt/lsopt_top.F |
677 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
679 |
LSOPT_TOP |
else if (ifail .eq. 10) then |
./lsopt/lsopt_top.F |
680 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
682 |
LSOPT_TOP |
else if (ifail .eq. 11) then |
./lsopt/lsopt_top.F |
683 |
LSOPT_TOP |
print '(2x,a8,I3,a)', 'ifail = ', ifail |
./lsopt/lsopt_top.F |
690 |
LSOPT_TOP |
$ , ' after optimization ifail..........', ifail |
./lsopt/lsopt_top.F |
7 |
LSOPT_TOP |
$ , ifail ) |
./lsopt/lsupdxx.F |
104 |
LSUPDXX |
ifail = 4 |
./lsopt/lsupdxx.F |
134 |
LSUPDXX |
ifail = 7 |
./lsopt/lsupdxx.F |
37 |
LSUPDXX |
integer nn, jmin, jmax, nupdate, ifail |
./lsopt/lsupdxx.F |
3 |
LSUPDXX |
& nn, ifail, lphprint |