Symbol Description Uses
WA4 24



File Line number Procedure Code
./pkg/zonal_filt/fftpack.F 1078 R8ADB5
      SUBROUTINE R8ADB5 (IDO,L1,CC,CH,WA1,WA2,WA3,WA4)
./pkg/zonal_filt/fftpack.F 1082 R8ADB5
     1                WA1(*)     ,WA2(*)     ,WA3(*)     ,WA4(*)
./pkg/zonal_filt/fftpack.F 1137 R8ADB5
            CH(I-1,K,5) = WA4(I-2)*DR5-WA4(I-1)*DI5
./pkg/zonal_filt/fftpack.F 1138 R8ADB5
            CH(I,K,5) = WA4(I-2)*DI5+WA4(I-1)*DR5
./pkg/zonal_filt/fftpack.F 147 RADB5
      SUBROUTINE RADB5 (IDO,L1,CC,CH,WA1,WA2,WA3,WA4)
./pkg/zonal_filt/fftpack.F 1494 R8ADF5
      SUBROUTINE R8ADF5 (IDO,L1,CC,CH,WA1,WA2,WA3,WA4)
./pkg/zonal_filt/fftpack.F 1498 R8ADF5
     1                WA1(*)     ,WA2(*)     ,WA3(*)     ,WA4(*)
./pkg/zonal_filt/fftpack.F 1523 R8ADF5
            DR5 = WA4(I-2)*CC(I-1,K,5)+WA4(I-1)*CC(I,K,5)
./pkg/zonal_filt/fftpack.F 1524 R8ADF5
            DI5 = WA4(I-2)*CC(I,K,5)-WA4(I-1)*CC(I-1,K,5)
./pkg/zonal_filt/fftpack.F 153 RADB5
     1                WA1(*)     ,WA2(*)     ,WA3(*)     ,WA4(*)
./pkg/zonal_filt/fftpack.F 208 RADB5
            CH(I-1,K,5) = WA4(I-2)*DR5-WA4(I-1)*DI5
./pkg/zonal_filt/fftpack.F 209 RADB5
            CH(I,K,5) = WA4(I-2)*DI5+WA4(I-1)*DR5
./pkg/zonal_filt/fftpack.F 577 RADF5
      SUBROUTINE RADF5 (IDO,L1,CC,CH,WA1,WA2,WA3,WA4)
./pkg/zonal_filt/fftpack.F 583 RADF5
     1                WA1(*)     ,WA2(*)     ,WA3(*)     ,WA4(*)
./pkg/zonal_filt/fftpack.F 608 RADF5
            DR5 = WA4(I-2)*CC(I-1,K,5)+WA4(I-1)*CC(I,K,5)
./pkg/zonal_filt/fftpack.F 609 RADF5
            DI5 = WA4(I-2)*CC(I,K,5)-WA4(I-1)*CC(I-1,K,5)