File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_heatflux.F |
66 |
COST_HEATFLUX |
_RL fctilemm |
./pkg/ecco/cost_zonstress.F |
66 |
COST_ZONSTRESS |
_RL fctilemm |
./pkg/ecco/cost_mean_heatflux.F |
112 |
COST_MEAN_HEATFLUX |
fctilemm = 0. _d 0 |
./pkg/ecco/cost_mean_heatflux.F |
118 |
COST_MEAN_HEATFLUX |
fctilemm = fctilemm + tmpx |
./pkg/ecco/cost_mean_heatflux.F |
125 |
COST_MEAN_HEATFLUX |
fctilemm = (fctilemm / sumcos) |
./pkg/ecco/cost_mean_heatflux.F |
126 |
COST_MEAN_HEATFLUX |
fctilemm = whfluxmm(bi,bj) * (fctilemm ) |
./pkg/ecco/cost_mean_heatflux.F |
128 |
COST_MEAN_HEATFLUX |
objf_hfluxmm(bi,bj) = fctilemm |
./pkg/ecco/cost_mean_heatflux.F |
129 |
COST_MEAN_HEATFLUX |
fcthreadmm = fcthreadmm + fctilemm |
./pkg/ecco/cost_mean_heatflux.F |
179 |
COST_MEAN_HEATFLUX |
fctilemm = 0. _d 0 |
./pkg/ecco/cost_mean_heatflux.F |
58 |
COST_MEAN_HEATFLUX |
_RL fctilemm |
./pkg/ecco/cost_mean_saltflux.F |
112 |
COST_MEAN_SALTFLUX |
fctilemm = 0. _d 0 |
./pkg/ecco/cost_mean_saltflux.F |
118 |
COST_MEAN_SALTFLUX |
fctilemm = fctilemm+tmpx*cos(yc(i,j,bi,bj)*deg2rad) |
./pkg/ecco/cost_mean_saltflux.F |
125 |
COST_MEAN_SALTFLUX |
fctilemm = (fctilemm / sumcos) |
./pkg/ecco/cost_mean_saltflux.F |
126 |
COST_MEAN_SALTFLUX |
fctilemm = wsfluxmm(bi,bj) * (fctilemm ) |
./pkg/ecco/cost_mean_saltflux.F |
128 |
COST_MEAN_SALTFLUX |
objf_sfluxmm(bi,bj) = fctilemm |
./pkg/ecco/cost_mean_saltflux.F |
129 |
COST_MEAN_SALTFLUX |
fcthreadmm = fcthreadmm + fctilemm |
./pkg/ecco/cost_mean_saltflux.F |
179 |
COST_MEAN_SALTFLUX |
fctilemm = 0. _d 0 |
./pkg/ecco/cost_mean_saltflux.F |
58 |
COST_MEAN_SALTFLUX |
_RL fctilemm |
./pkg/ecco/cost_saltflux.F |
66 |
COST_SALTFLUX |
_RL fctilemm |
./pkg/ecco/cost_merstress.F |
66 |
COST_MERSTRESS |
_RL fctilemm |