| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1386 |
TRBFLX |
_RL VKZE (irun,nlev-1), VKZM (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1591 |
TRBFLX |
VKZE(I,NLEVM1) = TEMP(I,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1597 |
TRBFLX |
VKZE(I,L) = VKZE(I,LP1) + TEMP(I,LP1) |
|
./pkg/fizhi/fizhi_turb.F |
1602 |
TRBFLX |
VKZM(I,L) = VKZE(I,L) - 0.5 * TEMP(I,L+1) |
|
./pkg/fizhi/fizhi_turb.F |
1952 |
TRBFLX |
CALL TRBLEN(STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL,QXLM, |
|
./pkg/fizhi/fizhi_turb.F |
1973 |
TRBFLX |
CALL TRBLEN(STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL,QXLM, |
|
./pkg/fizhi/fizhi_turb.F |
3338 |
TRBLEN |
SUBROUTINE TRBLEN (STRT,DW2,DZ3,Q,VKZE,VKZM,DTHV,DPK,DU,DV,XL, |
|
./pkg/fizhi/fizhi_turb.F |
3377 |
TRBLEN |
_RL Q(irun,NLEV),VKZM(irun,NLEV-1),VKZE(irun,NLEV-1) |
|
./pkg/fizhi/fizhi_turb.F |
3582 |
TRBLEN |
XL(I,L) = XL0(I,L) * VKZE(I,L) / ( XL0(I,L)+VKZE(I,L) ) |