| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_COST.h |
84 |
NO PROCEDURE |
_RL wsmrarea(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/seaice/SEAICE_COST.h |
88 |
NO PROCEDURE |
& wsmrarea |
|
./pkg/seaice/seaice_cost_driver.F |
101 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_driver.F |
79 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_driver.F |
90 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_weights.F |
102 |
SEAICE_COST_WEIGHTS |
& wsmrarea, irec, 0, mythid ) |
|
./pkg/seaice/seaice_cost_weights.F |
110 |
SEAICE_COST_WEIGHTS |
wsmrarea(i,j,bi,bj) = wsmrarea(i,j,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
121 |
SEAICE_COST_WEIGHTS |
wsmrarea(i,j,bi,bj) = wsmrarea0 |
|
./pkg/seaice/seaice_cost_weights.F |
133 |
SEAICE_COST_WEIGHTS |
if (wsmrarea(i,j,bi,bj) .ne. 0.) |
|
./pkg/seaice/seaice_cost_weights.F |
134 |
SEAICE_COST_WEIGHTS |
& wsmrarea(i,j,bi,bj) = |
|
./pkg/seaice/seaice_cost_weights.F |
135 |
SEAICE_COST_WEIGHTS |
& 1./wsmrarea(i,j,bi,bj)/wsmrarea(i,j,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
90 |
SEAICE_COST_WEIGHTS |
wsmrarea (i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_hyd.F |
241 |
COST_HYD |
& maskC, wsmrarea, |