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