File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
2411 |
SFCFLX |
LOGICAL LWATER |
./pkg/fizhi/fizhi_turb.F |
2469 |
SFCFLX |
LWATER = .FALSE. |
./pkg/fizhi/fizhi_turb.F |
2470 |
SFCFLX |
IF(IWATER.GE.1)LWATER = .TRUE. |
./pkg/fizhi/fizhi_turb.F |
2472 |
SFCFLX |
IF(LWATER)THEN |
./pkg/fizhi/fizhi_turb.F |
2500 |
SFCFLX |
IF(LWATER)THEN |
./pkg/fizhi/fizhi_turb.F |
2555 |
SFCFLX |
IF(LWATER)THEN |
./pkg/fizhi/fizhi_turb.F |
2580 |
SFCFLX |
4 VYY,VYY0,2,LWATER,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
2593 |
SFCFLX |
IF ( LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
2640 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
2662 |
SFCFLX |
IF ( LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4069 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
./pkg/fizhi/fizhi_turb.F |
4123 |
LINADJ |
LOGICAL LWATER |
./pkg/fizhi/fizhi_turb.F |
4157 |
LINADJ |
IF ( (ITYPE.EQ.1) .AND. LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4176 |
LINADJ |
IF ( LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4191 |
LINADJ |
IF ( LWATER .AND. (ITYPE.GE.3) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4216 |
LINADJ |
IF ( LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4237 |
LINADJ |
IF ( LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4267 |
LINADJ |
IF(LWATER.AND.(IWATER(I).EQ.1)) VXNUM(I) = VXNUM(I) + VXNUM2(I) |
./pkg/fizhi/fizhi_turb.F |
4302 |
LINADJ |
IF ( LWATER .AND. (ITYPE.GE.3) )THEN |
./pkg/fizhi/fizhi_turb.F |
4311 |
LINADJ |
IF ( LWATER .AND. (ITYPE.EQ.5) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4317 |
LINADJ |
IF ( LWATER .AND. (ITYPE.EQ.2) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4326 |
LINADJ |
IF ( (ITYPE.EQ.1) .AND. LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4339 |
LINADJ |
IF ( LWATER ) THEN |