| File |
Line number |
Procedure |
Code |
|
./model/src/find_rho.F |
917 |
FIND_RHO_SCALAR |
rholoc = rhoNil*( |
|
./pkg/bbl/bbl_calc_rhs.F |
73 |
BBL_CALC_RHS |
_RL rholoc ( 0:sNx+1, 0:sNy+1 ) |
|
./pkg/bbl/bbl_calc_rhs.F |
92 |
BBL_CALC_RHS |
rholoc(i,j) = rhoInSitu(i,j,kBot,bi,bj) |
|
./pkg/ecco/cost_obcs_ageos.F |
169 |
COST_OBCS_AGEOS |
rholoc(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_obcs_ageos.F |
240 |
COST_OBCS_AGEOS |
O rholoc, |
|
./pkg/ecco/cost_obcs_ageos.F |
242 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
249 |
COST_OBCS_AGEOS |
& (rholoc(i-1,j+jp1,bi,bj)-rholoc(i+1,j+jp1,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
309 |
COST_OBCS_AGEOS |
O rholoc, |
|
./pkg/ecco/cost_obcs_ageos.F |
312 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
319 |
COST_OBCS_AGEOS |
& (rholoc(i-1,j+jp1,bi,bj)-rholoc(i+1,j+jp1,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
377 |
COST_OBCS_AGEOS |
O rholoc, |
|
./pkg/ecco/cost_obcs_ageos.F |
379 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
387 |
COST_OBCS_AGEOS |
& (rholoc(i+ip1,j+1,bi,bj)-rholoc(i+ip1,j-1,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
444 |
COST_OBCS_AGEOS |
O rholoc, |
|
./pkg/ecco/cost_obcs_ageos.F |
446 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
454 |
COST_OBCS_AGEOS |
& (rholoc(i+ip1,,j+1,bi,bj)-rholoc(i+ip1,j-1,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
69 |
COST_OBCS_AGEOS |
_RL rholoc (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |