| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1151 |
RAS |
_RL TX1(lng), TX2(lng), TX3(lng), TX4(lng), TX5(lng) |
|
./pkg/fizhi/fizhi_moist.F |
1242 |
RAS |
*, TX1, TX2, TX3, TX4, TX5, TX6, TX7, TX8, TX9 |
|
./pkg/fizhi/fizhi_moist.F |
1446 |
CLOUD |
*, TX1, TX2, TX3, TX4, TX5, TX6, TX7, TX8, ALM |
|
./pkg/fizhi/fizhi_moist.F |
1587 |
CLOUD |
_RL TX5(LENC), TX6(LENC), TX7(LENC), TX8(LENC) |
|
./pkg/fizhi/fizhi_moist.F |
1638 |
CLOUD |
TX5(I) = POI(I,L) * PRH(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
1640 |
CLOUD |
TX3(I) = TX5(I) |
|
./pkg/fizhi/fizhi_moist.F |
1642 |
CLOUD |
ALF(I,L) = TX2(I) - TX4(I) * TX5(I) |
|
./pkg/fizhi/fizhi_moist.F |
1891 |
CLOUD |
TX5(I) = TEM - TEM1 * ALHL |
|
./pkg/fizhi/fizhi_moist.F |
1967 |
CLOUD |
TX1(I) = TX1(I) + (TX5(I)-TX3(I)+QOL(II,IC)*ALHL)*(PRI(II,IC)/CP) |
|
./pkg/fizhi/fizhi_moist.F |
2009 |
CLOUD |
* * (TX7(I) - TX8(I) - TX5(I) - QOL(I1(I),IC)*ALHL) |
|
./pkg/fizhi/fizhi_moist.F |
2048 |
CLOUD |
TX5(I) = 0.5 * (PRS(II,IC1) + PRS(II,IC+2)) |
|
./pkg/fizhi/fizhi_moist.F |
2050 |
CLOUD |
IF ((TX2(I) .GE. TX1(I)) .AND. (TX2(I) .LT. TX5(I))) THEN |
|
./pkg/fizhi/fizhi_moist.F |
2051 |
CLOUD |
TX6(I) = ONE - (TX2(I) - TX1(I)) / (TX5(I) - TX1(I)) |
|
./pkg/fizhi/fizhi_moist.F |
2094 |
CLOUD |
TX5(I) = WFN(I) * ONEBCP |
|
./pkg/fizhi/fizhi_moist.F |
2124 |
CLOUD |
TEM1 = HOL(I,L) * TX5(I) |
|
./pkg/fizhi/fizhi_moist.F |
2146 |
CLOUD |
TEM = half*TX5(I) * PRI(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
2156 |
CLOUD |
TEM = half*TX5(I) * PRI(II,L) |
|
./pkg/fizhi/fizhi_moist.F |
2169 |
CLOUD |
TEM = half*TX5(I) * PRI(II,IC) |