| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_implicit_r.F |
386 |
GAD_IMPLICIT_R |
& *rStarFacC(i,j,bi,bj) |
|
./model/inc/SURFACE.h |
86 |
NO PROCEDURE |
& rStarFacC, rStarFacW, rStarFacS, pStarFacK, |
|
./model/inc/SURFACE.h |
90 |
NO PROCEDURE |
_RL rStarFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/src/calc_grad_phi_hyd.F |
197 |
CALC_GRAD_PHI_HYD |
& *(rStarFacC(i,j,bi,bj)-rStarFacC(i-1,j,bi,bj)) |
|
./model/src/calc_grad_phi_hyd.F |
205 |
CALC_GRAD_PHI_HYD |
& *(rStarFacC(i,j,bi,bj)-rStarFacC(i,j-1,bi,bj)) |
|
./model/src/calc_grad_phi_hyd.F |
228 |
CALC_GRAD_PHI_HYD |
& *(rStarFacC(i,j,bi,bj)-rStarFacC(i-1,j,bi,bj)) |
|
./model/src/calc_grad_phi_hyd.F |
241 |
CALC_GRAD_PHI_HYD |
& *(rStarFacC(i,j,bi,bj)-rStarFacC(i,j-1,bi,bj)) |
|
./model/src/calc_grad_phi_hyd.F |
85 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
106 |
CALC_R_STAR |
rStarFacC(i,j,bi,bj) = |
|
./model/src/calc_r_star.F |
110 |
CALC_R_STAR |
rStarFacC(i,j,bi,bj) = 1. |
|
./model/src/calc_r_star.F |
175 |
CALC_R_STAR |
U rStarFacC, rStarFacW, rStarFacS, |
|
./model/src/calc_r_star.F |
188 |
CALC_R_STAR |
IF ( rStarFacC(i,j,bi,bj).LT.hFacInf ) THEN |
|
./model/src/calc_r_star.F |
197 |
CALC_R_STAR |
IF ( rStarFacC(i,j,bi,bj).GT.hFacSup ) THEN |
|
./model/src/calc_r_star.F |
199 |
CALC_R_STAR |
maxhFacC = max(rStarFacC(i,j,bi,bj),maxhFacC) |
|
./model/src/calc_r_star.F |
208 |
CALC_R_STAR |
IF ( rStarFacC(i,j,bi,bj).LT.hFacInf ) THEN |
|
./model/src/calc_r_star.F |
211 |
CALC_R_STAR |
& rStarFacC(i,j,bi,bj), |
|
./model/src/calc_r_star.F |
262 |
CALC_R_STAR |
_EXCH_XY_RL( rStarFacC, myThid ) |
|
./model/src/calc_r_star.F |
281 |
CALC_R_STAR |
IF (kSurfC(1-i,1-j,bi,bj).GT.Nr) rStarFacC(1-i,1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
282 |
CALC_R_STAR |
IF (kSurfC(ii, 1-j,bi,bj).GT.Nr) rStarFacC(ii, 1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
283 |
CALC_R_STAR |
IF (kSurfC(1-i,jj, bi,bj).GT.Nr) rStarFacC(1-i,jj, bi,bj)= 1. |
|
./model/src/calc_r_star.F |
284 |
CALC_R_STAR |
IF (kSurfC(ii, jj, bi,bj).GT.Nr) rStarFacC(ii, jj, bi,bj)= 1. |
|
./model/src/calc_r_star.F |
303 |
CALC_R_STAR |
rStarDhCDt(i,j,bi,bj)=(rStarFacC(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
309 |
CALC_R_STAR |
rStarExpC(i,j,bi,bj) = rStarFacC(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
321 |
CALC_R_STAR |
pStarFacK(i,j,bi,bj) = rStarFacC(i,j,bi,bj)**atm_kappa |
|
./model/src/calc_r_star.F |
85 |
CALC_R_STAR |
rStarFacNm1C(i,j,bi,bj) = rStarFacC(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
96 |
CALC_R_STAR |
rStarExpC(i,j,bi,bj) = rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_hyd.F |
102 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_hyd.F |
104 |
DIAGS_PHI_HYD |
& *( rStarFacC(i,j,bi,bj) - 1. _d 0 ) |
|
./model/src/diags_phi_hyd.F |
114 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_hyd.F |
116 |
DIAGS_PHI_HYD |
& *( rStarFacC(i,j,bi,bj) - 1. _d 0 ) |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
77 |
OCN_STORE_MY_DATA |
& h0FacC(i,j,1,bi,bj)*rStarFacC(i,j,bi,bj)*drF(1) |
|
./model/src/diags_phi_rlow.F |
162 |
DIAGS_PHI_RLOW |
& phiHydLow(i,j,bi,bj)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_rlow.F |
163 |
DIAGS_PHI_RLOW |
& + dPhiRef*( rStarFacC(i,j,bi,bj) - 1. _d 0 ) |
|
./model/src/diags_phi_rlow.F |
175 |
DIAGS_PHI_RLOW |
& phiHydLow(i,j,bi,bj)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_rlow.F |
176 |
DIAGS_PHI_RLOW |
& + dPhiRef*( rStarFacC(i,j,bi,bj) - 1. _d 0 ) |
|
./pkg/thsice/thsice_get_ocean.F |
69 |
THSICE_GET_OCEAN |
& *rStarFacC(i,j,bi,bj) |
|
./model/src/ini_nlfs_vars.F |
87 |
INI_NLFS_VARS |
rStarFacC(i,j,bi,bj) = 1. |
|
./model/src/reset_nlfs_vars.F |
54 |
RESET_NLFS_VARS |
pStarFacK(i,j,bi,bj) = rStarFacC(i,j,bi,bj)**atm_kappa |
|
./model/src/update_r_star.F |
59 |
UPDATE_R_STAR |
& *rStarFacC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
115 |
AIM_DYN2AIM |
dpFac(I2,Katm) = h0FacC(i,j,k,bi,bj)*rStarFacC(i,j,bi,bj) |
|
./pkg/atm2d/get_ocnvars.F |
84 |
GET_OCNVARS |
& h0FacC(i,j,1,1,1)*rStarFacC(i,j,1,1)*drF(1) |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
78 |
ATM_PHYS_DYN2PHYS |
& *rStarFacC(1:sNx,1:sNy,bi,bj) |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
83 |
ATM_PHYS_DYN2PHYS |
& *rStarFacC(1:sNx,1:sNy,bi,bj) |