Symbol Description Uses
WA2 72



File Line number Procedure Code
./pkg/zonal_filt/fftpack.F 1013 R8ADB3
            CH(I-1,K,3) = WA2(I-2)*DR3-WA2(I-1)*DI3
./pkg/zonal_filt/fftpack.F 1014 R8ADB3
            CH(I,K,3) = WA2(I-2)*DI3+WA2(I-1)*DR3
./pkg/zonal_filt/fftpack.F 1019 R8ADB4
      SUBROUTINE R8ADB4 (IDO,L1,CC,CH,WA1,WA2,WA3)
./pkg/zonal_filt/fftpack.F 1023 R8ADB4
     1                WA1(*)     ,WA2(*)     ,WA3(*)
./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 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 1133 R8ADB5
            CH(I-1,K,3) = WA2(I-2)*DR3-WA2(I-1)*DI3
./pkg/zonal_filt/fftpack.F 1134 R8ADB5
            CH(I,K,3) = WA2(I-2)*DI3+WA2(I-1)*DR3
./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 1402 R8ADF3
      SUBROUTINE R8ADF3 (IDO,L1,CC,CH,WA1,WA2)
./pkg/zonal_filt/fftpack.F 1406 R8ADF3
     1                WA1(*)     ,WA2(*)
./pkg/zonal_filt/fftpack.F 1421 R8ADF3
            DR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./pkg/zonal_filt/fftpack.F 1422 R8ADF3
            DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 1439 R8ADF4
      SUBROUTINE R8ADF4 (IDO,L1,CC,CH,WA1,WA2,WA3)
./pkg/zonal_filt/fftpack.F 1443 R8ADF4
     1                WA1(*)     ,WA2(*)     ,WA3(*)
./pkg/zonal_filt/fftpack.F 1460 R8ADF4
            CR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./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 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 1519 R8ADF5
            DR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./pkg/zonal_filt/fftpack.F 1520 R8ADF5
            DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 153 RADB5
     1                WA1(*)     ,WA2(*)     ,WA3(*)     ,WA4(*)
./pkg/zonal_filt/fftpack.F 204 RADB5
            CH(I-1,K,3) = WA2(I-2)*DR3-WA2(I-1)*DI3
./pkg/zonal_filt/fftpack.F 205 RADB5
            CH(I,K,3) = WA2(I-2)*DI3+WA2(I-1)*DR3
./pkg/zonal_filt/fftpack.F 45 RADB3
      SUBROUTINE RADB3 (IDO,L1,CC,CH,WA1,WA2)
./pkg/zonal_filt/fftpack.F 481 RADF3
      SUBROUTINE RADF3 (IDO,L1,CC,CH,WA1,WA2)
./pkg/zonal_filt/fftpack.F 487 RADF3
     1                WA1(*)     ,WA2(*)
./pkg/zonal_filt/fftpack.F 502 RADF3
            DR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./pkg/zonal_filt/fftpack.F 503 RADF3
            DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 51 RADB3
     1                WA1(*)     ,WA2(*)
./pkg/zonal_filt/fftpack.F 520 RADF4
      SUBROUTINE RADF4 (IDO,L1,CC,CH,WA1,WA2,WA3)
./pkg/zonal_filt/fftpack.F 526 RADF4
     1                WA1(*)     ,WA2(*)     ,WA3(*)
./pkg/zonal_filt/fftpack.F 543 RADF4
            CR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./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 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 604 RADF5
            DR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3)
./pkg/zonal_filt/fftpack.F 605 RADF5
            DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3)
./pkg/zonal_filt/fftpack.F 80 RADB3
            CH(I-1,K,3) = WA2(I-2)*DR3-WA2(I-1)*DI3
./pkg/zonal_filt/fftpack.F 81 RADB3
            CH(I,K,3) = WA2(I-2)*DI3+WA2(I-1)*DR3
./pkg/zonal_filt/fftpack.F 86 RADB4
      SUBROUTINE RADB4 (IDO,L1,CC,CH,WA1,WA2,WA3)
./pkg/zonal_filt/fftpack.F 92 RADB4
     1                WA1(*)     ,WA2(*)     ,WA3(*)
./pkg/zonal_filt/fftpack.F 980 R8ADB3
      SUBROUTINE R8ADB3 (IDO,L1,CC,CH,WA1,WA2)
./pkg/zonal_filt/fftpack.F 984 R8ADB3
     1                WA1(*)     ,WA2(*)