| File |
Line number |
Procedure |
Code |
|
./model/src/calc_gw.F |
15 |
CALC_GW |
I bi, bj, kappaRU, kappaRV, |
|
./model/src/calc_gw.F |
408 |
CALC_GW |
viscLoc = ( kappaRU(i,j,k) +kappaRU(i+1,j,k) |
|
./model/src/calc_gw.F |
409 |
CALC_GW |
& +kappaRU(i,j,k+1)+kappaRU(i+1,j,k+1) |
|
./model/src/calc_gw.F |
428 |
CALC_GW |
viscLoc = ( kappaRU(i,j,k) + kappaRU(i+1,j,k) |
|
./model/src/calc_gw.F |
59 |
CALC_GW |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./model/src/calc_viscosity.F |
106 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./model/src/calc_viscosity.F |
116 |
CALC_VISCOSITY |
kappaRU(i,j,k) = kappaRU(i,j,ki) |
|
./model/src/calc_viscosity.F |
12 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./model/src/calc_viscosity.F |
137 |
CALC_VISCOSITY |
kappaRU(i,j,k) = kappaRU(i,j,k) |
|
./model/src/calc_viscosity.F |
203 |
CALC_VISCOSITY |
kappaRU(i,j,k) = MAX( kappaRU(i,j,k), |
|
./model/src/calc_viscosity.F |
294 |
CALC_VISCOSITY |
kappaRU(i,j,k) = MAX( kappaRU(i,j,k), |
|
./model/src/calc_viscosity.F |
40 |
CALC_VISCOSITY |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./model/src/calc_viscosity.F |
61 |
CALC_VISCOSITY |
kappaRU(i,j,k) = viscArNr(ki) |
|
./model/src/calc_viscosity.F |
70 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./model/src/calc_viscosity.F |
79 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./model/src/calc_viscosity.F |
88 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./model/src/calc_viscosity.F |
97 |
CALC_VISCOSITY |
O kappaRU, kappaRV, |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
121 |
MOM_U_BOTDRAG_IMPL |
& *( kappaRU(i,j,kLowF)*recDrC*viscFac |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
132 |
MOM_U_BOTDRAG_IMPL |
& *( kappaRU(i,j,kLowF)*recDrC*viscFac |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
14 |
MOM_U_BOTDRAG_IMPL |
I uFld, vFld, kappaRU, |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
44 |
MOM_U_BOTDRAG_IMPL |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./pkg/mom_common/mom_u_bottomdrag.F |
117 |
MOM_U_BOTTOMDRAG |
& *( kappaRU(i,j,kLowF)*recDrC*viscFac |
|
./pkg/mom_common/mom_u_bottomdrag.F |
128 |
MOM_U_BOTTOMDRAG |
& *( kappaRU(i,j,kLowF)*recDrC*viscFac |
|
./pkg/mom_common/mom_u_bottomdrag.F |
15 |
MOM_U_BOTTOMDRAG |
I uFld, vFld, KE, kappaRU, |
|
./pkg/mom_common/mom_u_bottomdrag.F |
47 |
MOM_U_BOTTOMDRAG |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
10 |
MOM_U_IMPLICIT_R |
I kappaRU, |
|
./pkg/mom_common/mom_u_implicit_r.F |
112 |
MOM_U_IMPLICIT_R |
& *kappaRU(i,j,k+1)*recip_drC(k+1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
135 |
MOM_U_IMPLICIT_R |
I kappaRU, |
|
./pkg/mom_common/mom_u_implicit_r.F |
299 |
MOM_U_IMPLICIT_R |
& * kappaRU(i,j,k)*recip_drC(k)*rkSign |
|
./pkg/mom_common/mom_u_implicit_r.F |
32 |
MOM_U_IMPLICIT_R |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
99 |
MOM_U_IMPLICIT_R |
& *kappaRU(i,j, k )*recip_drC( k ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
42 |
MOM_FLUXFORM |
I kappaRU, kappaRV, |
|
./pkg/mom_fluxform/mom_fluxform.F |
528 |
MOM_FLUXFORM |
CALL MOM_U_RVISCFLUX( bi,bj, k, uVel,kappaRU,fVrUp,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
529 |
MOM_FLUXFORM |
CALL MOM_U_RVISCFLUX( bi,bj,k+1,uVel,kappaRU,fVrDw,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
579 |
MOM_FLUXFORM |
I uFld, vFld, KE, kappaRU, |
|
./pkg/mom_fluxform/mom_fluxform.F |
592 |
MOM_FLUXFORM |
I uFld, vFld, KE, kappaRU, |
|
./pkg/mom_fluxform/mom_fluxform.F |
88 |
MOM_FLUXFORM |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./pkg/mom_vecinv/mom_vecinv.F |
14 |
MOM_VECINV |
I kappaRU, kappaRV, |
|
./pkg/mom_vecinv/mom_vecinv.F |
448 |
MOM_VECINV |
CALL MOM_U_RVISCFLUX(bi,bj,k+1,uVel,kappaRU,vrF,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
493 |
MOM_VECINV |
I uFld, vFld, KE, kappaRU, |
|
./pkg/mom_vecinv/mom_vecinv.F |
505 |
MOM_VECINV |
I uFld, vFld, KE, kappaRU, |
|
./pkg/mom_vecinv/mom_vecinv.F |
75 |
MOM_VECINV |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./model/src/dynamics.F |
153 |
DYNAMICS |
_RL kappaRU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./model/src/dynamics.F |
372 |
DYNAMICS |
kappaRU(i,j,k) = 0. _d 0 |
|
./model/src/dynamics.F |
385 |
DYNAMICS |
O kappaRU, kappaRV, |
|
./model/src/dynamics.F |
528 |
DYNAMICS |
I kappaRU, kappaRV, |
|
./model/src/dynamics.F |
538 |
DYNAMICS |
I kappaRU, kappaRV, |
|
./model/src/dynamics.F |
585 |
DYNAMICS |
CALL MOM_U_IMPLICIT_R( kappaRU, |
|
./model/src/dynamics.F |
598 |
DYNAMICS |
I -1, kappaRU, recip_hFacW(1-OLx,1-OLy,1,bi,bj), |
|
./model/src/dynamics.F |
630 |
DYNAMICS |
I 0, kappaRU, recip_hFacW(1-OLx,1-OLy,1,bi,bj), |
|
./model/src/dynamics.F |
655 |
DYNAMICS |
I bi,bj, kappaRU, kappaRV, |
|
./pkg/shelfice/shelfice_u_drag.F |
12 |
SHELFICE_U_DRAG |
I uFld, vFld, KE, kappaRU, |
|
./pkg/shelfice/shelfice_u_drag.F |
43 |
SHELFICE_U_DRAG |
_RL kappaRU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1) |
|
./pkg/shelfice/shelfice_u_drag.F |
80 |
SHELFICE_U_DRAG |
& * kappaRU(i,j,kUpC)*rdrckp1*viscFac |