| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesfields.F |
515 |
COST_AVERAGESFIELDS |
locdayrec = 0 |
|
./pkg/ecco/cost_averagesfields.F |
517 |
COST_AVERAGESFIELDS |
locdayrec = dayrec |
|
./pkg/ecco/cost_averagesfields.F |
519 |
COST_AVERAGESFIELDS |
locdayrec = dayrec+1 |
|
./pkg/ecco/cost_averagesfields.F |
524 |
COST_AVERAGESFIELDS |
& transpbar(locdayrec,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_averagesfields.F |
531 |
COST_AVERAGESFIELDS |
transpbar(locdayrec,bi,bj) = transpbar(locdayrec,bi,bj) |
|
./pkg/ecco/cost_averagesfields.F |
539 |
COST_AVERAGESFIELDS |
transpbar(locdayrec,bi,bj) = |
|
./pkg/ecco/cost_averagesfields.F |
540 |
COST_AVERAGESFIELDS |
& transpbar(locdayrec,bi,bj)/float(sum1day) |
|
./pkg/ecco/cost_averagesfields.F |
95 |
COST_AVERAGESFIELDS |
integer locdayrec |