| File |
Line number |
Procedure |
Code |
|
./model/src/do_oceanic_phys.F |
212 |
DO_OCEANIC_PHYS |
VisbeckK(i,j,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_init.F |
63 |
GMREDI_INIT |
VisbeckK(i,j,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_xtransport.F |
106 |
GMREDI_XTRANSPORT |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj)) |
|
./pkg/gmredi/GMREDI.h |
102 |
NO PROCEDURE |
_RL VisbeckK(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/gmredi/GMREDI.h |
103 |
NO PROCEDURE |
COMMON /GM_Visbeck/ VisbeckK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
251 |
GMREDI_CALC_TENSOR |
IF (K.eq.2) VisbeckK(i,j,bi,bj)=0. |
|
./pkg/gmredi/gmredi_calc_tensor.F |
255 |
GMREDI_CALC_TENSOR |
VisbeckK(i,j,bi,bj)=VisbeckK(i,j,bi,bj)+deltaH |
|
./pkg/gmredi/gmredi_calc_tensor.F |
276 |
GMREDI_CALC_TENSOR |
VisbeckK(i,j,bi,bj)= |
|
./pkg/gmredi/gmredi_calc_tensor.F |
277 |
GMREDI_CALC_TENSOR |
& MIN(VisbeckK(i,j,bi,bj),GM_Visbeck_maxval_K) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
312 |
GMREDI_CALC_TENSOR |
& + VisbeckK(i,j,bi,bj)*(1. _d 0 + GM_skewflx) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
318 |
GMREDI_CALC_TENSOR |
& + VisbeckK(i,j,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
371 |
GMREDI_CALC_TENSOR |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
401 |
GMREDI_CALC_TENSOR |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))*GM_advect |
|
./pkg/gmredi/gmredi_calc_tensor.F |
452 |
GMREDI_CALC_TENSOR |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
482 |
GMREDI_CALC_TENSOR |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj))*GM_advect |
|
./pkg/gmredi/gmredi_calc_tensor.F |
518 |
GMREDI_CALC_TENSOR |
CALL TIMEAVE_CUMULATE( Visbeck_K_T, VisbeckK, 1, |
|
./pkg/gmredi/gmredi_calc_tensor.F |
542 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(VisbeckK,'GM_VisbK',0,1,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
83 |
GMREDI_CALC_TENSOR |
VisbeckK(i,j,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_ytransport.F |
106 |
GMREDI_YTRANSPORT |
& +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
130 |
GMREDI_CALC_PSI_B |
& +op5*(VisbeckK(i-1,j,bi,bj)+VisbeckK(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
140 |
GMREDI_CALC_PSI_B |
& +op5*(VisbeckK(i,j-1,bi,bj)+VisbeckK(i,j,bi,bj)) |