| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
2069 |
TRBFLX |
1 ( QQ(I,LMIN) .LE. TEMP(I,LMIN) )) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2070 |
TRBFLX |
QQ(I,LMIN) = TEMP(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2093 |
TRBFLX |
XQ(I,LMIN) = QQE(I,LMIN) - QQ(I,LMIN) |
|
./pkg/fizhi/fizhi_turb.F |
2119 |
TRBFLX |
QQINIT(I,1) = QQ(I,1) |
|
./pkg/fizhi/fizhi_turb.F |
2130 |
TRBFLX |
CALL TRBDIF(QQ(1,LMINQ1),P3(1,LMINQ1),RHOKDZ(1,LMINQ1), |
|
./pkg/fizhi/fizhi_turb.F |
2153 |
TRBFLX |
Q(I,LMINQ1) = 2. * QQ(I,LMINQ1) |
|
./pkg/fizhi/fizhi_turb.F |
2252 |
TRBFLX |
IF ( QQ(I,1) .GT. QQMIN ) THEN |