File |
Line number |
Procedure |
Code |
./pkg/zonal_filt/fftpack.F |
1000 |
R8ADB3 |
CR2 = CC(I-1,1,K)+TAUR*TR2 |
./pkg/zonal_filt/fftpack.F |
1003 |
R8ADB3 |
CI2 = CC(I,1,K)+TAUR*TI2 |
./pkg/zonal_filt/fftpack.F |
1407 |
R8ADF3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
1412 |
R8ADF3 |
CH(IDO,2,K) = CC(1,K,1)+TAUR*CR2 |
./pkg/zonal_filt/fftpack.F |
1427 |
R8ADF3 |
TR2 = CC(I-1,K,1)+TAUR*CR2 |
./pkg/zonal_filt/fftpack.F |
1428 |
R8ADF3 |
TI2 = CC(I,K,1)+TAUR*CI2 |
./pkg/zonal_filt/fftpack.F |
488 |
RADF3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
493 |
RADF3 |
CH(IDO,2,K) = CC(1,K,1)+TAUR*CR2 |
./pkg/zonal_filt/fftpack.F |
508 |
RADF3 |
TR2 = CC(I-1,K,1)+TAUR*CR2 |
./pkg/zonal_filt/fftpack.F |
509 |
RADF3 |
TI2 = CC(I,K,1)+TAUR*CI2 |
./pkg/zonal_filt/fftpack.F |
52 |
RADB3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
55 |
RADB3 |
CR2 = CC(1,1,K)+TAUR*TR2 |
./pkg/zonal_filt/fftpack.F |
67 |
RADB3 |
CR2 = CC(I-1,1,K)+TAUR*TR2 |
./pkg/zonal_filt/fftpack.F |
70 |
RADB3 |
CI2 = CC(I,1,K)+TAUR*TI2 |
./pkg/zonal_filt/fftpack.F |
985 |
R8ADB3 |
DATA TAUR,TAUI /-.5D0,.866025403784439D0/ |
./pkg/zonal_filt/fftpack.F |
988 |
R8ADB3 |
CR2 = CC(1,1,K)+TAUR*TR2 |