| 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 |
47 |
NO PROCEDURE |
_RL viscA4_W(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/mom_common/mom_calc_visc.F |
473 |
MOM_CALC_VISC |
viscA4_W(i,j,kp1,bi,bj)=0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
477 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
481 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_W(i,j,k,bi,bj)+0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
486 |
MOM_CALC_VISC |
viscA4_W(i,j,kp1,bi,bj)=0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
490 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_W(i,j,k,bi,bj)+0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_w_sidedrag.F |
107 |
MOM_W_SIDEDRAG |
& -viscA4_W(i,j,k,bi,bj)*del2w(i,j) |
|
./pkg/mom_common/mom_w_sidedrag.F |
121 |
MOM_W_SIDEDRAG |
& -viscA4_W(i,j,k,bi,bj)*del2w(i,j) |
|
./pkg/mom_common/mom_w_sidedrag.F |
14 |
MOM_W_SIDEDRAG |
I viscAh_W, viscA4_W, |
|
./pkg/mom_common/mom_w_sidedrag.F |
48 |
MOM_W_SIDEDRAG |
_RL viscA4_W(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/mom_common/mom_w_sidedrag.F |
85 |
MOM_W_SIDEDRAG |
& -viscA4_W(i,j,k,bi,bj)*del2w(i,j) |
|
./pkg/mom_common/mom_w_sidedrag.F |
95 |
MOM_W_SIDEDRAG |
& -viscA4_W(i,j,k,bi,bj)*del2w(i,j) |
|
./model/src/calc_gw.F |
339 |
CALC_GW |
& + (viscA4_W(i,j,k,bi,bj)+viscA4_W(i-1,j,k,bi,bj))*halfRL |
|
./model/src/calc_gw.F |
359 |
CALC_GW |
& + (viscA4_W(i,j,k,bi,bj)+viscA4_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 |
624 |
CALC_GW |
CALL DIAGNOSTICS_FILL(viscA4_W,'VISCA4W ',0,Nr,1,bi,bj,myThid) |
|
./model/src/ini_nh_fields.F |
130 |
INI_NH_FIELDS |
viscA4_W(i,j,k,bi,bj) = viscA4W |
|
./model/src/ini_nh_vars.F |
63 |
INI_NH_VARS |
viscA4_W(i,j,k,bi,bj)= 0. _d 0 |