| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
672 |
KPP_CALC |
KPPdiffKzT(i,j,k,bi,bj)= vddiff(i,j,k-1,3) * maskC(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_calc.F |
681 |
KPP_CALC |
_EXCH_XYZ_R8(KPPdiffKzT , myThid ) |
|
./pkg/kpp/kpp_calc.F |
704 |
KPP_CALC |
U KPPdiffKzT(1-OLx,1-OLy,k,bi,bj) ) |
|
./pkg/kpp/kpp_calc.F |
707 |
KPP_CALC |
_EXCH_XYZ_R8(KPPdiffKzT , myThid ) |
|
./pkg/kpp/kpp_calc.F |
778 |
KPP_CALC_DUMMY |
KPPdiffKzT(i,j,k,bi,bj) = diffKrNrT(k) |
|
./pkg/kpp/kpp_do_diags.F |
112 |
KPP_DO_DIAGS |
CALL WRITE_FLD_XYZ_RL('KPPdiffKzT.',suff,KPPdiffKzT, |
|
./pkg/kpp/kpp_do_diags.F |
132 |
KPP_DO_DIAGS |
& 'KPPdiffKzT', KPPdiffKzT, myThid) |
|
./pkg/kpp/kpp_do_diags.F |
177 |
KPP_DO_DIAGS |
& KPPdiffKzTtave,KPPdiffKzT,Nr,DDTT,bi,bj,myThid) |
|
./pkg/kpp/kpp_do_diags.F |
312 |
KPP_DO_DIAGS |
CALL DIAGNOSTICS_FILL(KPPdiffKzT,'KPPdiffT',0,Nr,0,1,1,myThid) |
|
./pkg/kpp/kpp_do_diags.F |
84 |
KPP_DO_DIAGS |
CALL PLOT_FIELD_XYZRL ( KPPdiffKzT, 'KPPdiffKzT', |
|
./pkg/kpp/kpp_do_diags.F |
97 |
KPP_DO_DIAGS |
CALL WRITE_REC_XYZ_RL('KPPdiffKzT',KPPdiffKzT,kpp_drctrec, |
|
./pkg/kpp/kpp_transport_t.F |
67 |
KPP_TRANSPORT_T |
& *( KPPdiffKzT(i,j,k,bi,bj) + tmpFac*Kwz(i,j,k,bi,bj) ) |
|
./pkg/kpp/kpp_transport_t.F |
82 |
KPP_TRANSPORT_T |
& *KPPdiffKzT(i,j,k,bi,bj) |
|
./pkg/kpp/KPP.h |
32 |
NO PROCEDURE |
_RL KPPdiffKzT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/kpp/KPP.h |
36 |
NO PROCEDURE |
COMMON /kpp/ KPPviscAz, KPPdiffKzT, KPPdiffKzS |
|
./pkg/kpp/kpp_init.F |
141 |
KPP_INIT |
KPPdiffKzT (i,j,k,bi,bj) = diffKrNrT(k) |
|
./pkg/kpp/kpp_calc_diff_t.F |
54 |
KPP_CALC_DIFF_T |
& + ( KPPdiffKzT(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_calc_diff_t.F |
69 |
KPP_CALC_DIFF_T |
& + ( KPPdiffKzT(i,j,kArg,bi,bj) |
|
./pkg/kpp/kpp_calc_diff_s.F |
69 |
KPP_CALC_DIFF_S |
& + ( KPPdiffKzT(i,j,kArg,bi,bj) |