| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_sshv4.F |
108 |
COST_GENCOST_SSHV4 |
_RL mean_psMssh_all_NUM(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ecco/cost_gencost_sshv4.F |
392 |
COST_GENCOST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
493 |
COST_GENCOST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_gencost_sshv4.F |
494 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_gencost_sshv4.F |
507 |
COST_GENCOST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_gencost_sshv4.F |
508 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_gencost_sshv4.F |
521 |
COST_GENCOST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_gencost_sshv4.F |
522 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_gencost_sshv4.F |
530 |
COST_GENCOST_SSHV4 |
if ( ( mean_psMssh_all_NUM(i,j,bi,bj) .GT. 0 ).AND. |
|
./pkg/ecco/cost_gencost_sshv4.F |
535 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
542 |
COST_GENCOST_SSHV4 |
if ( ( mean_psMssh_all_NUM(i,j,bi,bj) .GT. num0 ).AND. |
|
./pkg/ecco/cost_gencost_sshv4.F |
548 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
551 |
COST_GENCOST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj)-mdt(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
604 |
COST_GENCOST_SSHV4 |
if ( (mean_psMssh_all_NUM(i,j,bi,bj) .GT. num0) .AND. |
|
./pkg/ecco/cost_sshv4.F |
106 |
COST_SSHV4 |
_RL mean_psMssh_all_NUM(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ecco/cost_sshv4.F |
349 |
COST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_sshv4.F |
447 |
COST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_sshv4.F |
448 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_sshv4.F |
461 |
COST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_sshv4.F |
462 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_sshv4.F |
475 |
COST_SSHV4 |
mean_psMssh_all_NUM(i,j,bi,bj) = |
|
./pkg/ecco/cost_sshv4.F |
476 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) + |
|
./pkg/ecco/cost_sshv4.F |
484 |
COST_SSHV4 |
if ( ( mean_psMssh_all_NUM(i,j,bi,bj) .NE. 0. ).AND. |
|
./pkg/ecco/cost_sshv4.F |
490 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
493 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj)-mdt(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
496 |
COST_SSHV4 |
& mean_psMssh_all_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
497 |
COST_SSHV4 |
offset_sum=offset_sum+mean_psMssh_all_NUM(i,j,bi,bj) |