Symbol Description Uses
VG 17



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1423 TRBFLX
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 1775 TRBFLX
     1   VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2329 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2392 SFCFLX
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 2485 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2557 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2617 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 4086 LINADJ
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 4138 LINADJ
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 4182 LINADJ
        VG(I) = 0.
./pkg/fizhi/fizhi_turb.F 4193 LINADJ
          VG(I) = VDZSEA(I) * VAZ0(I)
./pkg/fizhi/fizhi_turb.F 4194 LINADJ
          VG0(I) = VX0PSIM(I) * VG(I)
./pkg/fizhi/fizhi_turb.F 4231 LINADJ
          VXNUM3(I) = VXNUM3(I) + VG(I) * ( VY0(I) - VPSIGB2(I) )
./pkg/fizhi/fizhi_turb.F 4315 LINADJ
         VZCOEF2(I) = VG(I) * VDXPSIM(I)
./pkg/fizhi/fizhi_turb.F 4323 LINADJ
        IF(IWATER(I).EQ.1) VZCOEF1(I) = VG(I) * VAWS1(I)
./pkg/fizhi/fizhi_turb.F 4377 LINADJ
     1        VDY(I) + VY0(I) * VG(I) * VDXPSIM(I)
./pkg/fizhi/fizhi_turb.F 4387 LINADJ
     1     VDZ0(I) = VDZ0(I) - VG(I) * VDXPSIM(I) * VDZETA1(I)