| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_ies.F |
100 |
COST_IES |
iescount(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_ies.F |
136 |
COST_IES |
iescount(i,j,bi,bj) = iescount(i,j,bi,bj) +1. |
|
./pkg/ecco/cost_ies.F |
149 |
COST_IES |
if (iescount(i,j,bi,bj).GT.0.) then |
|
./pkg/ecco/cost_ies.F |
150 |
COST_IES |
iesmean(i,j,bi,bj) = iesmean(i,j,bi,bj)/iescount(i,j,bi,bj) |
|
./pkg/ecco/cost_ies.F |
151 |
COST_IES |
datmean(i,j,bi,bj) = datmean(i,j,bi,bj)/iescount(i,j,bi,bj) |
|
./pkg/ecco/cost_ies.F |
69 |
COST_IES |
_RL iescount ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy ) |