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 |
1006 |
R8ADB3 |
CI3 = TAUI*(CC(I,3,K)+CC(IC,2,K)) |
./pkg/zonal_filt/fftpack.F |
1407 |
R8ADF3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
1411 |
R8ADF3 |
CH(1,3,K) = TAUI*(CC(1,K,3)-CC(1,K,2)) |
./pkg/zonal_filt/fftpack.F |
1429 |
R8ADF3 |
TR3 = TAUI*(DI2-DI3) |
./pkg/zonal_filt/fftpack.F |
1430 |
R8ADF3 |
TI3 = TAUI*(DR3-DR2) |
./pkg/zonal_filt/fftpack.F |
488 |
RADF3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
492 |
RADF3 |
CH(1,3,K) = TAUI*(CC(1,K,3)-CC(1,K,2)) |
./pkg/zonal_filt/fftpack.F |
510 |
RADF3 |
TR3 = TAUI*(DI2-DI3) |
./pkg/zonal_filt/fftpack.F |
511 |
RADF3 |
TI3 = TAUI*(DR3-DR2) |
./pkg/zonal_filt/fftpack.F |
52 |
RADB3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
57 |
RADB3 |
CI3 = TAUI*(CC(1,3,K)+CC(1,3,K)) |
./pkg/zonal_filt/fftpack.F |
72 |
RADB3 |
CR3 = TAUI*(CC(I-1,3,K)-CC(IC-1,2,K)) |
./pkg/zonal_filt/fftpack.F |
73 |
RADB3 |
CI3 = TAUI*(CC(I,3,K)+CC(IC,2,K)) |
./pkg/zonal_filt/fftpack.F |
985 |
R8ADB3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
990 |
R8ADB3 |
CI3 = TAUI*(CC(1,3,K)+CC(1,3,K)) |