Symbol Description Uses
Y0 6



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3529 PSI
      _RL X0(irun),X1(irun),Y0(irun),Y1(irun)
./pkg/fizhi/fizhi_turb.F 3585 PSI
      CALL PHI( Z0,X0,Y0,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3635 PSI
       ARG0(I)  = 1. - Y0(I)
./pkg/fizhi/fizhi_turb.F 3639 PSI
       ARG1(I) = ARG1(I) * ( 1. + Y0(I) )
./pkg/fizhi/fizhi_turb.F 3643 PSI
       PSI2(I) = PSI2(I) - Y1(I) + Y0(I)
./pkg/fizhi/fizhi_turb.F 3652 PSI
       VYS(I) = Y0(indx)