| File |
Line number |
Procedure |
Code |
|
./pkg/pp81/PP81.h |
54 |
NO PROCEDURE |
_RL PPdiffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/pp81/PP81.h |
55 |
NO PROCEDURE |
COMMON /PP_FIELDS/ PPviscAr, PPdiffKr |
|
./pkg/pp81/pp81_calc.F |
106 |
PP81_CALC |
PPdiffKr(I,J,K,bi,bj) = MAX(PPdiffMin,PPdiffKr(I,J,K,bi,bj)) |
|
./pkg/pp81/pp81_calc.F |
116 |
PP81_CALC |
PPdiffKr(I,J,K,bi,bj) = PPdiffKr(I,J,K,bi,bj) |
|
./pkg/pp81/pp81_calc.F |
86 |
PP81_CALC |
PPdiffKr(I,J,K,bi,bj) = MAX(PPviscAr(I,J,K,bi,bj)/denom, |
|
./pkg/pp81/pp81_calc_diff.F |
56 |
PP81_CALC_DIFF |
& +( PPdiffKr(i,j,k,bi,bj) |
|
./pkg/pp81/pp81_calc_diff.F |
71 |
PP81_CALC_DIFF |
& +( PPdiffKr(i,j,kArg,bi,bj) |
|
./pkg/pp81/pp81_init_varia.F |
43 |
PP81_INIT_VARIA |
PPdiffKr (i,j,k,bi,bj) = diffKrNrS(k) |
|
./pkg/pp81/pp81_output.F |
121 |
PP81_OUTPUT |
CALL TIMEAVE_CUMULATE( PPdiffKrtave, PPdiffKr, |
|
./pkg/pp81/pp81_output.F |
176 |
PP81_OUTPUT |
CALL DIAGNOSTICS_FILL(PPdiffKr,'PPdiffKr',0,Nr,0,1,1,myThid) |
|
./pkg/pp81/pp81_output.F |
91 |
PP81_OUTPUT |
CALL WRITE_FLD_XYZ_RL('PPdiffKr.',suff,PPdiffKr, |