Symbol Description Uses
TR1 36



File Line number Procedure Code
./pkg/zonal_filt/fftpack.F 100 RADB4
         CH(1,K,2) = TR1-TR4
./pkg/zonal_filt/fftpack.F 1026 R8ADB4
         TR1 = CC(1,1,K)-CC(IDO,4,K)
./pkg/zonal_filt/fftpack.F 102 RADB4
         CH(1,K,4) = TR1+TR4
./pkg/zonal_filt/fftpack.F 1031 R8ADB4
         CH(1,K,2) = TR1-TR4
./pkg/zonal_filt/fftpack.F 1033 R8ADB4
         CH(1,K,4) = TR1+TR4
./pkg/zonal_filt/fftpack.F 1044 R8ADB4
            TR1 = CC(I-1,1,K)-CC(IC-1,4,K)
./pkg/zonal_filt/fftpack.F 1052 R8ADB4
            CR2 = TR1-TR4
./pkg/zonal_filt/fftpack.F 1053 R8ADB4
            CR4 = TR1+TR4
./pkg/zonal_filt/fftpack.F 1069 R8ADB4
         TR1 = CC(IDO,1,K)-CC(IDO,3,K)
./pkg/zonal_filt/fftpack.F 1072 R8ADB4
         CH(IDO,K,2) = SQRT2*(TR1-TI1)
./pkg/zonal_filt/fftpack.F 1074 R8ADB4
         CH(IDO,K,4) = -SQRT2*(TR1+TI1)
./pkg/zonal_filt/fftpack.F 113 RADB4
            TR1 = CC(I-1,1,K)-CC(IC-1,4,K)
./pkg/zonal_filt/fftpack.F 121 RADB4
            CR2 = TR1-TR4
./pkg/zonal_filt/fftpack.F 122 RADB4
            CR4 = TR1+TR4
./pkg/zonal_filt/fftpack.F 138 RADB4
         TR1 = CC(IDO,1,K)-CC(IDO,3,K)
./pkg/zonal_filt/fftpack.F 141 RADB4
         CH(IDO,K,2) = SQRT2*(TR1-TI1)
./pkg/zonal_filt/fftpack.F 143 RADB4
         CH(IDO,K,4) = -SQRT2*(TR1+TI1)
./pkg/zonal_filt/fftpack.F 1446 R8ADF4
         TR1 = CC(1,K,2)+CC(1,K,4)
./pkg/zonal_filt/fftpack.F 1448 R8ADF4
         CH(1,1,K) = TR1+TR2
./pkg/zonal_filt/fftpack.F 1449 R8ADF4
         CH(IDO,4,K) = TR2-TR1
./pkg/zonal_filt/fftpack.F 1464 R8ADF4
            TR1 = CR2+CR4
./pkg/zonal_filt/fftpack.F 1472 R8ADF4
            CH(I-1,1,K) = TR1+TR2
./pkg/zonal_filt/fftpack.F 1473 R8ADF4
            CH(IC-1,4,K) = TR2-TR1
./pkg/zonal_filt/fftpack.F 1486 R8ADF4
         TR1 = HSQT2*(CC(IDO,K,2)-CC(IDO,K,4))
./pkg/zonal_filt/fftpack.F 1487 R8ADF4
         CH(IDO,1,K) = TR1+CC(IDO,K,1)
./pkg/zonal_filt/fftpack.F 1488 R8ADF4
         CH(IDO,3,K) = CC(IDO,K,1)-TR1
./pkg/zonal_filt/fftpack.F 529 RADF4
         TR1 = CC(1,K,2)+CC(1,K,4)
./pkg/zonal_filt/fftpack.F 531 RADF4
         CH(1,1,K) = TR1+TR2
./pkg/zonal_filt/fftpack.F 532 RADF4
         CH(IDO,4,K) = TR2-TR1
./pkg/zonal_filt/fftpack.F 547 RADF4
            TR1 = CR2+CR4
./pkg/zonal_filt/fftpack.F 555 RADF4
            CH(I-1,1,K) = TR1+TR2
./pkg/zonal_filt/fftpack.F 556 RADF4
            CH(IC-1,4,K) = TR2-TR1
./pkg/zonal_filt/fftpack.F 569 RADF4
         TR1 = HSQT2*(CC(IDO,K,2)-CC(IDO,K,4))
./pkg/zonal_filt/fftpack.F 570 RADF4
         CH(IDO,1,K) = TR1+CC(IDO,K,1)
./pkg/zonal_filt/fftpack.F 571 RADF4
         CH(IDO,3,K) = CC(IDO,K,1)-TR1
./pkg/zonal_filt/fftpack.F 95 RADB4
         TR1 = CC(1,1,K)-CC(IDO,4,K)