Symbol Description Uses
VPSIM 50


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3058 PSI 
      SUBROUTINE PSI(VZZ,VZH,VPSIM,VPSIH,IRUN,VX,VXS,VY,VYS,IFLAG)
./pkg/fizhi/fizhi_turb.F 3084 PSI 
      _RL VZZ(IRUN),VZH(IRUN),VPSIM(IRUN),VPSIH(IRUN),
./pkg/fizhi/fizhi_turb.F 3118 PSI 
       VPSIM(I) = 0.
./pkg/fizhi/fizhi_turb.F 3191 PSI 
        VPSIM(I) = PSI2(indx)
./pkg/fizhi/fizhi_turb.F 3319 PSI 
       VPSIM(I) = PSI2(indx)