| File |
Line number |
Procedure |
Code |
|
./pkg/ggl90/ggl90_calc_visc.F |
32 |
GGL90_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/ggl90/ggl90_calc_visc.F |
56 |
GGL90_CALC_VISC |
KappaRV(i,j,k) = KappaRV(i,j,k) + _maskS(i,j,k,bi,bj) * |
|
./pkg/ggl90/ggl90_calc_visc.F |
8 |
GGL90_CALC_VISC |
U KappaRU,KappaRV, |
|
./pkg/kl10/kl10_calc_visc.F |
33 |
KL10_CALC_VISC |
_RL KappaRV(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/kl10/kl10_calc_visc.F |
52 |
KL10_CALC_VISC |
KappaRV(i,j,k) = max ( KappaRV(i,j,k), |
|
./pkg/kl10/kl10_calc_visc.F |
53 |
KL10_CALC_VISC |
& KappaRV(i,j,k) - viscArNr(k) + _maskS(i,j,k,bi,bj) * |
|
./pkg/kl10/kl10_calc_visc.F |
7 |
KL10_CALC_VISC |
U KappaRU,KappaRV, |
|
./pkg/kpp/kpp_calc_visc.F |
31 |
KPP_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/kpp/kpp_calc_visc.F |
48 |
KPP_CALC_VISC |
KappaRV(i,j,k) = max ( KappaRV(i,j,k), |
|
./pkg/kpp/kpp_calc_visc.F |
49 |
KPP_CALC_VISC |
& KappaRV(i,j,k) - viscArNr(1) + _maskS(i,j,k,bi,bj) * |
|
./pkg/kpp/kpp_calc_visc.F |
8 |
KPP_CALC_VISC |
U KappaRU,KappaRV, |
|
./pkg/mom_common/mom_v_rviscflux.F |
12 |
MOM_V_RVISCFLUX |
I vFld, KappaRV, |
|
./pkg/mom_common/mom_v_rviscflux.F |
38 |
MOM_V_RVISCFLUX |
_RL KappaRV(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/mom_common/mom_v_rviscflux.F |
61 |
MOM_V_RVISCFLUX |
& -KappaRV(i,j,k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
760 |
MOM_FLUXFORM |
CALL MOM_V_RVISCFLUX( bi,bj, k, vVel,KappaRV,fVrUp,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
761 |
MOM_FLUXFORM |
CALL MOM_V_RVISCFLUX( bi,bj,k+1,vVel,KappaRV,fVrDw,myThid ) |
|
./pkg/my82/my82_calc_visc.F |
30 |
MY82_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/my82/my82_calc_visc.F |
49 |
MY82_CALC_VISC |
KappaRV(i,j,k) = max ( KappaRV(i,j,k), |
|
./pkg/my82/my82_calc_visc.F |
50 |
MY82_CALC_VISC |
& KappaRV(i,j,k) - viscArNr(k) + _maskS(i,j,k,bi,bj) * |
|
./pkg/my82/my82_calc_visc.F |
7 |
MY82_CALC_VISC |
U KappaRU,KappaRV, |
|
./pkg/pp81/pp81_calc_visc.F |
33 |
PP81_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/pp81/pp81_calc_visc.F |
52 |
PP81_CALC_VISC |
KappaRV(i,j,k) = max ( KappaRV(i,j,k), |
|
./pkg/pp81/pp81_calc_visc.F |
53 |
PP81_CALC_VISC |
& KappaRV(i,j,k) - viscArNr(k) + _maskS(i,j,k,bi,bj) * |
|
./pkg/pp81/pp81_calc_visc.F |
7 |
PP81_CALC_VISC |
U KappaRU,KappaRV, |