| File |
Line number |
Procedure |
Code |
|
./optim/optim_sub.F |
122 |
OPTIM_SUB |
& , dd, gold, xdiff |
|
./optim/optim_sub.F |
48 |
OPTIM_SUB |
_RL gold(nn) |
|
./optim/optim_sub.F |
54 |
OPTIM_SUB |
_RL gold(1) |
|
./optim/optim_sub.F |
59 |
OPTIM_SUB |
pointer (pgold,gold) |
|
./optim/optim_sub.F |
67 |
OPTIM_SUB |
_RL gold(nmax) |
|
./lsopt/dgscale.F |
24 |
DGSCALE |
double precision gold(nn), xdiff(nn), diag(nn) |
|
./lsopt/dgscale.F |
2 |
DGSCALE |
subroutine DGSCALE( nn, gold, xdiff, diag, rmin ) |
|
./lsopt/dgscale.F |
37 |
DGSCALE |
r1 = r1 + gold(i)*gold(i)*diag(i) |
|
./lsopt/dgscale.F |
62 |
DGSCALE |
$ (1./diag(i)+gold(i)**2-(xdiff(i)/diag(i))**2/den) |
|
./lsopt/lsopt_top.F |
406 |
LSOPT_TOP |
gold(i) = gg(i) |
|
./lsopt/lsopt_top.F |
498 |
LSOPT_TOP |
gold(i) = gg(i)-gold(i) |
|
./lsopt/lsopt_top.F |
501 |
LSOPT_TOP |
ys = DDOT( nn, gold, 1, xdiff, 1 ) |
|
./lsopt/lsopt_top.F |
544 |
LSOPT_TOP |
call DSCAL( nn, r1, gold, 1 ) |
|
./lsopt/lsopt_top.F |
550 |
LSOPT_TOP |
call DOSTORE( nn, gold, .true., 2*jmax+2 ) |
|
./lsopt/lsopt_top.F |
557 |
LSOPT_TOP |
call DGSCALE( nn, gold, xdiff, dd, rmin ) |
|
./lsopt/lsopt_top.F |
5 |
LSOPT_TOP |
$ , dd, gold, xdiff |
|
./lsopt/lsopt_top.F |
61 |
LSOPT_TOP |
double precision dd(nn), gold(nn), xdiff(nn) |