Symbol Description Uses
VX0PSIM 14



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1593 TRBFLX
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 2027 TRBFLX
     1   VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2778 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 2844 SFCFLX
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 2937 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 3009 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 3069 SFCFLX
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 4651 LINADJ
     3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX,
./pkg/fizhi/fizhi_turb.F 4707 LINADJ
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 4739 LINADJ
        IF (IWATER(I).EQ.1) VX0PSIM(I) = VAPSIM(I)
./pkg/fizhi/fizhi_turb.F 4744 LINADJ
        VX0PSIM(I) = VX0(I) * VAPSIM(I)
./pkg/fizhi/fizhi_turb.F 4763 LINADJ
          VG0(I) = VX0PSIM(I) * VG(I)
./pkg/fizhi/fizhi_turb.F 4801 LINADJ
          VXNUM2(I) = VY0(I) - VPSIGB2(I) - VX0PSIM(I) * VPSIGB2(I)
./pkg/fizhi/fizhi_turb.F 4802 LINADJ
          VXNUM2(I) = (VXNUM2(I) * VAPSIHG(I)) - 2. * VX0PSIM(I)