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