| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_bp.F |
138 |
COST_BP |
if (bpmask(i,j,bi,bj).NE.0.) then |
|
./pkg/ecco/cost_bp.F |
187 |
COST_BP |
& )*bpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_bp.F |
190 |
COST_BP |
& )*bpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_bp.F |
207 |
COST_BP |
call SMOOTH_BASIC2D(bpdifanom,bpmask,750000. _d 0,5000,mythid) |
|
./pkg/ecco/cost_bp.F |
208 |
COST_BP |
call SMOOTH_BASIC2D(bpdatanom,bpmask,750000. _d 0,5000,mythid) |
|
./pkg/ecco/cost_bp.F |
224 |
COST_BP |
& *bpmask(i,j,bi,bj)*maskc(i,j,1,bi,bj) |
|
./pkg/ecco/cost_bp_read.F |
116 |
COST_BP_READ |
bpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_bp_read.F |
118 |
COST_BP_READ |
bpmask(i,j,bi,bj) = 1. _d 0 |
|
./pkg/ecco/cost_bp_read.F |
121 |
COST_BP_READ |
& bpmask(i,j,bi,bj) |
|
./pkg/ecco/cost_bp_read.F |
122 |
COST_BP_READ |
nobs = nobs + int(bpmask(i,j,bi,bj)) |
|
./pkg/ecco/ecco_cost.h |
1220 |
NO PROCEDURE |
& bpmask, |
|
./pkg/ecco/ecco_cost.h |
1255 |
NO PROCEDURE |
_RL bpmask (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) |
|
./pkg/ecco/ecco_cost_init_varia.F |
282 |
ECCO_COST_INIT_VARIA |
bpmask(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_init_varia.F |
284 |
ECCO_COST_INIT_VARIA |
bpmask(i,j,bi,bj) = 1. _d 0 |