| File |
Line number |
Procedure |
Code |
|
./pkg/ggl90/ggl90_do_diags.F |
104 |
GGL90_DO_DIAGS |
CALL WRITE_FLD_XYZ_RL('GGL90diffKr.',suff,GGL90diffKr, |
|
./pkg/ggl90/ggl90_do_diags.F |
149 |
GGL90_DO_DIAGS |
& GGL90diffKrtave,GGL90diffKr,Nr,DDTT,bi,bj,myThid) |
|
./pkg/ggl90/ggl90_do_diags.F |
221 |
GGL90_DO_DIAGS |
& GGL90diffKrtave,GGL90diffKr,Nr,DDTT,bi,bj,myThid) |
|
./pkg/ggl90/ggl90_do_diags.F |
83 |
GGL90_DO_DIAGS |
CALL PLOT_FIELD_XYZRL ( GGL90diffKr, 'GGL90diffKr', |
|
./pkg/ggl90/ggl90_do_diags.F |
93 |
GGL90_DO_DIAGS |
CALL WRITE_REC_XYZ_RL('GGL90diffKr',GGL90diffKr,ggl90_drctrec, |
|
./pkg/ggl90/GGL90.h |
76 |
NO PROCEDURE |
_RL GGL90diffKr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/ggl90/GGL90.h |
79 |
NO PROCEDURE |
& GGL90viscAr, GGL90diffKr, |
|
./pkg/ggl90/ggl90_calc_diff.F |
54 |
GGL90_CALC_DIFF |
& +( GGL90diffKr(i,j,k,bi,bj) |
|
./pkg/ggl90/ggl90_calc_diff.F |
69 |
GGL90_CALC_DIFF |
& +( GGL90diffKr(i,j,kArg,bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
372 |
GGL90_CALC |
GGL90diffKr(I,J,K,bi,bj) = MIN(KappaH,GGL90diffMax) |