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(*) |