File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_averagesfields.F |
107 |
COST_AVERAGESFIELDS |
integer genrec(NGENCOST) |
./pkg/ecco/cost_averagesfields.F |
187 |
COST_AVERAGESFIELDS |
O sum1gen, genrec, |
./pkg/ecco/cost_averagesfields.F |
699 |
COST_AVERAGESFIELDS |
& sum1gen(k), genrec(k), 1, mythid ) |
./pkg/ecco/cost_averagesfields.F |
710 |
COST_AVERAGESFIELDS |
& sum1gen(k), genrec(k), nr, mythid ) |
./pkg/ecco/cost_gencost_assignperiod.F |
11 |
COST_GENCOST_ASSIGNPERIOD |
O sum1gen, genrec, |
./pkg/ecco/cost_gencost_assignperiod.F |
44 |
COST_GENCOST_ASSIGNPERIOD |
integer genrec(NGENCOST) |
./pkg/ecco/cost_gencost_assignperiod.F |
64 |
COST_GENCOST_ASSIGNPERIOD |
genrec(k) = dayrec |
./pkg/ecco/cost_gencost_assignperiod.F |
71 |
COST_GENCOST_ASSIGNPERIOD |
genrec(k) = monrec |
./pkg/ecco/cost_gencost_assignperiod.F |
78 |
COST_GENCOST_ASSIGNPERIOD |
genrec(k) = yearrec |
./pkg/ecco/cost_gencost_assignperiod.F |
85 |
COST_GENCOST_ASSIGNPERIOD |
genrec(k) = 1+ myiter - niter0 |
./pkg/ecco/cost_gencost_assignperiod.F |
92 |
COST_GENCOST_ASSIGNPERIOD |
genrec(k) = 1 |