| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_trans_zonal.F |
133 |
COST_TRANS_ZONAL |
do isect = 1, nsect |
|
./pkg/ecco/cost_trans_zonal.F |
41 |
COST_TRANS_ZONAL |
integer nsect |
|
./pkg/ecco/cost_trans_zonal.F |
42 |
COST_TRANS_ZONAL |
parameter ( nsect = 5 ) |
|
./pkg/ecco/cost_trans_zonal.F |
45 |
COST_TRANS_ZONAL |
integer kmin(nsect),kmax(nsect) |
|
./pkg/ecco/cost_trans_zonal.F |
74 |
COST_TRANS_ZONAL |
_RL tu(nsect), su(nsect), mu(nsect) |
|
./pkg/ecco/cost_trans_zonal.F |
75 |
COST_TRANS_ZONAL |
_RL musum(nsect), mumin(nsect), mumax(nsect), mulev(nsect,Nr) |
|
./pkg/ecco/cost_trans_zonal.F |
76 |
COST_TRANS_ZONAL |
_RL xlon(nsect),beglat(nsect),endlat(nsect) |
|
./pkg/ecco/cost_trans_merid.F |
144 |
COST_TRANS_MERID |
do isect = 1, nsect |
|
./pkg/ecco/cost_trans_merid.F |
41 |
COST_TRANS_MERID |
integer nsect |
|
./pkg/ecco/cost_trans_merid.F |
42 |
COST_TRANS_MERID |
parameter ( nsect = 11 ) |
|
./pkg/ecco/cost_trans_merid.F |
45 |
COST_TRANS_MERID |
integer kmin(nsect),kmax(nsect) |
|
./pkg/ecco/cost_trans_merid.F |
74 |
COST_TRANS_MERID |
_RL tv(nsect), sv(nsect), mv(nsect) |
|
./pkg/ecco/cost_trans_merid.F |
75 |
COST_TRANS_MERID |
_RL mvsum(nsect), mvmin(nsect), mvmax(nsect), mvlev(nsect,Nr) |
|
./pkg/ecco/cost_trans_merid.F |
76 |
COST_TRANS_MERID |
_RL ylat(nsect),beglon(nsect),endlon(nsect) |