| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_COST.h |
88 |
NO PROCEDURE |
_RL wsmrarea(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/seaice/SEAICE_COST.h |
92 |
NO PROCEDURE |
& wsmrarea |
|
./pkg/seaice/seaice_cost_driver.F |
103 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_driver.F |
114 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_driver.F |
92 |
SEAICE_COST_DRIVER |
& maskC, wsmrarea, |
|
./pkg/seaice/seaice_cost_weights.F |
107 |
SEAICE_COST_WEIGHTS |
& wsmrarea, irec, 0, mythid ) |
|
./pkg/seaice/seaice_cost_weights.F |
115 |
SEAICE_COST_WEIGHTS |
wsmrarea(i,j,bi,bj) = wsmrarea(i,j,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
126 |
SEAICE_COST_WEIGHTS |
wsmrarea(i,j,bi,bj) = wsmrarea0 |
|
./pkg/seaice/seaice_cost_weights.F |
138 |
SEAICE_COST_WEIGHTS |
if (wsmrarea(i,j,bi,bj) .ne. 0.) |
|
./pkg/seaice/seaice_cost_weights.F |
139 |
SEAICE_COST_WEIGHTS |
& wsmrarea(i,j,bi,bj) = |
|
./pkg/seaice/seaice_cost_weights.F |
140 |
SEAICE_COST_WEIGHTS |
& 1./wsmrarea(i,j,bi,bj)/wsmrarea(i,j,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
95 |
SEAICE_COST_WEIGHTS |
wsmrarea (i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_hyd.F |
411 |
COST_HYD |
& maskC, wsmrarea, |