| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_trans_zonal.F |
175 |
COST_TRANS_ZONAL |
kmax(isect) = 0 |
|
./pkg/ecco/cost_trans_zonal.F |
223 |
COST_TRANS_ZONAL |
kmax(isect) = k |
|
./pkg/ecco/cost_trans_zonal.F |
234 |
COST_TRANS_ZONAL |
& 'ECCO_TRANS_ZON ', isect, irec, kmin(isect), kmax(isect), |
|
./pkg/ecco/cost_trans_zonal.F |
245 |
COST_TRANS_ZONAL |
& isect, irec, kmin(isect), kmax(isect), |
|
./pkg/ecco/cost_trans_zonal.F |
45 |
COST_TRANS_ZONAL |
integer kmin(nsect),kmax(nsect) |
|
./pkg/ecco/cost_trans_merid.F |
186 |
COST_TRANS_MERID |
kmax(isect) = 0 |
|
./pkg/ecco/cost_trans_merid.F |
234 |
COST_TRANS_MERID |
kmax(isect) = k |
|
./pkg/ecco/cost_trans_merid.F |
245 |
COST_TRANS_MERID |
& 'ECCO_TRANS_MER ', isect, irec, kmin(isect), kmax(isect), |
|
./pkg/ecco/cost_trans_merid.F |
256 |
COST_TRANS_MERID |
& isect, irec, kmin(isect), kmax(isect), |
|
./pkg/ecco/cost_trans_merid.F |
45 |
COST_TRANS_MERID |
integer kmin(nsect),kmax(nsect) |