| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_ctdsclim.F |
164 |
COST_CTDSCLIM |
levmon = (irec-1) + levoff |
|
./pkg/ecco/cost_ctdsclim.F |
165 |
COST_CTDSCLIM |
levmon = mod(levmon-1,12)+1 |
|
./pkg/ecco/cost_ctdsclim.F |
168 |
COST_CTDSCLIM |
& nr, sdat, levmon, mythid) |
|
./pkg/ecco/cost_ctdsclim.F |
68 |
COST_CTDSCLIM |
integer levmon |
|
./pkg/ecco/cost_ctdtclim.F |
163 |
COST_CTDTCLIM |
levmon = (irec-1) + levoff |
|
./pkg/ecco/cost_ctdtclim.F |
164 |
COST_CTDTCLIM |
levmon = mod(levmon-1,12)+1 |
|
./pkg/ecco/cost_ctdtclim.F |
167 |
COST_CTDTCLIM |
& nr, tdat, levmon, mythid) |
|
./pkg/ecco/cost_ctdtclim.F |
68 |
COST_CTDTCLIM |
integer levmon |
|
./pkg/ecco/cost_mean_heatflux.F |
57 |
COST_MEAN_HEATFLUX |
integer levmon |
|
./pkg/ecco/cost_mean_saltflux.F |
57 |
COST_MEAN_SALTFLUX |
integer levmon |
|
./pkg/ecco/cost_obcs_ageos.F |
58 |
COST_OBCS_AGEOS |
integer levmon |
|
./pkg/ecco/cost_salt.F |
164 |
COST_SALT |
levmon = (irectmp-1) + levoff |
|
./pkg/ecco/cost_salt.F |
165 |
COST_SALT |
levmon = mod(levmon-1,12)+1 |
|
./pkg/ecco/cost_salt.F |
168 |
COST_SALT |
& nr, sdat, levmon, mythid) |
|
./pkg/ecco/cost_salt.F |
65 |
COST_SALT |
integer levmon |
|
./pkg/ecco/cost_scat.F |
56 |
COST_SCAT |
integer levmon |
|
./pkg/ecco/cost_sigmar.F |
157 |
COST_SIGMAR |
levmon = (irectmp-1) + levoff |
|
./pkg/ecco/cost_sigmar.F |
158 |
COST_SIGMAR |
levmon = mod(levmon-1,12)+1 |
|
./pkg/ecco/cost_sigmar.F |
161 |
COST_SIGMAR |
& nr, sigmaRdat, levmon, mythid) |
|
./pkg/ecco/cost_sigmar.F |
66 |
COST_SIGMAR |
integer levmon |
|
./pkg/ecco/cost_theta.F |
164 |
COST_THETA |
levmon = (irectmp-1) + levoff |
|
./pkg/ecco/cost_theta.F |
165 |
COST_THETA |
levmon = mod(levmon-1,12)+1 |
|
./pkg/ecco/cost_theta.F |
168 |
COST_THETA |
& nr, tdat, levmon, mythid) |
|
./pkg/ecco/cost_theta.F |
66 |
COST_THETA |
integer levmon |