File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_sstv4.F |
237 |
COST_GENCOST_SSTV4 |
& tmp_sst, localrec, mythid ) |
./pkg/ecco/cost_gencost_sstv4.F |
243 |
COST_GENCOST_SSTV4 |
tmp_sst(i,j,bi,bj) = spval |
./pkg/ecco/cost_gencost_sstv4.F |
255 |
COST_GENCOST_SSTV4 |
if ( (tmp_sst(i,j,bi,bj).GT.spval).AND. |
./pkg/ecco/cost_gencost_sstv4.F |
258 |
COST_GENCOST_SSTV4 |
& mybar(i,j,bi,bj)-tmp_sst(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sstv4.F |
260 |
COST_GENCOST_SSTV4 |
& tmp_sst(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sstv4.F |
395 |
COST_GENCOST_SSTV4 |
& tmp_sst, localrec, mythid ) |
./pkg/ecco/cost_gencost_sstv4.F |
401 |
COST_GENCOST_SSTV4 |
tmp_sst(i,j,bi,bj) = spval |
./pkg/ecco/cost_gencost_sstv4.F |
413 |
COST_GENCOST_SSTV4 |
if ( (tmp_sst(i,j,bi,bj).GT.spval).AND. |
./pkg/ecco/cost_gencost_sstv4.F |
416 |
COST_GENCOST_SSTV4 |
& mybar(i,j,bi,bj)-tmp_sst(i,j,bi,bj) |
./pkg/ecco/cost_gencost_sstv4.F |
68 |
COST_GENCOST_SSTV4 |
_RL tmp_sst (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |