| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1209 |
RAS |
_RL TX1(lng), TX2(lng), TX3(lng), TX4(lng), TX5(lng) |
|
./pkg/fizhi/fizhi_moist.F |
1302 |
RAS |
*, TX1, TX2, TX3, TX4, TX5, TX6, TX7, TX8, TX9 |
|
./pkg/fizhi/fizhi_moist.F |
1506 |
CLOUD |
*, TX1, TX2, TX3, TX4, TX5, TX6, TX7, TX8, ALM |
|
./pkg/fizhi/fizhi_moist.F |
1646 |
CLOUD |
_RL TX1(LENC), TX2(LENC), TX3(LENC), TX4(LENC) |
|
./pkg/fizhi/fizhi_moist.F |
1700 |
CLOUD |
TX3(I) = TX5(I) |
|
./pkg/fizhi/fizhi_moist.F |
1701 |
CLOUD |
CALL QSAT(TX3(I), TX1(I), TX2(I), TX4(I), .TRUE.) |
|
./pkg/fizhi/fizhi_moist.F |
1765 |
CLOUD |
TX3(I ) = (PRJ(I,IC1) - PRH(I,IC)) * POI(I,IC) |
|
./pkg/fizhi/fizhi_moist.F |
1766 |
CLOUD |
ETA(I,IC) = ETA(I,IC1) + CPBG * TX3(I) |
|
./pkg/fizhi/fizhi_moist.F |
1845 |
CLOUD |
CALL ACRITN(LEN2, TX2, TX4, TX3) |
|
./pkg/fizhi/fizhi_moist.F |
1895 |
CLOUD |
* - TX3(I) |
|
./pkg/fizhi/fizhi_moist.F |
1908 |
CLOUD |
WFN(I) = WFN(I) - TX3(I) |
|
./pkg/fizhi/fizhi_moist.F |
1965 |
CLOUD |
TX3(I) = HOL(II,IC) |
|
./pkg/fizhi/fizhi_moist.F |
2039 |
CLOUD |
TX1(I) = TX1(I) + (TX5(I)-TX3(I)+QOL(II,IC)*ALHL)*(PRI(II,IC)/CP) |
|
./pkg/fizhi/fizhi_moist.F |
2058 |
CLOUD |
TX3(I) = QOL(II,KM1) - QOL(II,K) |
|
./pkg/fizhi/fizhi_moist.F |
2059 |
CLOUD |
GMH(I,K) = HOL(I,K) + TX3(I) * PRI(II,K) * (ALBCP) |
|
./pkg/fizhi/fizhi_moist.F |
2063 |
CLOUD |
TX3(I) = zero |
|
./pkg/fizhi/fizhi_moist.F |
2070 |
CLOUD |
TX2(I) = TX3(I) |
|
./pkg/fizhi/fizhi_moist.F |
2071 |
CLOUD |
TX3(I) = (QOL(II,L-1) - QOL(II,L)) * ETA(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
2072 |
CLOUD |
TX2(I) = TX2(I) + TX3(I) |
|
./pkg/fizhi/fizhi_moist.F |
2080 |
CLOUD |
TX3(I) = TX3(I) + TWOBAL |
|
./pkg/fizhi/fizhi_moist.F |
2085 |
CLOUD |
* * (TX3(I)*(ALHL*HALF) + ETA(I,IC) * TX8(I)) |
|
./pkg/fizhi/fizhi_moist.F |
2231 |
CLOUD |
TX3(I) = (TX1(I) + TEM1) * TEM |
|
./pkg/fizhi/fizhi_moist.F |
2235 |
CLOUD |
ucu(II,L,nt) = TX3(I) |