| File |
Line number |
Procedure |
Code |
|
./pkg/zonal_filt/fftpack.F |
1009 |
R8ADB3 |
DI2 = CI2+CR3 |
|
./pkg/zonal_filt/fftpack.F |
1011 |
R8ADB3 |
CH(I-1,K,2) = WA1(I-2)*DR2-WA1(I-1)*DI2 |
|
./pkg/zonal_filt/fftpack.F |
1012 |
R8ADB3 |
CH(I,K,2) = WA1(I-2)*DI2+WA1(I-1)*DR2 |
|
./pkg/zonal_filt/fftpack.F |
1130 |
R8ADB5 |
DI2 = CI2+CR5 |
|
./pkg/zonal_filt/fftpack.F |
1131 |
R8ADB5 |
CH(I-1,K,2) = WA1(I-2)*DR2-WA1(I-1)*DI2 |
|
./pkg/zonal_filt/fftpack.F |
1132 |
R8ADB5 |
CH(I,K,2) = WA1(I-2)*DI2+WA1(I-1)*DR2 |
|
./pkg/zonal_filt/fftpack.F |
1420 |
R8ADF3 |
DI2 = WA1(I-2)*CC(I,K,2)-WA1(I-1)*CC(I-1,K,2) |
|
./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 |
1518 |
R8ADF5 |
DI2 = WA1(I-2)*CC(I,K,2)-WA1(I-1)*CC(I-1,K,2) |
|
./pkg/zonal_filt/fftpack.F |
1527 |
R8ADF5 |
CR5 = DI2-DI5 |
|
./pkg/zonal_filt/fftpack.F |
1528 |
R8ADF5 |
CI2 = DI2+DI5 |
|
./pkg/zonal_filt/fftpack.F |
201 |
RADB5 |
DI2 = CI2+CR5 |
|
./pkg/zonal_filt/fftpack.F |
202 |
RADB5 |
CH(I-1,K,2) = WA1(I-2)*DR2-WA1(I-1)*DI2 |
|
./pkg/zonal_filt/fftpack.F |
203 |
RADB5 |
CH(I,K,2) = WA1(I-2)*DI2+WA1(I-1)*DR2 |
|
./pkg/zonal_filt/fftpack.F |
501 |
RADF3 |
DI2 = WA1(I-2)*CC(I,K,2)-WA1(I-1)*CC(I-1,K,2) |
|
./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 |
603 |
RADF5 |
DI2 = WA1(I-2)*CC(I,K,2)-WA1(I-1)*CC(I-1,K,2) |
|
./pkg/zonal_filt/fftpack.F |
612 |
RADF5 |
CR5 = DI2-DI5 |
|
./pkg/zonal_filt/fftpack.F |
613 |
RADF5 |
CI2 = DI2+DI5 |
|
./pkg/zonal_filt/fftpack.F |
76 |
RADB3 |
DI2 = CI2+CR3 |
|
./pkg/zonal_filt/fftpack.F |
78 |
RADB3 |
CH(I-1,K,2) = WA1(I-2)*DR2-WA1(I-1)*DI2 |
|
./pkg/zonal_filt/fftpack.F |
79 |
RADB3 |
CH(I,K,2) = WA1(I-2)*DI2+WA1(I-1)*DR2 |