| File |
Line number |
Procedure |
Code |
|
./model/inc/NH_VARS.h |
31 |
NO PROCEDURE |
& viscAh_W, viscA4_W |
|
./model/inc/NH_VARS.h |
36 |
NO PROCEDURE |
& viscAh_W, viscA4_W |
|
./model/inc/NH_VARS.h |
46 |
NO PROCEDURE |
_RL viscAh_W(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/mom_common/mom_calc_visc.F |
472 |
MOM_CALC_VISC |
viscAh_W(i,j,kp1,bi,bj)=0.5*viscAh_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
476 |
MOM_CALC_VISC |
viscAh_W(i,j,k,bi,bj)=viscAh_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
480 |
MOM_CALC_VISC |
viscAh_W(i,j,k,bi,bj)=viscAh_W(i,j,k,bi,bj)+0.5*viscAh_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
485 |
MOM_CALC_VISC |
viscAh_W(i,j,kp1,bi,bj)=0.5*viscAh_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
489 |
MOM_CALC_VISC |
viscAh_W(i,j,k,bi,bj)=viscAh_W(i,j,k,bi,bj)+0.5*viscAh_D(i,j) |
|
./pkg/mom_common/mom_w_sidedrag.F |
103 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
117 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
14 |
MOM_W_SIDEDRAG |
I viscAh_W, viscA4_W, |
|
./pkg/mom_common/mom_w_sidedrag.F |
47 |
MOM_W_SIDEDRAG |
_RL viscAh_W(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/mom_common/mom_w_sidedrag.F |
83 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
|
./pkg/mom_common/mom_w_sidedrag.F |
93 |
MOM_W_SIDEDRAG |
& *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj) |
|
./model/src/calc_gw.F |
335 |
CALC_GW |
& - (viscAh_W(i,j,k,bi,bj)+viscAh_W(i-1,j,k,bi,bj))*halfRL |
|
./model/src/calc_gw.F |
353 |
CALC_GW |
& - (viscAh_W(i,j,k,bi,bj)+viscAh_W(i,j-1,k,bi,bj))*halfRL |
|
./model/src/calc_gw.F |
431 |
CALC_GW |
I viscAh_W, viscA4_W, |
|
./model/src/calc_gw.F |
623 |
CALC_GW |
CALL DIAGNOSTICS_FILL(viscAh_W,'VISCAHW ',0,Nr,1,bi,bj,myThid) |
|
./model/src/ini_nh_fields.F |
129 |
INI_NH_FIELDS |
viscAh_W(i,j,k,bi,bj) = viscAhW |
|
./model/src/ini_nh_vars.F |
62 |
INI_NH_VARS |
viscAh_W(i,j,k,bi,bj)= 0. _d 0 |