Symbol Description Uses
VDZETA1 22



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1427 TRBFLX
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 1776 TRBFLX
     2   VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 2330 SFCFLX
     4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 2396 SFCFLX
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 2486 SFCFLX
     4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 2558 SFCFLX
     4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 2618 SFCFLX
     4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 4087 LINADJ
     4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2,
./pkg/fizhi/fizhi_turb.F 4142 LINADJ
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 4270 LINADJ
        VDZETA1(I) = VDZETA(I)
./pkg/fizhi/fizhi_turb.F 4277 LINADJ
        VDZETA1(I) = VXNUM(I)
./pkg/fizhi/fizhi_turb.F 4295 LINADJ
        IF ( VINT1(I).EQ.1 ) VDZETA(I) = VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4300 LINADJ
        VDZETA2(I) = VDZETA(I) + VDZETA1(I)
./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 4374 LINADJ
        VDZETA1(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 4380 LINADJ
        IF ( VDZETA2(I).LT.VDZETA1(I) ) VDZETA1(I) = VDZETA2(I)
./pkg/fizhi/fizhi_turb.F 4383 LINADJ
         VDZETA(I) = VDZETA1(I) + VDZETA(I)
./pkg/fizhi/fizhi_turb.F 4384 LINADJ
         VDPSIM(I) = VDPSIM(I) + VDX(I) * VR1MG0(I) * VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4385 LINADJ
         VDPSIH(I) = VDPSIH(I) + VTEMPLIN(I) * VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4387 LINADJ
     1     VDZ0(I) = VDZ0(I) - VG(I) * VDXPSIM(I) * VDZETA1(I)