Symbol Description Uses
X1 9



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 3132 PSI
      CALL PHI( Z,X1,Y1,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3142 PSI
       ARG1(I) = 1. - X1(I)
./pkg/fizhi/fizhi_turb.F 3151 PSI
       ARG0(I) = ARG0(I) * ( 1.+X1(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 3166 PSI
        VX(I) = X1(indx)
./pkg/fizhi/fizhi_turb.F 3284 PSI
       X1(I) = X1NUM(I) * X1DEN(I)
./pkg/fizhi/fizhi_turb.F 3294 PSI
       VX(I) = X1(indx)