Symbol Description Uses
X1 9



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 3584 PSI
      CALL PHI( Z,X1,Y1,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3594 PSI
       ARG1(I) = 1. - X1(I)
./pkg/fizhi/fizhi_turb.F 3603 PSI
       ARG0(I) = ARG0(I) * ( 1.+X1(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 3618 PSI
        VX(I) = X1(indx)
./pkg/fizhi/fizhi_turb.F 3736 PSI
       X1(I) = X1NUM(I) * X1DEN(I)
./pkg/fizhi/fizhi_turb.F 3746 PSI
       VX(I) = X1(indx)