Symbol Description Uses
X0 11


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3077 PSI 
      _RL X0(irun),X1(irun),Y0(irun),Y1(irun)
./pkg/fizhi/fizhi_turb.F 3133 PSI 
      CALL PHI( Z0,X0,Y0,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3146 PSI 
       ARG0(I)  = 1. - X0(I)
./pkg/fizhi/fizhi_turb.F 3150 PSI 
       ARG1(I) = ARG1(I) * ( 1.+X0(I) )
./pkg/fizhi/fizhi_turb.F 3152 PSI 
       DX(I) = X1(I) - X0(I)
./pkg/fizhi/fizhi_turb.F 3154 PSI 
       ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) )
./pkg/fizhi/fizhi_turb.F 3167 PSI 
        VXS(I) = X0(indx)
./pkg/fizhi/fizhi_turb.F 3272 PSI 
       X0(I) = X0NUM(I) / X0DEN(I)
./pkg/fizhi/fizhi_turb.F 3273 PSI 
       IF ( INTZ0(I).EQ.1 ) X0(I) = 0.
./pkg/fizhi/fizhi_turb.F 3295 PSI 
       VXS(I) = X0(indx)
./pkg/fizhi/fizhi_turb.F 3327 PSI 
       VYS(I) = X0(indx)