| File |
Line number |
Procedure |
Code |
|
./model/src/calc_grad_phi_hyd.F |
12 |
CALC_GRAD_PHI_HYD |
I phiHydC, alphRho, tFld, sFld, |
|
./model/src/calc_grad_phi_hyd.F |
49 |
CALC_GRAD_PHI_HYD |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/calc_phi_hyd.F |
15 |
CALC_PHI_HYD |
I tFld, sFld, |
|
./model/src/calc_phi_hyd.F |
168 |
CALC_PHI_HYD |
I sFld(1-OLx,1-OLy,k,bi,bj), |
|
./model/src/calc_phi_hyd.F |
330 |
CALC_PHI_HYD |
I sFld(1-OLx,1-OLy,k,bi,bj), |
|
./model/src/calc_phi_hyd.F |
448 |
CALC_PHI_HYD |
& *( sFld(i,j,k,bi,bj)*atm_Rq + oneRL ) |
|
./model/src/calc_phi_hyd.F |
627 |
CALC_PHI_HYD |
I phiHydC, alphaRho, tFld, sFld, |
|
./model/src/calc_phi_hyd.F |
663 |
CALC_PHI_HYD |
I phiHydF, phiHydC, alphaRho, tFld, sFld, |
|
./model/src/calc_phi_hyd.F |
70 |
CALC_PHI_HYD |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/obcs/obcs_apply_ts.F |
102 |
OBCS_APPLY_TS |
sFld(i,Jobc,k,bi,bj) = OBNs(i,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
11 |
OBCS_APPLY_TS |
U tFld, sFld, |
|
./pkg/obcs/obcs_apply_ts.F |
122 |
OBCS_APPLY_TS |
sFld(i,Jobc,k,bi,bj) = sFld(i,Jobc,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
136 |
OBCS_APPLY_TS |
sFld(i,Jobc,k,bi,bj) = OBSs(i,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
157 |
OBCS_APPLY_TS |
sFld(Iobc,j,k,bi,bj) = sFld(Iobc,j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
171 |
OBCS_APPLY_TS |
sFld(Iobc,j,k,bi,bj) = OBEs(j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
191 |
OBCS_APPLY_TS |
sFld(Iobc,j,k,bi,bj) = sFld(Iobc,j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
205 |
OBCS_APPLY_TS |
sFld(Iobc,j,k,bi,bj) = OBWs(j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
42 |
OBCS_APPLY_TS |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/obcs/obcs_apply_ts.F |
88 |
OBCS_APPLY_TS |
sFld(i,Jobc,k,bi,bj) = sFld(i,Jobc,k,bi,bj) |
|
./model/src/diags_phi_rlow.F |
11 |
DIAGS_PHI_RLOW |
I phiHydF, phiHydC, alphRho, tFld, sFld, |
|
./model/src/diags_phi_rlow.F |
52 |
DIAGS_PHI_RLOW |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/find_rho.F |
108 |
FIND_RHO_2D |
& sBeta*(sFld(i,j)-refSalt) |
|
./model/src/find_rho.F |
1187 |
LOOK_FOR_NEG_SALINITY |
U sFld, |
|
./model/src/find_rho.F |
1212 |
LOOK_FOR_NEG_SALINITY |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
1226 |
LOOK_FOR_NEG_SALINITY |
IF ( sFld(i,j) .LT. 0. _d 0 ) THEN |
|
./model/src/find_rho.F |
1228 |
LOOK_FOR_NEG_SALINITY |
sFld(i,j) = 0. _d 0 |
|
./model/src/find_rho.F |
123 |
FIND_RHO_2D |
sP=sFld(i,j)-refSalt |
|
./model/src/find_rho.F |
160 |
FIND_RHO_2D |
I tFld, sFld, |
|
./model/src/find_rho.F |
166 |
FIND_RHO_2D |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
195 |
FIND_RHO_2D |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
201 |
FIND_RHO_2D |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
224 |
FIND_RHO_2D |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
251 |
FIND_RHO_2D |
theta_v = tFld(i,j)*( sFld(i,j)*atm_Rq + oneRL ) |
|
./model/src/find_rho.F |
276 |
FIND_RHOP0 |
I tFld, sFld, |
|
./model/src/find_rho.F |
29 |
FIND_RHO_2D |
I tFld, sFld, |
|
./model/src/find_rho.F |
300 |
FIND_RHOP0 |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
345 |
FIND_RHOP0 |
s = sFld(i,j) |
|
./model/src/find_rho.F |
413 |
FIND_BULKMOD |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
439 |
FIND_BULKMOD |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
498 |
FIND_BULKMOD |
s = sFld(i,j) |
|
./model/src/find_rho.F |
595 |
FIND_RHONUM |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
59 |
FIND_RHO_2D |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
622 |
FIND_RHONUM |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
636 |
FIND_RHONUM |
s1 = sFld(i,j) |
|
./model/src/find_rho.F |
661 |
FIND_RHODEN |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
688 |
FIND_RHODEN |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
704 |
FIND_RHODEN |
s1 = sFld(i,j) |
|
./model/src/find_rho.F |
744 |
FIND_RHOTEOS |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
771 |
FIND_RHOTEOS |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
787 |
FIND_RHOTEOS |
sa = sFld(i,j) |
|
./model/src/find_rho.F |
90 |
FIND_RHO_2D |
U sFld, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
11 |
SHAP_FILT_APPLY_TS |
U tFld, sFld, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
136 |
SHAP_FILT_APPLY_TS |
U sFld, Shap_tmpFld1, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
141 |
SHAP_FILT_APPLY_TS |
U sFld, Shap_tmpFld1, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
145 |
SHAP_FILT_APPLY_TS |
U sFld, Shap_tmpFld1, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
39 |
SHAP_FILT_APPLY_TS |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
66 |
SHAP_FILT_APPLY_TS |
IF ( saltStepping ) _EXCH_XYZ_RL( sFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
74 |
SHAP_FILT_APPLY_TS |
& CALL SHAP_FILT_TRACEROLD( sFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
80 |
SHAP_FILT_APPLY_TS |
IF ( saltStepping ) _EXCH_XYZ_RL( sFld,myThid ) |
|
./model/src/ini_eos.F |
362 |
EOS_CHECK |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/ini_eos.F |
483 |
EOS_CHECK |
sFld(i,j) = sLoc(kcheck) |
|
./model/src/ini_eos.F |
489 |
EOS_CHECK |
I tFld, sFld, |
|
./model/src/ini_eos.F |
499 |
EOS_CHECK |
I pFld, tFld, sFld, |
|
./model/src/ini_eos.F |
526 |
EOS_CHECK |
& 'rho(', sFld(i,j), ' PSU,', |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
11 |
ZONAL_FILT_APPLY_TS |
U tFld, sFld, |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
31 |
ZONAL_FILT_APPLY_TS |
_RL sFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
48 |
ZONAL_FILT_APPLY_TS |
U sFld( 1-OLx,1-OLy,1,bi,bj), |
|
./pkg/bbl/bbl_calc_rho.F |
10 |
BBL_CALC_RHO |
I tFld, sFld, |
|
./pkg/bbl/bbl_calc_rho.F |
54 |
BBL_CALC_RHO |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/bbl/bbl_calc_rho.F |
74 |
BBL_CALC_RHO |
I sFld(1-OLx,1-OLy,k,bi,bj), |
|
./pkg/down_slope/dwnslp_calc_rho.F |
10 |
DWNSLP_CALC_RHO |
I tFld, sFld, |
|
./pkg/down_slope/dwnslp_calc_rho.F |
45 |
DWNSLP_CALC_RHO |
_RL sFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/down_slope/dwnslp_calc_rho.F |
73 |
DWNSLP_CALC_RHO |
sLoc(i,j) = sFld(i,j,kl,bi,bj) |