File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_sshv4.F |
113 |
COST_GENCOST_SSHV4 |
_RL mean_slaobs_mdt(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/ecco/cost_gencost_sshv4.F |
374 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
418 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj)= mean_slaobs_mdt(i,j,bi,bj)+ |
./pkg/ecco/cost_gencost_sshv4.F |
424 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj)= mean_slaobs_mdt(i,j,bi,bj)+ |
./pkg/ecco/cost_gencost_sshv4.F |
430 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj)= mean_slaobs_mdt(i,j,bi,bj)+ |
./pkg/ecco/cost_gencost_sshv4.F |
449 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj) = |
./pkg/ecco/cost_gencost_sshv4.F |
450 |
COST_GENCOST_SSHV4 |
& mean_slaobs_mdt(i,j,bi,bj) / |
./pkg/ecco/cost_gencost_sshv4.F |
453 |
COST_GENCOST_SSHV4 |
mean_slaobs_mdt(i,j,bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_sshv4.F |
466 |
COST_GENCOST_SSHV4 |
& 1,mean_slaobs_mdt,1,1,mythid) |
./pkg/ecco/cost_gencost_sshv4.F |
471 |
COST_GENCOST_SSHV4 |
& call SMOOTH_HETERO2D(mean_slaobs_mdt,maskc, |
./pkg/ecco/cost_gencost_sshv4.F |
479 |
COST_GENCOST_SSHV4 |
& 1,mean_slaobs_mdt,1,1,mythid) |
./pkg/ecco/cost_gencost_sshv4.F |
491 |
COST_GENCOST_SSHV4 |
& -mean_slaobs_mdt(i,j,bi,bj) |