File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_sshv4.F |
114 |
COST_GENCOST_SSHV4 |
_RL mean_slaobs_NUM(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/ecco/cost_gencost_sshv4.F |
375 |
COST_GENCOST_SSHV4 |
mean_slaobs_NUM(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
420 |
COST_GENCOST_SSHV4 |
mean_slaobs_NUM(i,j,bi,bj)= mean_slaobs_NUM(i,j,bi,bj)+1. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
426 |
COST_GENCOST_SSHV4 |
mean_slaobs_NUM(i,j,bi,bj)= mean_slaobs_NUM(i,j,bi,bj)+1. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
432 |
COST_GENCOST_SSHV4 |
mean_slaobs_NUM(i,j,bi,bj)= mean_slaobs_NUM(i,j,bi,bj)+1. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
446 |
COST_GENCOST_SSHV4 |
if ( ( mean_slaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
./pkg/ecco/cost_gencost_sshv4.F |
451 |
COST_GENCOST_SSHV4 |
& mean_slaobs_NUM(i,j,bi,bj) |