File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1393 |
TRBFLX |
integer IBITSTB(irun,nlev),INTQ(irun,nlev) |
./pkg/fizhi/fizhi_turb.F |
1927 |
TRBFLX |
INTQ(I,L) = 1 |
./pkg/fizhi/fizhi_turb.F |
1929 |
TRBFLX |
INTQ(I,L) = 0 |
./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 |
3808 |
TRBL25 |
SUBROUTINE TRBL25(Q,XL,STRT,DW2,INTSTB,INTQ,ZKM,ZKH,P3,NLEV, |
./pkg/fizhi/fizhi_turb.F |
3835 |
TRBL25 |
INTEGER INTSTB(irun*nlay,1), INTQ(irun*nlay,1) |
./pkg/fizhi/fizhi_turb.F |
3867 |
TRBL25 |
IF( INTQ(I,1).EQ.1 .AND. INTSTB(I,1).EQ.0 ) THEN |