Symbol | Description | Uses |
junk | 9 |
File | Line number | Procedure | Code |
./pkg/ecco/cost_ssh.F | 247 | COST_SSH |
junk = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) - |
./pkg/ecco/cost_ssh.F | 250 | COST_SSH |
tpcost = tpcost + junk*junk*wwwtp(i,j) |
./pkg/ecco/cost_ssh.F | 251 | COST_SSH |
if ( wwwtp(i,j)*junk .ne. 0. ) |
./pkg/ecco/cost_ssh.F | 262 | COST_SSH |
junk = ((psbar(i,j,bi,bj) - psmean(i,j,bi,bj)) - |
./pkg/ecco/cost_ssh.F | 265 | COST_SSH |
erscost = erscost + junk*junk*wwwers(i,j) |
./pkg/ecco/cost_ssh.F | 266 | COST_SSH |
if ( wwwers(i,j)*junk .ne. 0. ) |
./pkg/ecco/cost_ssh.F | 76 | COST_SSH |
_RL junk |