File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_sshv4.F |
1004 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
./pkg/ecco/cost_gencost_sshv4.F |
1005 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
1016 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
./pkg/ecco/cost_gencost_sshv4.F |
1017 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
1032 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
./pkg/ecco/cost_gencost_sshv4.F |
1037 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
1040 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sshv4.F |
1061 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
./pkg/ecco/cost_gencost_sshv4.F |
1109 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
./pkg/ecco/cost_gencost_sshv4.F |
136 |
COST_GENCOST_SSHV4 |
_RL anom_psMslaobs_NUM (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/ecco/cost_gencost_sshv4.F |
925 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
992 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
./pkg/ecco/cost_gencost_sshv4.F |
993 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |