| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcs_ageos.F |
155 |
COST_OBCS_AGEOS |
maskxzageos(i,k,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_obcs_ageos.F |
225 |
COST_OBCS_AGEOS |
maskxzageos(i,k,bi,bj) = 0. |
|
./pkg/ecco/cost_obcs_ageos.F |
227 |
COST_OBCS_AGEOS |
maskxzageos(i,k,bi,bj) = |
|
./pkg/ecco/cost_obcs_ageos.F |
271 |
COST_OBCS_AGEOS |
& maskxzageos(i,k,bi,bj)* |
|
./pkg/ecco/cost_obcs_ageos.F |
274 |
COST_OBCS_AGEOS |
if (maskxzageos(i,k,bi,bj) .ne. 0) then |
|
./pkg/ecco/cost_obcs_ageos.F |
291 |
COST_OBCS_AGEOS |
maskxzageos(i,k,bi,bj) = 0. |
|
./pkg/ecco/cost_obcs_ageos.F |
294 |
COST_OBCS_AGEOS |
maskxzageos(i,k,bi,bj) = |
|
./pkg/ecco/cost_obcs_ageos.F |
338 |
COST_OBCS_AGEOS |
& maskxzageos(i,k,bi,bj)* |
|
./pkg/ecco/cost_obcs_ageos.F |
81 |
COST_OBCS_AGEOS |
_RL maskxzageos (1-olx:snx+olx,nr,nsx,nsy) |