| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1379 |
TRBFLX |
_RL KM(irun,nlev), KH(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1766 |
TRBFLX |
7 KH(1,NLEV),KM(1,NLEV),USTAR, |
|
./pkg/fizhi/fizhi_turb.F |
1920 |
TRBFLX |
KH(I,L) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
1960 |
TRBFLX |
1 KM(1,LMIN),KH(1,LMIN),QE(1,LMIN),QQE(1,LMIN),IBITSTB(1,LMIN), |
|
./pkg/fizhi/fizhi_turb.F |
1997 |
TRBFLX |
KH(I,L) = TEMP(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2015 |
TRBFLX |
1 IBITSTB(1,LMINQ),INTQ(1,LMINQ),KM(1,LMINQ),KH(1,LMINQ), |
|
./pkg/fizhi/fizhi_turb.F |
2091 |
TRBFLX |
KHSAVE(I,L) = KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2103 |
TRBFLX |
KH(I,L) = KHBG |
|
./pkg/fizhi/fizhi_turb.F |
2116 |
TRBFLX |
KH(I,L)=XQ(I,L)*KH(I,L)+KHBG |
|
./pkg/fizhi/fizhi_turb.F |
2138 |
TRBFLX |
TEMP(I,L) = RHOZPK(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2163 |
TRBFLX |
RHOKDZ(I,L) = RHODZ2(I,L) * KH(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
2263 |
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) |