Symbol Description Uses
ARG1 32


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3079 PSI 
      _RL HZ(irun),ARG0(irun),ARG1(irun),DX(irun)
./pkg/fizhi/fizhi_turb.F 3142 PSI 
       ARG1(I) = 1. - X1(I)
./pkg/fizhi/fizhi_turb.F 3143 PSI 
       IF ( Z(I) .LT. 0.013 ) ARG1(I) =
./pkg/fizhi/fizhi_turb.F 3150 PSI 
       ARG1(I) = ARG1(I) * ( 1.+X0(I) )
./pkg/fizhi/fizhi_turb.F 3153 PSI 
       ARG1(I) = ARG1(I) / ARG0(I)
./pkg/fizhi/fizhi_turb.F 3156 PSI 
       ARG1(I) = LOG( ARG1(I) )
./pkg/fizhi/fizhi_turb.F 3157 PSI 
       PSI2(I) = 2. * ARG0(I) + ARG1(I)
./pkg/fizhi/fizhi_turb.F 3179 PSI 
       ARG1(I) = 1. - Y1(I)
./pkg/fizhi/fizhi_turb.F 3180 PSI 
       IF( Z(I) .LT. 0.0065 ) ARG1(I) =
./pkg/fizhi/fizhi_turb.F 3187 PSI 
       ARG1(I) = ARG1(I) * ( 1. + Y0(I) )
./pkg/fizhi/fizhi_turb.F 3189 PSI 
       ARG1(I) = ARG1(I) / ARG0(I)
./pkg/fizhi/fizhi_turb.F 3190 PSI 
       PSI2(I) = LOG( ARG1(I) )
./pkg/fizhi/fizhi_turb.F 3232 PSI 
        ARG1(indx) = VZH(I)
./pkg/fizhi/fizhi_turb.F 3240 PSI 
       HZ(I) = 1. / ARG1(I)
./pkg/fizhi/fizhi_turb.F 3263 PSI 
       ARG1(I) = HZ(I)*HZ(I)*X0DEN(I)*X1DEN(I)
./pkg/fizhi/fizhi_turb.F 3264 PSI 
       ARG1(I) = LOG( ARG1(I) )
./pkg/fizhi/fizhi_turb.F 3265 PSI 
       ARG1(I) = 0.5 * ARG1(I)
./pkg/fizhi/fizhi_turb.F 3270 PSI 
       TEMP(I) = ARG1(I) + CM5 * ARG0(I)
./pkg/fizhi/fizhi_turb.F 3285 PSI 
       ARG1(I) = LOG( Z2ZWM(I) )
./pkg/fizhi/fizhi_turb.F 3286 PSI 
       PSI2(I) = TEMP(I) + CM6 * ARG1(I)
./pkg/fizhi/fizhi_turb.F 3309 PSI 
       ARG1(I) = CM7 * Z2ZWM(I) / ( CM2 + Z2(I) )
./pkg/fizhi/fizhi_turb.F 3313 PSI 
        ARG1(I) = Z2(I) * RZCM
./pkg/fizhi/fizhi_turb.F 3317 PSI 
       ARG1(I) = LOG( ARG1(I) )
./pkg/fizhi/fizhi_turb.F 3318 PSI 
       PSI2(I) = TEMP(I) + ARG0(I) * ARG1(I)