| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1549 |
TRBFLX |
_RL KM(irun,nlev), KH(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2018 |
TRBFLX |
7 KH(1,NLEV),KM(1,NLEV),USTAR, |
|
./pkg/fizhi/fizhi_turb.F |
2258 |
TRBFLX |
KH(I,L) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2298 |
TRBFLX |
1 KM(1,LMIN),KH(1,LMIN),QE(1,LMIN),QQE(1,LMIN),IBITSTB(1,LMIN), |
|
./pkg/fizhi/fizhi_turb.F |
2362 |
TRBFLX |
KH(I,L) = TEMP(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2380 |
TRBFLX |
1 IBITSTB(1,LMINQ),INTQ(1,LMINQ),KM(1,LMINQ),KH(1,LMINQ), |
|
./pkg/fizhi/fizhi_turb.F |
2480 |
TRBFLX |
KHSAVE(I,L) = KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2496 |
TRBFLX |
KH(I,L) = KHBG |
|
./pkg/fizhi/fizhi_turb.F |
2516 |
TRBFLX |
KH(I,L)=XQ(I,L)*KH(I,L)+KHBG |
|
./pkg/fizhi/fizhi_turb.F |
2544 |
TRBFLX |
TEMP(I,L) = RHOZPK(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2575 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2699 |
TRBFLX |
ET(I,L) = ET(I,L) + AITR*KH(I,L) |
|
./pkg/zonal_filt/fftpack.F |
1732 |
R8FFTF1 |
KH = NF-K1 |
|
./pkg/zonal_filt/fftpack.F |
1733 |
R8FFTF1 |
IP = IFAC(KH+3) |
|
./pkg/zonal_filt/fftpack.F |
821 |
RFFTF1 |
KH = NF-K1 |
|
./pkg/zonal_filt/fftpack.F |
822 |
RFFTF1 |
IP = IFAC(KH+3) |