| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_trans_zonal.F |
171 |
COST_TRANS_ZONAL |
mu(isect) = 0.0 |
|
./pkg/ecco/cost_trans_zonal.F |
199 |
COST_TRANS_ZONAL |
mu(isect) = mu(isect) + p5*(hFacC(i,j,k,bi,bj) |
|
./pkg/ecco/cost_trans_zonal.F |
206 |
COST_TRANS_ZONAL |
mulev(isect,k) = mu(isect) |
|
./pkg/ecco/cost_trans_zonal.F |
213 |
COST_TRANS_ZONAL |
_GLOBAL_SUM_R8( mu(isect), mythid ) |
|
./pkg/ecco/cost_trans_zonal.F |
231 |
COST_TRANS_ZONAL |
musum(isect) = musum(isect) + mu(isect) |
|
./pkg/ecco/cost_trans_zonal.F |
235 |
COST_TRANS_ZONAL |
& tu(isect), su(isect), mu(isect), mumin(isect), mumax(isect) |
|
./pkg/ecco/cost_trans_zonal.F |
246 |
COST_TRANS_ZONAL |
& tu(isect), su(isect), mu(isect), mumin(isect), mumax(isect) |
|
./pkg/ecco/cost_trans_zonal.F |
74 |
COST_TRANS_ZONAL |
_RL tu(nsect), su(nsect), mu(nsect) |