Symbol Description Uses
CI3 38



File Line number Procedure Code
./pkg/zonal_filt/fftpack.F 1006 R8ADB3
            CI3 = TAUI*(CC(I,3,K)+CC(IC,2,K))
./pkg/zonal_filt/fftpack.F 1007 R8ADB3
            DR2 = CR2-CI3
./pkg/zonal_filt/fftpack.F 1008 R8ADB3
            DR3 = CR2+CI3
./pkg/zonal_filt/fftpack.F 1051 R8ADB4
            CI3 = TI2-TI3
./pkg/zonal_filt/fftpack.F 1058 R8ADB4
            CH(I-1,K,3) = WA2(I-2)*CR3-WA2(I-1)*CI3
./pkg/zonal_filt/fftpack.F 1059 R8ADB4
            CH(I,K,3) = WA2(I-2)*CI3+WA2(I-1)*CR3
./pkg/zonal_filt/fftpack.F 1118 R8ADB5
            CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
./pkg/zonal_filt/fftpack.F 1125 R8ADB5
            DI3 = CI3+CR4
./pkg/zonal_filt/fftpack.F 1126 R8ADB5
            DI4 = CI3-CR4
./pkg/zonal_filt/fftpack.F 120 RADB4
            CI3 = TI2-TI3
./pkg/zonal_filt/fftpack.F 127 RADB4
            CH(I-1,K,3) = WA2(I-2)*CR3-WA2(I-1)*CI3
./pkg/zonal_filt/fftpack.F 128 RADB4
            CH(I,K,3) = WA2(I-2)*CI3+WA2(I-1)*CR3
./pkg/zonal_filt/fftpack.F 1461 R8ADF4
            CI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 1468 R8ADF4
            TI2 = CC(I,K,1)+CI3
./pkg/zonal_filt/fftpack.F 1469 R8ADF4
            TI3 = CC(I,K,1)-CI3
./pkg/zonal_filt/fftpack.F 1532 R8ADF5
            CI3 = DI3+DI4
./pkg/zonal_filt/fftpack.F 1534 R8ADF5
            CH(I,1,K) = CC(I,K,1)+CI2+CI3
./pkg/zonal_filt/fftpack.F 1536 R8ADF5
            TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
./pkg/zonal_filt/fftpack.F 1538 R8ADF5
            TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
./pkg/zonal_filt/fftpack.F 189 RADB5
            CI3 = CC(I,1,K)+TR12*TI2+TR11*TI3
./pkg/zonal_filt/fftpack.F 196 RADB5
            DI3 = CI3+CR4
./pkg/zonal_filt/fftpack.F 197 RADB5
            DI4 = CI3-CR4
./pkg/zonal_filt/fftpack.F 544 RADF4
            CI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 551 RADF4
            TI2 = CC(I,K,1)+CI3
./pkg/zonal_filt/fftpack.F 552 RADF4
            TI3 = CC(I,K,1)-CI3
./pkg/zonal_filt/fftpack.F 57 RADB3
         CI3 = TAUI*(CC(1,3,K)+CC(1,3,K))
./pkg/zonal_filt/fftpack.F 58 RADB3
         CH(1,K,2) = CR2-CI3
./pkg/zonal_filt/fftpack.F 59 RADB3
         CH(1,K,3) = CR2+CI3
./pkg/zonal_filt/fftpack.F 617 RADF5
            CI3 = DI3+DI4
./pkg/zonal_filt/fftpack.F 619 RADF5
            CH(I,1,K) = CC(I,K,1)+CI2+CI3
./pkg/zonal_filt/fftpack.F 621 RADF5
            TI2 = CC(I,K,1)+TR11*CI2+TR12*CI3
./pkg/zonal_filt/fftpack.F 623 RADF5
            TI3 = CC(I,K,1)+TR12*CI2+TR11*CI3
./pkg/zonal_filt/fftpack.F 73 RADB3
            CI3 = TAUI*(CC(I,3,K)+CC(IC,2,K))
./pkg/zonal_filt/fftpack.F 74 RADB3
            DR2 = CR2-CI3
./pkg/zonal_filt/fftpack.F 75 RADB3
            DR3 = CR2+CI3
./pkg/zonal_filt/fftpack.F 990 R8ADB3
         CI3 = TAUI*(CC(1,3,K)+CC(1,3,K))
./pkg/zonal_filt/fftpack.F 991 R8ADB3
         CH(1,K,2) = CR2-CI3
./pkg/zonal_filt/fftpack.F 992 R8ADB3
         CH(1,K,3) = CR2+CI3