| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1638 |
TRBFLX |
INIT = 0 |
|
./pkg/fizhi/fizhi_turb.F |
1639 |
TRBFLX |
IF(QBEG) INIT = 1 |
|
./pkg/fizhi/fizhi_turb.F |
1728 |
TRBFLX |
IF (INIT.EQ.1) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2291 |
TRBFLX |
1 NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
2303 |
TRBFLX |
IF ( INIT .EQ. 1 ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2314 |
TRBFLX |
INIT = 2 |
|
./pkg/fizhi/fizhi_turb.F |
2316 |
TRBFLX |
1 NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
2318 |
TRBFLX |
INIT = 0 |
|
./pkg/fizhi/fizhi_turb.F |
3788 |
TRBLEN |
1 QXLM,NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
3868 |
TRBLEN |
IF ( INIT.EQ.2 ) GO TO 1200 |
|
./pkg/fizhi/fizhi_turb.F |
4011 |
TRBLEN |
IF(INIT.EQ.1) GOTO 1400 |
|
./pkg/fizhi/fizhi_turb.F |
4054 |
TRBLEN |
IF(INIT.EQ.2) THEN |
|
./pkg/fizhi/fizhi_turb.F |
4093 |
TRBLEN |
IF(INIT.EQ.1) GOTO 1700 |
|
./eesupp/src/timers.F |
171 |
TIMER_CONTROL |
CHARACTER*(*) INIT |
|
./eesupp/src/timers.F |
172 |
TIMER_CONTROL |
PARAMETER ( INIT = 'INIT' ) |
|
./eesupp/src/timers.F |
340 |
TIMER_CONTROL |
ELSEIF ( tmpAction .EQ. INIT ) THEN |