| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1468 |
TRBFLX |
INIT = 0 |
|
./pkg/fizhi/fizhi_turb.F |
1469 |
TRBFLX |
IF(QBEG) INIT = 1 |
|
./pkg/fizhi/fizhi_turb.F |
1535 |
TRBFLX |
IF (INIT.EQ.1) THEN |
|
./pkg/fizhi/fizhi_turb.F |
1953 |
TRBFLX |
1 NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
1965 |
TRBFLX |
IF ( INIT .EQ. 1 ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
1972 |
TRBFLX |
INIT = 2 |
|
./pkg/fizhi/fizhi_turb.F |
1974 |
TRBFLX |
1 NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
1976 |
TRBFLX |
INIT = 0 |
|
./pkg/fizhi/fizhi_turb.F |
3339 |
TRBLEN |
1 QXLM,NLEV,INIT,LMIN,LMINQ,LMINQ1,CP,INT1,INT2, |
|
./pkg/fizhi/fizhi_turb.F |
3414 |
TRBLEN |
IF ( INIT.EQ.2 ) GO TO 1200 |
|
./pkg/fizhi/fizhi_turb.F |
3531 |
TRBLEN |
IF(INIT.EQ.1) GOTO 1400 |
|
./pkg/fizhi/fizhi_turb.F |
3560 |
TRBLEN |
IF(INIT.EQ.2) THEN |
|
./pkg/fizhi/fizhi_turb.F |
3590 |
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 |