|
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 | ||
| ) |
