| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1346 |
RAS |
DO NT=1,Ntracer |
|
./pkg/fizhi/fizhi_moist.F |
1349 |
RAS |
UOI(I,L+nltop-1,NT)=UOI(I,L+nltop-1,NT)+UCU(I,L,NT)*DT*rhfrac(i) |
|
./pkg/fizhi/fizhi_moist.F |
1974 |
CLOUD |
DO NT=1,Ntracer |
|
./pkg/fizhi/fizhi_moist.F |
1977 |
CLOUD |
UHT(I,NT) = UOI(II,K+nltop-1,NT)-UOI(II,IC+nltop-1,NT) * ETA(I,IC) |
|
./pkg/fizhi/fizhi_moist.F |
1988 |
CLOUD |
DO NT=1,Ntracer |
|
./pkg/fizhi/fizhi_moist.F |
1993 |
CLOUD |
UHT(I,NT) = UHT(I,NT) + TEM * UOI(II,L+nltop-1,NT) |
|
./pkg/fizhi/fizhi_moist.F |
429 |
MOISTIO |
DO NT = 1,ntracer-ptracer |
|
./pkg/fizhi/fizhi_moist.F |
440 |
MOISTIO |
TMP1(I,2) = TMP1(I,2)+(PLE(I,L+1)-PLE(I,L))*UL(I,L,NT)/sp(i) |
|
./pkg/fizhi/fizhi_moist.F |
444 |
MOISTIO |
UL(I,NSUBCL,NT) = TMP1(I,2)*TMP1(I,4) |
|
./pkg/mnc/mnc_utils.F |
112 |
MNC_GET_IND |
DO i=1,NT |
|
./pkg/mnc/mnc_utils.F |
132 |
MNC_GET_NEXT_EMPTY_IND |
I NT, |
|
./pkg/mnc/mnc_utils.F |
147 |
MNC_GET_NEXT_EMPTY_IND |
character*(*) name_list(NT) |
|
./pkg/mnc/mnc_utils.F |
160 |
MNC_GET_NEXT_EMPTY_IND |
DO i=1,NT |
|
./pkg/mnc/mnc_utils.F |
75 |
MNC_GET_IND |
I NT, |
|
./pkg/mnc/mnc_utils.F |
91 |
MNC_GET_IND |
character*(*) name_list(NT) |