Symbol Description Uses
AR2 20



File Line number Procedure Code
./pkg/zonal_filt/fftpack.F 1217 R8ADBG
         AR2 = AR1
./pkg/zonal_filt/fftpack.F 1221 R8ADBG
            AR2H = DC2*AR2-DS2*AI2
./pkg/zonal_filt/fftpack.F 1222 R8ADBG
            AI2 = DC2*AI2+DS2*AR2
./pkg/zonal_filt/fftpack.F 1223 R8ADBG
            AR2 = AR2H
./pkg/zonal_filt/fftpack.F 1225 R8ADBG
               C2(IK,L) = C2(IK,L)+AR2*CH2(IK,J)
./pkg/zonal_filt/fftpack.F 1653 R8ADFG
         AR2 = AR1
./pkg/zonal_filt/fftpack.F 1657 R8ADFG
            AR2H = DC2*AR2-DS2*AI2
./pkg/zonal_filt/fftpack.F 1658 R8ADFG
            AI2 = DC2*AI2+DS2*AR2
./pkg/zonal_filt/fftpack.F 1659 R8ADFG
            AR2 = AR2H
./pkg/zonal_filt/fftpack.F 1661 R8ADFG
               CH2(IK,L) = CH2(IK,L)+AR2*C2(IK,J)
./pkg/zonal_filt/fftpack.F 290 RADBG
         AR2 = AR1
./pkg/zonal_filt/fftpack.F 294 RADBG
            AR2H = DC2*AR2-DS2*AI2
./pkg/zonal_filt/fftpack.F 295 RADBG
            AI2 = DC2*AI2+DS2*AR2
./pkg/zonal_filt/fftpack.F 296 RADBG
            AR2 = AR2H
./pkg/zonal_filt/fftpack.F 298 RADBG
               C2(IK,L) = C2(IK,L)+AR2*CH2(IK,J)
./pkg/zonal_filt/fftpack.F 740 RADFG
         AR2 = AR1
./pkg/zonal_filt/fftpack.F 744 RADFG
            AR2H = DC2*AR2-DS2*AI2
./pkg/zonal_filt/fftpack.F 745 RADFG
            AI2 = DC2*AI2+DS2*AR2
./pkg/zonal_filt/fftpack.F 746 RADFG
            AR2 = AR2H
./pkg/zonal_filt/fftpack.F 748 RADFG
               CH2(IK,L) = CH2(IK,L)+AR2*C2(IK,J)