File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
2606 |
SFCFLX |
ITYPE = 3 |
./pkg/fizhi/fizhi_turb.F |
2607 |
SFCFLX |
IF(ITER.EQ.N) ITYPE = 4 |
./pkg/fizhi/fizhi_turb.F |
2608 |
SFCFLX |
IF( (ITYPE.EQ.4) .AND. (.NOT.LAST) ) ITYPE = 5 |
./pkg/fizhi/fizhi_turb.F |
2614 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
2623 |
SFCFLX |
IF (ITYPE.EQ.5) THEN |
./pkg/fizhi/fizhi_turb.F |
2663 |
SFCFLX |
IF (ITYPE.EQ.5) THEN |
./pkg/fizhi/fizhi_turb.F |
3895 |
TRBDIF |
& ITYPE,EPSL,irun ) |
./pkg/fizhi/fizhi_turb.F |
3942 |
TRBDIF |
IF(ITYPE.EQ.2) NLEVX = NLEV |
./pkg/fizhi/fizhi_turb.F |
3962 |
TRBDIF |
IF(ITYPE.EQ.1) THEN |
./pkg/fizhi/fizhi_turb.F |
3973 |
TRBDIF |
IF(ITYPE.EQ.2) THEN |
./pkg/fizhi/fizhi_turb.F |
3989 |
TRBDIF |
IF(ITYPE.EQ.3) CALL VTRI2 (AA,BB,CC,XX2,XX2,NLEV,irun) |
./pkg/fizhi/fizhi_turb.F |
3992 |
TRBDIF |
IF(ITYPE.EQ.1) THEN |
./pkg/fizhi/fizhi_turb.F |
4084 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
./pkg/fizhi/fizhi_turb.F |
4168 |
LINADJ |
IF ( (ITYPE.EQ.1) .AND. LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4173 |
LINADJ |
IF ( ITYPE .GE. 3 ) THEN |
./pkg/fizhi/fizhi_turb.F |
4178 |
LINADJ |
IF ( ITYPE .NE. 2 ) THEN |
./pkg/fizhi/fizhi_turb.F |
4202 |
LINADJ |
IF ( LWATER .AND. (ITYPE.GE.3) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4210 |
LINADJ |
IF (ITYPE.GE.3) THEN |
./pkg/fizhi/fizhi_turb.F |
4243 |
LINADJ |
IF (ITYPE.EQ.5) THEN |
./pkg/fizhi/fizhi_turb.F |
4260 |
LINADJ |
IF (ITYPE.GE.2) THEN |
./pkg/fizhi/fizhi_turb.F |
4268 |
LINADJ |
IF ( ITYPE.EQ.2 )THEN |
./pkg/fizhi/fizhi_turb.F |
4275 |
LINADJ |
IF (ITYPE.GE.3) THEN |
./pkg/fizhi/fizhi_turb.F |
4283 |
LINADJ |
IF (ITYPE.GE.2) THEN |
./pkg/fizhi/fizhi_turb.F |
4288 |
LINADJ |
IF (ITYPE.GE.3) THEN |
./pkg/fizhi/fizhi_turb.F |
4298 |
LINADJ |
IF (ITYPE.EQ.2) THEN |
./pkg/fizhi/fizhi_turb.F |
4312 |
LINADJ |
IF ( LWATER .AND. (ITYPE.GE.3) )THEN |
./pkg/fizhi/fizhi_turb.F |
4321 |
LINADJ |
IF ( LWATER .AND. (ITYPE.EQ.5) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4327 |
LINADJ |
IF ( LWATER .AND. (ITYPE.EQ.2) ) THEN |
./pkg/fizhi/fizhi_turb.F |
4336 |
LINADJ |
IF ( (ITYPE.EQ.1) .AND. LWATER ) THEN |
./pkg/fizhi/fizhi_turb.F |
4345 |
LINADJ |
IF (ITYPE.GE.3) THEN |
./pkg/fizhi/fizhi_turb.F |
4360 |
LINADJ |
IF (ITYPE.GE.4) THEN |