Symbol Description Uses
X0 11


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 3598 PSI 
       ARG0(I)  = 1. - X0(I)
./pkg/fizhi/fizhi_turb.F 3602 PSI 
       ARG1(I) = ARG1(I) * ( 1.+X0(I) )
./pkg/fizhi/fizhi_turb.F 3604 PSI 
       DX(I) = X1(I) - X0(I)
./pkg/fizhi/fizhi_turb.F 3606 PSI 
       ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) )
./pkg/fizhi/fizhi_turb.F 3619 PSI 
        VXS(I) = X0(indx)
./pkg/fizhi/fizhi_turb.F 3724 PSI 
       X0(I) = X0NUM(I) / X0DEN(I)
./pkg/fizhi/fizhi_turb.F 3725 PSI 
       IF ( INTZ0(I).EQ.1 ) X0(I) = 0.
./pkg/fizhi/fizhi_turb.F 3747 PSI 
       VXS(I) = X0(indx)
./pkg/fizhi/fizhi_turb.F 3779 PSI 
       VYS(I) = X0(indx)