File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_transp.F |
236 |
COST_GENCOST_TRANSP |
tmpMeanTile(bi,bj) = 0. _d 0 |
./pkg/ecco/cost_gencost_transp.F |
258 |
COST_GENCOST_TRANSP |
O tmpMeanTile,tmpNumTile, |
./pkg/ecco/cost_gencost_transp.F |
274 |
COST_GENCOST_TRANSP |
CALL GLOBAL_SUM_TILE_RL( tmpMeanTile, tmpMeanGlo, myThid ) |
./pkg/ecco/cost_gencost_transp.F |
286 |
COST_GENCOST_TRANSP |
& objf_gencost(bi,bj,kgen(icount))+tmpMeanTile(bi,bj) |
./pkg/ecco/cost_gencost_transp.F |
58 |
COST_GENCOST_TRANSP |
_RL tmpMeanTile(nSx,nSy),tmpNumTile(nSx,nSy) |