| File |
Line number |
Procedure |
Code |
|
./model/src/diags_rho.F |
104 |
DIAGS_RHO_G |
I rho3d, uFld, vFld, wFld, |
|
./model/src/diags_rho.F |
132 |
DIAGS_RHO_G |
_RL rho3d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/diags_rho.F |
157 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_FILL( rho3d, 'RHOAnoma', |
|
./model/src/diags_rho.F |
160 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_SCALE_FILL( rho3d, tmpFac, 2, |
|
./model/src/diags_rho.F |
170 |
DIAGS_RHO_G |
& *(rho3d(i-1,j,k,bi,bj)+rho3d(i,j,k,bi,bj)) |
|
./model/src/diags_rho.F |
187 |
DIAGS_RHO_G |
& *(rho3d(i,j-1,k,bi,bj)+rho3d(i,j,k,bi,bj)) |
|
./model/src/diags_rho.F |
18 |
DIAGS_RHO_L |
I rho3d, rhoKm1, wFld, |
|
./model/src/diags_rho.F |
204 |
DIAGS_RHO_G |
tmpFld(i,j) = wFld(i,j,k,bi,bj)*rho3d(i,j,k,bi,bj) |
|
./model/src/diags_rho.F |
211 |
DIAGS_RHO_G |
& *(rho3d(i,j,k-1,bi,bj)+rho3d(i,j,k,bi,bj)) |
|
./model/src/diags_rho.F |
50 |
DIAGS_RHO_L |
_RL rho3d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./model/src/diags_rho.F |
74 |
DIAGS_RHO_L |
& *( rho3d(i,j,k) - rhoKm1(i,j) )*rkSign |
|
./model/src/diags_rho.F |
87 |
DIAGS_RHO_L |
& *( rhoKm1(i,j) - rho3d(i,j,k-1) )*rkSign |
|
./pkg/down_slope/dwnslp_calc_flow.F |
104 |
DWNSLP_CALC_FLOW |
dRhoH = rho3d(ijs,kshelf,bi,bj) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
105 |
DWNSLP_CALC_FLOW |
& -rho3d(ijd,kshelf,bi,bj) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
107 |
DWNSLP_CALC_FLOW |
IF ( rho3d(ijs,kshelf+1,bi,bj).GT.rho3d(ijd,kshelf+1,bi,bj) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
10 |
DWNSLP_CALC_FLOW |
I bi, bj, kBottom, rho3d, |
|
./pkg/down_slope/dwnslp_calc_flow.F |
113 |
DWNSLP_CALC_FLOW |
IF ( rho3d(ijs,k,bi,bj).GT.rho3d(ijd,k,bi,bj) ) kdeep = k |
|
./pkg/down_slope/dwnslp_calc_flow.F |
42 |
DWNSLP_CALC_FLOW |
_RL rho3d ( xySize, Nr,nSx,nSy ) |