File |
Line number |
Procedure |
Code |
./pkg/zonal_filt/fftpack.F |
1005 |
R8ADB3 |
CR3 = TAUI*(CC(I-1,3,K)-CC(IC-1,2,K)) |
./pkg/zonal_filt/fftpack.F |
1009 |
R8ADB3 |
DI2 = CI2+CR3 |
./pkg/zonal_filt/fftpack.F |
1010 |
R8ADB3 |
DI3 = CI2-CR3 |
./pkg/zonal_filt/fftpack.F |
1049 |
R8ADB4 |
CR3 = TR2-TR3 |
./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 |
1092 |
R8ADB5 |
CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3 |
./pkg/zonal_filt/fftpack.F |
1096 |
R8ADB5 |
CH(1,K,3) = CR3-CI4 |
./pkg/zonal_filt/fftpack.F |
1097 |
R8ADB5 |
CH(1,K,4) = CR3+CI4 |
./pkg/zonal_filt/fftpack.F |
1117 |
R8ADB5 |
CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3 |
./pkg/zonal_filt/fftpack.F |
1123 |
R8ADB5 |
DR3 = CR3-CI4 |
./pkg/zonal_filt/fftpack.F |
1124 |
R8ADB5 |
DR4 = CR3+CI4 |
./pkg/zonal_filt/fftpack.F |
118 |
RADB4 |
CR3 = TR2-TR3 |
./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 |
1460 |
R8ADF4 |
CR3 = WA2(I-2)*CC(I-1,K,3)+WA2(I-1)*CC(I,K,3) |
./pkg/zonal_filt/fftpack.F |
1470 |
R8ADF4 |
TR2 = CC(I-1,K,1)+CR3 |
./pkg/zonal_filt/fftpack.F |
1471 |
R8ADF4 |
TR3 = CC(I-1,K,1)-CR3 |
./pkg/zonal_filt/fftpack.F |
1504 |
R8ADF5 |
CR3 = CC(1,K,4)+CC(1,K,3) |
./pkg/zonal_filt/fftpack.F |
1506 |
R8ADF5 |
CH(1,1,K) = CC(1,K,1)+CR2+CR3 |
./pkg/zonal_filt/fftpack.F |
1507 |
R8ADF5 |
CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3 |
./pkg/zonal_filt/fftpack.F |
1509 |
R8ADF5 |
CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3 |
./pkg/zonal_filt/fftpack.F |
1529 |
R8ADF5 |
CR3 = DR3+DR4 |
./pkg/zonal_filt/fftpack.F |
1533 |
R8ADF5 |
CH(I-1,1,K) = CC(I-1,K,1)+CR2+CR3 |
./pkg/zonal_filt/fftpack.F |
1535 |
R8ADF5 |
TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3 |
./pkg/zonal_filt/fftpack.F |
1537 |
R8ADF5 |
TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3 |
./pkg/zonal_filt/fftpack.F |
163 |
RADB5 |
CR3 = CC(1,1,K)+TR12*TR2+TR11*TR3 |
./pkg/zonal_filt/fftpack.F |
167 |
RADB5 |
CH(1,K,3) = CR3-CI4 |
./pkg/zonal_filt/fftpack.F |
168 |
RADB5 |
CH(1,K,4) = CR3+CI4 |
./pkg/zonal_filt/fftpack.F |
188 |
RADB5 |
CR3 = CC(I-1,1,K)+TR12*TR2+TR11*TR3 |
./pkg/zonal_filt/fftpack.F |
194 |
RADB5 |
DR3 = CR3-CI4 |
./pkg/zonal_filt/fftpack.F |
195 |
RADB5 |
DR4 = CR3+CI4 |
./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 |
553 |
RADF4 |
TR2 = CC(I-1,K,1)+CR3 |
./pkg/zonal_filt/fftpack.F |
554 |
RADF4 |
TR3 = CC(I-1,K,1)-CR3 |
./pkg/zonal_filt/fftpack.F |
589 |
RADF5 |
CR3 = CC(1,K,4)+CC(1,K,3) |
./pkg/zonal_filt/fftpack.F |
591 |
RADF5 |
CH(1,1,K) = CC(1,K,1)+CR2+CR3 |
./pkg/zonal_filt/fftpack.F |
592 |
RADF5 |
CH(IDO,2,K) = CC(1,K,1)+TR11*CR2+TR12*CR3 |
./pkg/zonal_filt/fftpack.F |
594 |
RADF5 |
CH(IDO,4,K) = CC(1,K,1)+TR12*CR2+TR11*CR3 |
./pkg/zonal_filt/fftpack.F |
614 |
RADF5 |
CR3 = DR3+DR4 |
./pkg/zonal_filt/fftpack.F |
618 |
RADF5 |
CH(I-1,1,K) = CC(I-1,K,1)+CR2+CR3 |
./pkg/zonal_filt/fftpack.F |
620 |
RADF5 |
TR2 = CC(I-1,K,1)+TR11*CR2+TR12*CR3 |
./pkg/zonal_filt/fftpack.F |
622 |
RADF5 |
TR3 = CC(I-1,K,1)+TR12*CR2+TR11*CR3 |
./pkg/zonal_filt/fftpack.F |
72 |
RADB3 |
CR3 = TAUI*(CC(I-1,3,K)-CC(IC-1,2,K)) |
./pkg/zonal_filt/fftpack.F |
76 |
RADB3 |
DI2 = CI2+CR3 |
./pkg/zonal_filt/fftpack.F |
77 |
RADB3 |
DI3 = CI2-CR3 |