| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
110 |
GAD_DST3FL_IMPL_R |
Rj =(tFld(i,j,k) -tFld(i,j,k-1)) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
112 |
GAD_DST3FL_IMPL_R |
Rjh = (tFld(i,j,k-1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
114 |
GAD_DST3FL_IMPL_R |
Rjh = (tFld(i,j,kp1)-tFld(i,j,k) )*maskC(i,j,kp1,bi,bj) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
11 |
GAD_DST3FL_IMPL_R |
I deltaTarg, rTrans, recip_hFac, tFld, |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
55 |
GAD_DST3FL_IMPL_R |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
11 |
GAD_FLUXLIMIT_IMPL_R |
I deltaTarg, rTrans, recip_hFac, tFld, |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
50 |
GAD_FLUXLIMIT_IMPL_R |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
90 |
GAD_FLUXLIMIT_IMPL_R |
Rjp=(tFld(i,j,kp1)-tFld(i,j,k) )*maskC(i,j,kp1,bi,bj) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
91 |
GAD_FLUXLIMIT_IMPL_R |
Rj =(tFld(i,j,k) -tFld(i,j,km1)) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
92 |
GAD_FLUXLIMIT_IMPL_R |
Rjm=(tFld(i,j,km1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj) |
|
./model/src/calc_grad_phi_hyd.F |
12 |
CALC_GRAD_PHI_HYD |
I phiHydC, alphRho, tFld, sFld, |
|
./model/src/calc_grad_phi_hyd.F |
48 |
CALC_GRAD_PHI_HYD |
_RL tFld(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 |
167 |
CALC_PHI_HYD |
I tFld(1-OLx,1-OLy,k,bi,bj), |
|
./model/src/calc_phi_hyd.F |
329 |
CALC_PHI_HYD |
I tFld(1-OLx,1-OLy,k,bi,bj), |
|
./model/src/calc_phi_hyd.F |
447 |
CALC_PHI_HYD |
alphaRho(i,j) = ( tFld(i,j,k,bi,bj) |
|
./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 |
69 |
CALC_PHI_HYD |
_RL tFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/obcs/obcs_apply_ts.F |
101 |
OBCS_APPLY_TS |
tFld(i,Jobc,k,bi,bj) = OBNt(i,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
11 |
OBCS_APPLY_TS |
U tFld, sFld, |
|
./pkg/obcs/obcs_apply_ts.F |
120 |
OBCS_APPLY_TS |
tFld(i,Jobc,k,bi,bj) = tFld(i,Jobc,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
135 |
OBCS_APPLY_TS |
tFld(i,Jobc,k,bi,bj) = OBSt(i,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
155 |
OBCS_APPLY_TS |
tFld(Iobc,j,k,bi,bj) = tFld(Iobc,j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
170 |
OBCS_APPLY_TS |
tFld(Iobc,j,k,bi,bj) = OBEt(j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
189 |
OBCS_APPLY_TS |
tFld(Iobc,j,k,bi,bj) = tFld(Iobc,j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
204 |
OBCS_APPLY_TS |
tFld(Iobc,j,k,bi,bj) = OBWt(j,k,bi,bj) |
|
./pkg/obcs/obcs_apply_ts.F |
41 |
OBCS_APPLY_TS |
_RL tFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/obcs/obcs_apply_ts.F |
86 |
OBCS_APPLY_TS |
tFld(i,Jobc,k,bi,bj) = tFld(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 |
51 |
DIAGS_PHI_RLOW |
_RL tFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/find_rho.F |
109 |
FIND_RHO_2D |
& -tAlpha*(tFld(i,j)-refTemp) ) |
|
./model/src/find_rho.F |
122 |
FIND_RHO_2D |
tP=tFld(i,j)-refTemp |
|
./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 |
249 |
FIND_RHO_2D |
IF ( locPres(i,j).GT.zeroRL .AND. tFld(i,j).GT.zeroRL ) THEN |
|
./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 |
299 |
FIND_RHOP0 |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
29 |
FIND_RHO_2D |
I tFld, sFld, |
|
./model/src/find_rho.F |
336 |
FIND_RHOP0 |
t = tFld(i,j) |
|
./model/src/find_rho.F |
413 |
FIND_BULKMOD |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
438 |
FIND_BULKMOD |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
489 |
FIND_BULKMOD |
t = tFld(i,j) |
|
./model/src/find_rho.F |
58 |
FIND_RHO_2D |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
595 |
FIND_RHONUM |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
621 |
FIND_RHONUM |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
634 |
FIND_RHONUM |
t1 = tFld(i,j) |
|
./model/src/find_rho.F |
661 |
FIND_RHODEN |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
687 |
FIND_RHODEN |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
702 |
FIND_RHODEN |
t1 = tFld(i,j) |
|
./model/src/find_rho.F |
744 |
FIND_RHOTEOS |
I locPres, tFld, sFld, |
|
./model/src/find_rho.F |
770 |
FIND_RHOTEOS |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/find_rho.F |
786 |
FIND_RHOTEOS |
ct = tFld(i,j) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
11 |
SHAP_FILT_APPLY_TS |
U tFld, sFld, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
38 |
SHAP_FILT_APPLY_TS |
_RL tFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
65 |
SHAP_FILT_APPLY_TS |
IF ( tempStepping ) _EXCH_XYZ_RL( tFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
72 |
SHAP_FILT_APPLY_TS |
& CALL SHAP_FILT_TRACEROLD( tFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
79 |
SHAP_FILT_APPLY_TS |
IF ( tempStepping ) _EXCH_XYZ_RL( tFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
87 |
SHAP_FILT_APPLY_TS |
U tFld, Shap_tmpFld1, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
92 |
SHAP_FILT_APPLY_TS |
U tFld, Shap_tmpFld1, |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
96 |
SHAP_FILT_APPLY_TS |
U tFld, Shap_tmpFld1, |
|
./model/src/ini_eos.F |
361 |
EOS_CHECK |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/ini_eos.F |
479 |
EOS_CHECK |
tFld(i,j) = ptLoc(kcheck) |
|
./model/src/ini_eos.F |
481 |
EOS_CHECK |
tFld(i,j) = tLoc(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 |
527 |
EOS_CHECK |
& tFld(i,j), ' degC,', |
|
./model/src/ini_eos.F |
538 |
EOS_CHECK |
CALL FIND_RHO_SCALAR( tFld(i,j), sLoc(kcheck), |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
11 |
ZONAL_FILT_APPLY_TS |
U tFld, sFld, |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
30 |
ZONAL_FILT_APPLY_TS |
_RL tFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
44 |
ZONAL_FILT_APPLY_TS |
U tFld( 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 |
53 |
BBL_CALC_RHO |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/bbl/bbl_calc_rho.F |
73 |
BBL_CALC_RHO |
I tFld(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 |
44 |
DWNSLP_CALC_RHO |
_RL tFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/down_slope/dwnslp_calc_rho.F |
72 |
DWNSLP_CALC_RHO |
tLoc(i,j) = tFld(i,j,kl,bi,bj) |