| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_ctdsclim.F |
125 |
COST_CTDSCLIM |
mrec=irec+(iyear-1)*12 |
|
./pkg/ecco/cost_ctdsclim.F |
127 |
COST_CTDSCLIM |
call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec, |
|
./pkg/ecco/cost_ctdsclim.F |
85 |
COST_CTDSCLIM |
integer mrec, nyears, iyear |
|
./pkg/ecco/cost_ctdtclim.F |
124 |
COST_CTDTCLIM |
mrec=irec+(iyear-1)*12 |
|
./pkg/ecco/cost_ctdtclim.F |
126 |
COST_CTDTCLIM |
call ACTIVE_READ_XYZ( fnametheta, tbar, mrec, |
|
./pkg/ecco/cost_ctdtclim.F |
84 |
COST_CTDTCLIM |
integer mrec, nyears, iyear |
|
./pkg/ecco/cost_salt.F |
123 |
COST_SALT |
mrec=irec+(iyear-1)*12 |
|
./pkg/ecco/cost_salt.F |
124 |
COST_SALT |
irectmp=mrec |
|
./pkg/ecco/cost_salt.F |
126 |
COST_SALT |
call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec, |
|
./pkg/ecco/cost_salt.F |
80 |
COST_SALT |
integer mrec, nyears, iyear |
|
./pkg/ecco/cost_theta.F |
122 |
COST_THETA |
mrec=irec+(iyear-1)*12 |
|
./pkg/ecco/cost_theta.F |
123 |
COST_THETA |
irectmp=mrec |
|
./pkg/ecco/cost_theta.F |
125 |
COST_THETA |
call ACTIVE_READ_XYZ( fnametheta, tbar, mrec, |
|
./pkg/ecco/cost_theta.F |
79 |
COST_THETA |
integer mrec, nyears, iyear |