| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1563 |
TRBFLX |
integer IBITSTB(irun,nlev),INTQ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2263 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
2298 |
TRBFLX |
1 KM(1,LMIN),KH(1,LMIN),QE(1,LMIN),QQE(1,LMIN),IBITSTB(1,LMIN), |
|
./pkg/fizhi/fizhi_turb.F |
2335 |
TRBFLX |
IF ( (IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2337 |
TRBFLX |
IBITSTB(I,L) = 1 |
|
./pkg/fizhi/fizhi_turb.F |
2339 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
2360 |
TRBFLX |
IF(IBITSTB(I,L).EQ.1 ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2366 |
TRBFLX |
IF((IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2371 |
TRBFLX |
IF(IBITSTB(I,L).EQ.1 ) P3(I,L) = (2.*B3) * |
|
./pkg/fizhi/fizhi_turb.F |
2380 |
TRBFLX |
1 IBITSTB(1,LMINQ),INTQ(1,LMINQ),KM(1,LMINQ),KH(1,LMINQ), |
|
./pkg/fizhi/fizhi_turb.F |
2411 |
TRBFLX |
IF( ( (IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2414 |
TRBFLX |
3 ( (IBITSTB(I,L).EQ.0) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2650 |
TRBFLX |
IBITSTB(I,L) = 1 |
|
./pkg/fizhi/fizhi_turb.F |
2652 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
2654 |
TRBFLX |
IF( IBITSTB(I,L).EQ.1 ) FREQDG(I,L) = FREQDG(I,L) + aitr |