Symbol Description Uses
INTRIB 5


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4085 LINADJ 
     2 VDZETA,VDZ0,VDPSIM,VDPSIH,INTRIB,
./pkg/fizhi/fizhi_turb.F 4137 LINADJ 
      integer INTRIB(IRUN)
./pkg/fizhi/fizhi_turb.F 4214 LINADJ 
         INTRIB(I) = 1
./pkg/fizhi/fizhi_turb.F 4216 LINADJ 
         INTRIB(I) = 0
./pkg/fizhi/fizhi_turb.F 4218 LINADJ 
        IF ( INTRIB(I).EQ.0 ) VXNUM1(I) = 1. / VRIB1(I)