| File |
Line number |
Procedure |
Code |
|
./pkg/zonal_filt/fftpack.F |
1010 |
R8ADB3 |
DI3 = CI2-CR3 |
|
./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 |
1125 |
R8ADB5 |
DI3 = CI3+CR4 |
|
./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 |
1422 |
R8ADF3 |
DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3) |
|
./pkg/zonal_filt/fftpack.F |
1424 |
R8ADF3 |
CI2 = DI2+DI3 |
|
./pkg/zonal_filt/fftpack.F |
1429 |
R8ADF3 |
TR3 = TAUI*(DI2-DI3) |
|
./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 |
1531 |
R8ADF5 |
CR4 = DI3-DI4 |
|
./pkg/zonal_filt/fftpack.F |
1532 |
R8ADF5 |
CI3 = DI3+DI4 |
|
./pkg/zonal_filt/fftpack.F |
196 |
RADB5 |
DI3 = CI3+CR4 |
|
./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 |
503 |
RADF3 |
DI3 = WA2(I-2)*CC(I,K,3)-WA2(I-1)*CC(I-1,K,3) |
|
./pkg/zonal_filt/fftpack.F |
505 |
RADF3 |
CI2 = DI2+DI3 |
|
./pkg/zonal_filt/fftpack.F |
510 |
RADF3 |
TR3 = TAUI*(DI2-DI3) |
|
./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 |
616 |
RADF5 |
CR4 = DI3-DI4 |
|
./pkg/zonal_filt/fftpack.F |
617 |
RADF5 |
CI3 = DI3+DI4 |
|
./pkg/zonal_filt/fftpack.F |
77 |
RADB3 |
DI3 = CI2-CR3 |
|
./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 |