| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1480 |
TRBFLX |
_RL DZ3(irun,nlev), TEMP(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1690 |
TRBFLX |
TEMP(I,2) = VK * ADZ1(I,2) |
|
./pkg/fizhi/fizhi_turb.F |
1693 |
TRBFLX |
VKZE(I,NLEVM1) = TEMP(I,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
1699 |
TRBFLX |
VKZE(I,L) = VKZE(I,LP1) + TEMP(I,LP1) |
|
./pkg/fizhi/fizhi_turb.F |
1703 |
TRBFLX |
VKZM(I,1) = VKZE(I,1) - 0.5 * TEMP(I,2) |
|
./pkg/fizhi/fizhi_turb.F |
1718 |
TRBFLX |
TEMP(I,1) = PLKE(I,2) * ADZ2(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1719 |
TRBFLX |
RHODZ2(I,1) = TEMP(I,1) * RHODZ2(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1723 |
TRBFLX |
TEMP(I,1) = PLK(I,2) * ADZ1(I,2) |
|
./pkg/fizhi/fizhi_turb.F |
1724 |
TRBFLX |
RHODZ1(I,1) = TEMP(I,1) * RHODZ1(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
1928 |
TRBFLX |
TEMP(I,2) = SQRT(SSDEV(I,2)) |
|
./pkg/fizhi/fizhi_turb.F |
1929 |
TRBFLX |
SVAR(I,2) = (1./2.) * (SVAR(I,2) + TEMP(I,2)) |
|
./pkg/fizhi/fizhi_turb.F |
2063 |
TRBFLX |
TEMP(I,LMIN) = Q(I,LMIN) / QE(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2064 |
TRBFLX |
KH(I,LMIN) = TEMP(I,LMIN) * KH(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2065 |
TRBFLX |
KM(I,LMIN) = TEMP(I,LMIN) * KM(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2067 |
TRBFLX |
TEMP(I,LMIN) = 0.01 * QQE(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2069 |
TRBFLX |
1 ( QQ(I,LMIN) .LE. TEMP(I,LMIN) )) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2070 |
TRBFLX |
QQ(I,LMIN) = TEMP(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2092 |
TRBFLX |
TEMP(I,LMIN) = QQE(I,LMIN) * P3(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2097 |
TRBFLX |
1 ( XQ(I,LMIN) .LT. TEMP(I,LMIN) ) ) |
|
./pkg/fizhi/fizhi_turb.F |
2100 |
TRBFLX |
4 ( XQ(I,LMIN) .GT. TEMP(I,LMIN) ) ) ) |
|
./pkg/fizhi/fizhi_turb.F |
2190 |
TRBFLX |
TEMP(I,1) = RHOZPK(I,1) * KH(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
2198 |
TRBFLX |
CALL TRBDIF(TH,DELTH,TEMP,FLXFPK,DTHS,DELTHS,NLEV,2,0. _d 0,irun) |
|
./pkg/fizhi/fizhi_turb.F |
3122 |
PSI |
_RL PSI2(irun),TEMP(irun) |
|
./pkg/fizhi/fizhi_turb.F |
3314 |
PSI |
TEMP(I) = ARG1(I) + CM5 * ARG0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3330 |
PSI |
PSI2(I) = TEMP(I) + CM6 * ARG1(I) |
|
./pkg/fizhi/fizhi_turb.F |
3359 |
PSI |
TEMP(I) = TEMP(I) + CM8 |
|
./pkg/fizhi/fizhi_turb.F |
3362 |
PSI |
PSI2(I) = TEMP(I) + ARG0(I) * ARG1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4437 |
ZCSUB |
_RL AA(IRUN,5),TEMP(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4507 |
ZCSUB |
TEMP(I) = AA(I,1) / VUSTAR(I) |
|
./pkg/fizhi/fizhi_turb.F |
4508 |
ZCSUB |
VZSEA(I) = VZSEA(I) + TEMP(I) |
|
./pkg/fizhi/fizhi_turb.F |
4518 |
ZCSUB |
VDZSEA(I) = VDZSEA(I) * VUSTAR(I) - TEMP(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1480 |
TRBFLX |
_RL DZ3(irun,nlev), TEMP(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1690 |
TRBFLX |
TEMP(I,2) = VK * ADZ1(I,2) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1693 |
TRBFLX |
VKZE(I,NLEVM1) = TEMP(I,NLEV) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1699 |
TRBFLX |
VKZE(I,L) = VKZE(I,LP1) + TEMP(I,LP1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1703 |
TRBFLX |
VKZM(I,1) = VKZE(I,1) - 0.5 * TEMP(I,2) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1718 |
TRBFLX |
TEMP(I,1) = PLKE(I,2) * ADZ2(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1719 |
TRBFLX |
RHODZ2(I,1) = TEMP(I,1) * RHODZ2(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1723 |
TRBFLX |
TEMP(I,1) = PLK(I,2) * ADZ1(I,2) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1724 |
TRBFLX |
RHODZ1(I,1) = TEMP(I,1) * RHODZ1(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1928 |
TRBFLX |
TEMP(I,2) = SQRT(SSDEV(I,2)) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1929 |
TRBFLX |
SVAR(I,2) = (1./2.) * (SVAR(I,2) + TEMP(I,2)) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2063 |
TRBFLX |
TEMP(I,LMIN) = Q(I,LMIN) / QE(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2064 |
TRBFLX |
KH(I,LMIN) = TEMP(I,LMIN) * KH(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2065 |
TRBFLX |
KM(I,LMIN) = TEMP(I,LMIN) * KM(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2067 |
TRBFLX |
TEMP(I,LMIN) = 0.01 * QQE(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2069 |
TRBFLX |
1 ( QQ(I,LMIN) .LE. TEMP(I,LMIN) )) THEN |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2070 |
TRBFLX |
QQ(I,LMIN) = TEMP(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2092 |
TRBFLX |
TEMP(I,LMIN) = QQE(I,LMIN) * P3(I,LMIN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2097 |
TRBFLX |
1 ( XQ(I,LMIN) .LT. TEMP(I,LMIN) ) ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2100 |
TRBFLX |
4 ( XQ(I,LMIN) .GT. TEMP(I,LMIN) ) ) ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2172 |
TRBFLX |
TEMP(I,1) = RHOZPK(I,1) * KH(I,1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2180 |
TRBFLX |
CALL TRBDIF(TH,DELTH,TEMP,FLXFPK,DTHS,DELTHS,NLEV,2,0. _d 0,irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3104 |
PSI |
_RL PSI2(irun),TEMP(irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3296 |
PSI |
TEMP(I) = ARG1(I) + CM5 * ARG0(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3312 |
PSI |
PSI2(I) = TEMP(I) + CM6 * ARG1(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3341 |
PSI |
TEMP(I) = TEMP(I) + CM8 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3344 |
PSI |
PSI2(I) = TEMP(I) + ARG0(I) * ARG1(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
4419 |
ZCSUB |
_RL AA(IRUN,5),TEMP(IRUN) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
4489 |
ZCSUB |
TEMP(I) = AA(I,1) / VUSTAR(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
4490 |
ZCSUB |
VZSEA(I) = VZSEA(I) + TEMP(I) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
4500 |
ZCSUB |
VDZSEA(I) = VDZSEA(I) * VUSTAR(I) - TEMP(I) |