File |
Line number |
Procedure |
Code |
./pkg/zonal_filt/fftpack.F |
1217 |
R8ADBG |
AR2 = AR1 |
./pkg/zonal_filt/fftpack.F |
1221 |
R8ADBG |
AR2H = DC2*AR2-DS2*AI2 |
./pkg/zonal_filt/fftpack.F |
1222 |
R8ADBG |
AI2 = DC2*AI2+DS2*AR2 |
./pkg/zonal_filt/fftpack.F |
1223 |
R8ADBG |
AR2 = AR2H |
./pkg/zonal_filt/fftpack.F |
1225 |
R8ADBG |
C2(IK,L) = C2(IK,L)+AR2*CH2(IK,J) |
./pkg/zonal_filt/fftpack.F |
1653 |
R8ADFG |
AR2 = AR1 |
./pkg/zonal_filt/fftpack.F |
1657 |
R8ADFG |
AR2H = DC2*AR2-DS2*AI2 |
./pkg/zonal_filt/fftpack.F |
1658 |
R8ADFG |
AI2 = DC2*AI2+DS2*AR2 |
./pkg/zonal_filt/fftpack.F |
1659 |
R8ADFG |
AR2 = AR2H |
./pkg/zonal_filt/fftpack.F |
1661 |
R8ADFG |
CH2(IK,L) = CH2(IK,L)+AR2*C2(IK,J) |
./pkg/zonal_filt/fftpack.F |
290 |
RADBG |
AR2 = AR1 |
./pkg/zonal_filt/fftpack.F |
294 |
RADBG |
AR2H = DC2*AR2-DS2*AI2 |
./pkg/zonal_filt/fftpack.F |
295 |
RADBG |
AI2 = DC2*AI2+DS2*AR2 |
./pkg/zonal_filt/fftpack.F |
296 |
RADBG |
AR2 = AR2H |
./pkg/zonal_filt/fftpack.F |
298 |
RADBG |
C2(IK,L) = C2(IK,L)+AR2*CH2(IK,J) |
./pkg/zonal_filt/fftpack.F |
740 |
RADFG |
AR2 = AR1 |
./pkg/zonal_filt/fftpack.F |
744 |
RADFG |
AR2H = DC2*AR2-DS2*AI2 |
./pkg/zonal_filt/fftpack.F |
745 |
RADFG |
AI2 = DC2*AI2+DS2*AR2 |
./pkg/zonal_filt/fftpack.F |
746 |
RADFG |
AR2 = AR2H |
./pkg/zonal_filt/fftpack.F |
748 |
RADFG |
CH2(IK,L) = CH2(IK,L)+AR2*C2(IK,J) |