Symbol Description Uses
VDZETA2 14



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 4300 LINADJ
        VDZETA2(I) = VDZETA(I) + VDZETA1(I)
./pkg/fizhi/fizhi_turb.F 4301 LINADJ
        IF ( (VRIB2(I).EQ.0.) .OR. (VDZETA2(I).LE.-1.) ) THEN
./pkg/fizhi/fizhi_turb.F 4379 LINADJ
             VDZETA2(I) =  VDPSIHC(I) / VTEMPLIN(I)
./pkg/fizhi/fizhi_turb.F 4380 LINADJ
        IF ( VDZETA2(I).LT.VDZETA1(I) ) VDZETA1(I) = VDZETA2(I)