Symbol Description Uses
VINT1 12


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4156 LINADJ 
      integer VINT1(irun),VINT2(irun)
./pkg/fizhi/fizhi_turb.F 4291 LINADJ 
         VINT1(I) = 1
./pkg/fizhi/fizhi_turb.F 4293 LINADJ 
         VINT1(I) = 0
./pkg/fizhi/fizhi_turb.F 4295 LINADJ 
        IF ( VINT1(I).EQ.1 ) VDZETA(I) = VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4302 LINADJ 
         VINT1(I) = 1
./pkg/fizhi/fizhi_turb.F 4304 LINADJ 
         VINT1(I) = 0
./pkg/fizhi/fizhi_turb.F 4306 LINADJ 
        IF(VINT1(I).EQ.1)VDZETA(I)=VXNUM1(I)*VRIB2(I) - 1. - VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4365 LINADJ 
         VINT1(I) = 1
./pkg/fizhi/fizhi_turb.F 4367 LINADJ 
         VINT1(I) = 0
./pkg/fizhi/fizhi_turb.F 4375 LINADJ 
        IF(VINT1(I).EQ.1) VDZETA1(I) = VDPSIMC(I) / VDXPSIM(I)
./pkg/fizhi/fizhi_turb.F 4376 LINADJ 
        IF((VINT1(I).EQ.1).OR.(VINT2(I).EQ.1)) VTEMPLIN(I) =
./pkg/fizhi/fizhi_turb.F 4382 LINADJ 
        IF((VINT1(I).EQ.1).OR.(VINT2(I).EQ.1)) THEN