CAM
|
Functions/Subroutines | |
subroutine | fft99 (A, WORK, TRIGS, IFAX, INC, JUMP, N, LOT, ISIGN) |
subroutine | fft99a (A, WORK, TRIGS, INC, JUMP, N, LOT) |
subroutine | fft99b (WORK, A, TRIGS, INC, JUMP, N, LOT) |
subroutine | fft991 (A, WORK, TRIGS, IFAX, INC, JUMP, N, LOT, ISIGN) |
subroutine | set99 (TRIGS, IFAX, N) |
subroutine | fax (IFAX, N, MODE) |
subroutine | fftrig (TRIGS, N, MODE) |
subroutine | vpassm (A, B, C, D, TRIGS, INC1, INC2, INC3, INC4, LOT, N, IFAC, LA) |
subroutine fax | ( | integer, dimension(10) | IFAX, |
integer | N, | ||
integer | MODE | ||
) |
subroutine fft99 | ( | real(r8), dimension(lot* (n+2) ) | A, |
real(r8), dimension(lot*(n+1)) | WORK, | ||
real(r8), dimension(3*n/2+1) | TRIGS, | ||
integer, dimension(13) | IFAX, | ||
integer | INC, | ||
integer | JUMP, | ||
integer | N, | ||
integer | LOT, | ||
integer | ISIGN | ||
) |
subroutine fft991 | ( | real(r8), dimension(*) | A, |
real(r8), dimension(*) | WORK, | ||
real(r8), dimension(*) | TRIGS, | ||
integer, dimension(13) | IFAX, | ||
integer | INC, | ||
integer | JUMP, | ||
integer | N, | ||
integer | LOT, | ||
integer | ISIGN | ||
) |
subroutine fft99a | ( | real(r8), dimension(*) | A, |
real(r8), dimension(*) | WORK, | ||
real(r8), dimension(*) | TRIGS, | ||
integer | INC, | ||
integer | JUMP, | ||
integer | N, | ||
integer | LOT | ||
) |
subroutine fft99b | ( | real(r8), dimension(*) | WORK, |
real(r8), dimension(*) | A, | ||
real(r8), dimension(*) | TRIGS, | ||
integer | INC, | ||
integer | JUMP, | ||
integer | N, | ||
integer | LOT | ||
) |
subroutine fftrig | ( | real(r8), dimension(*) | TRIGS, |
integer | N, | ||
integer | MODE | ||
) |
subroutine set99 | ( | real(r8), dimension(*) | TRIGS, |
integer, dimension(13) | IFAX, | ||
integer | N | ||
) |
subroutine vpassm | ( | real(r8), dimension(*) | A, |
real(r8), dimension(*) | B, | ||
real(r8), dimension(*) | C, | ||
real(r8), dimension(*) | D, | ||
real(r8), dimension(*) | TRIGS, | ||
integer | INC1, | ||
integer | INC2, | ||
integer | INC3, | ||
integer | INC4, | ||
integer | LOT, | ||
integer | N, | ||
integer | IFAC, | ||
integer | LA | ||
) |