Symbol Description Uses
VDEN 15



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1426 TRBFLX
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(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 2395 SFCFLX
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(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 4141 LINADJ
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(irun)
./pkg/fizhi/fizhi_turb.F 4238 LINADJ
        VDEN(I) = VDY(I) + VDXPSIM(I) * VXNUM3(I)
./pkg/fizhi/fizhi_turb.F 4239 LINADJ
        VDEN(I) = ( 1. + VDEN(I) * VAPSIHG(I) ) - 2. * VDXPSIM(I)
./pkg/fizhi/fizhi_turb.F 4279 LINADJ
        IF ( VDEN(I) .LT.0.1 ) VDEN(I) = 0.1
./pkg/fizhi/fizhi_turb.F 4285 LINADJ
        VDZETA(I) = VXNUM(I) / VDEN(I)