Searched defs:cftbcol (Results 1 – 1 of 1) sorted by relevance
| /external/fft2d/src/fft2d/fft2d/ |
| D | fft4f2d.f | 925 subroutine cftbcol(n1max, n1, n, a, w) subroutine
926 integer n1max, n1, n, i, j, j1, j2, j3, k, k1, ks, l, m local
927 real*8 a(0 : n1max - 1, 0 : n - 1), w(0 : *)
928 real*8 wk1r, wk1i, wk2r, wk2i, wk3r, wk3i
929 real*8 x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i
|