| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1393 |
TRBFLX |
integer IBITSTB(irun,nlev),INTQ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1925 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
1960 |
TRBFLX |
1 KM(1,LMIN),KH(1,LMIN),QE(1,LMIN),QQE(1,LMIN),IBITSTB(1,LMIN), |
|
./pkg/fizhi/fizhi_turb.F |
1985 |
TRBFLX |
IF ( (IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
1987 |
TRBFLX |
IBITSTB(I,L) = 1 |
|
./pkg/fizhi/fizhi_turb.F |
1989 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
1995 |
TRBFLX |
IF(IBITSTB(I,L).EQ.1 ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
2001 |
TRBFLX |
IF((IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2006 |
TRBFLX |
IF(IBITSTB(I,L).EQ.1 ) P3(I,L) = (2.*B3) * |
|
./pkg/fizhi/fizhi_turb.F |
2015 |
TRBFLX |
1 IBITSTB(1,LMINQ),INTQ(1,LMINQ),KM(1,LMINQ),KH(1,LMINQ), |
|
./pkg/fizhi/fizhi_turb.F |
2033 |
TRBFLX |
IF( ( (IBITSTB(I,L).EQ.1) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2036 |
TRBFLX |
3 ( (IBITSTB(I,L).EQ.0) .AND. |
|
./pkg/fizhi/fizhi_turb.F |
2220 |
TRBFLX |
IBITSTB(I,L) = 1 |
|
./pkg/fizhi/fizhi_turb.F |
2222 |
TRBFLX |
IBITSTB(I,L) = 0 |
|
./pkg/fizhi/fizhi_turb.F |
2224 |
TRBFLX |
IF( IBITSTB(I,L).EQ.1 ) FREQDG(I,L) = FREQDG(I,L) + aitr |