Symbol Description Uses
ARG 32



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1401 TRBFLX
      _RL ARG(irun,NLEV),XXZETA(irun),QBYU(irun)
./pkg/fizhi/fizhi_turb.F 1740 TRBFLX
       ARG(I,NLEV)  = (1./2.)*Q1M(I,NLEV)*Q1M(I,NLEV)
./pkg/fizhi/fizhi_turb.F 1741 TRBFLX
       IF(ARG(I,NLEV).LE.ARGMAX)
./pkg/fizhi/fizhi_turb.F 1742 TRBFLX
     1 SHL(I,NLEV) =  SHL(I,NLEV)+RSQ2PI*SVAR(I,NLEV)*EXP(-ARG(I,NLEV))
./pkg/fizhi/fizhi_turb.F 1861 TRBFLX
        ARG(I,L)  = (1./2.)*Q1M(I,L)*Q1M(I,L)
./pkg/fizhi/fizhi_turb.F 1862 TRBFLX
        IF(ARG(I,L).LE.ARGMAX)
./pkg/fizhi/fizhi_turb.F 1863 TRBFLX
     1        SHL(I,L) =  SHL(I,L)+RSQ2PI*SVAR(I,L)*EXP(-ARG(I,L))
./pkg/fizhi/fizhi_utils.F 15 NO PROCEDURE
      FUNCTION ERRF (ARG)
./pkg/fizhi/fizhi_utils.F 46 NO PROCEDURE
      AARG=ABS(ARG)
./pkg/fizhi/fizhi_utils.F 55 NO PROCEDURE
      IF ( ARG .LT. 0.0 )  ERRF = -ERRF
./pkg/sphere/sphere.F 505 FRSBASE
      REAL DEG2RAD, T, ARG
./pkg/sphere/sphere.F 514 FRSBASE
      ARG    = A * DEG2RAD
./pkg/sphere/sphere.F 515 FRSBASE
      H(I+1) = COS(ARG)
./pkg/sphere/sphere.F 517 FRSBASE
      H(I+2) = SIN(ARG)
./pkg/zonal_filt/fftpack.F 1150 R8ADBG
      ARG = TPI/FLOAT(IP)
./pkg/zonal_filt/fftpack.F 1151 R8ADBG
      DCP = COS(ARG)
./pkg/zonal_filt/fftpack.F 1152 R8ADBG
      DSP = SIN(ARG)
./pkg/zonal_filt/fftpack.F 1562 R8ADFG
      ARG = TPI/FLOAT(IP)
./pkg/zonal_filt/fftpack.F 1563 R8ADFG
      DCP = COS(ARG)
./pkg/zonal_filt/fftpack.F 1564 R8ADFG
      DSP = SIN(ARG)
./pkg/zonal_filt/fftpack.F 1840 R8FFTI1
               ARG = FI*ARGLD
./pkg/zonal_filt/fftpack.F 1841 R8FFTI1
               WA(I-1) = COS(ARG)
./pkg/zonal_filt/fftpack.F 1842 R8FFTI1
               WA(I) = SIN(ARG)
./pkg/zonal_filt/fftpack.F 223 RADBG
      ARG = TPI/FLOAT(IP)
./pkg/zonal_filt/fftpack.F 224 RADBG
      DCP = COS(ARG)
./pkg/zonal_filt/fftpack.F 225 RADBG
      DSP = SIN(ARG)
./pkg/zonal_filt/fftpack.F 649 RADFG
      ARG = TPI/FLOAT(IP)
./pkg/zonal_filt/fftpack.F 650 RADFG
      DCP = COS(ARG)
./pkg/zonal_filt/fftpack.F 651 RADFG
      DSP = SIN(ARG)
./pkg/zonal_filt/fftpack.F 934 RFFTI1
               ARG = FI*ARGLD
./pkg/zonal_filt/fftpack.F 935 RFFTI1
               WA(I-1) = COS(ARG)
./pkg/zonal_filt/fftpack.F 936 RFFTI1
               WA(I) = SIN(ARG)