| File |
Line number |
Procedure |
Code |
|
./pkg/my82/my82_do_diags.F |
105 |
MY82_DO_DIAGS |
CALL WRITE_FLD_XYZ_RL('MYdiffKr.',suff,MYdiffKr, |
|
./pkg/my82/my82_do_diags.F |
150 |
MY82_DO_DIAGS |
& MYdiffKrtave,MYdiffKr,Nr,DDTT,bi,bj,myThid) |
|
./pkg/my82/my82_do_diags.F |
222 |
MY82_DO_DIAGS |
& MYdiffKrtave,MYdiffKr,Nr,DDTT,bi,bj,myThid) |
|
./pkg/my82/my82_do_diags.F |
84 |
MY82_DO_DIAGS |
CALL PLOT_FIELD_XYZRL ( MYdiffKr, 'MYdiffKr', |
|
./pkg/my82/my82_do_diags.F |
94 |
MY82_DO_DIAGS |
CALL WRITE_REC_XYZ_RL('MYdiffKr',MYdiffKr,my_drctrec, |
|
./pkg/my82/my82_calc_diff.F |
54 |
MY82_CALC_DIFF |
& +( MYdiffKr(i,j,k,bi,bj) |
|
./pkg/my82/my82_calc_diff.F |
69 |
MY82_CALC_DIFF |
& +( MYdiffKr(i,j,kArg,bi,bj) |
|
./pkg/my82/my82_init.F |
55 |
MY82_INIT |
MYdiffKr (i,j,k,bi,bj) = diffKrNrT(k) |
|
./pkg/my82/MY82.h |
59 |
NO PROCEDURE |
_RL MYdiffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/my82/MY82.h |
60 |
NO PROCEDURE |
COMMON /MY_FIELDS/ MYhbl, MYviscAr, MYdiffKr |
|
./pkg/my82/my82_calc.F |
167 |
MY82_CALC |
MYdiffKr(I,J,K,bi,bj) = MYhbl(I,J,bi,bj)*tkel*SH(I,J,K) |
|
./pkg/my82/my82_calc.F |
170 |
MY82_CALC |
MYdiffKr(I,J,K,bi,bj) = MAX(MYdiffKr(I,J,K,bi,bj), |
|
./pkg/my82/my82_calc.F |
175 |
MY82_CALC |
MYdiffKr(I,J,K,bi,bj) = MIN(MYdiffKr(I,J,K,bi,bj),MYdiffMax) |