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