1 subroutine zfftf (n,c,wsave)
2 implicit double precision (a-h,o-z)
7 call zfftf1 (n,c,wsave,wsave(iw1),wsave(iw2))
subroutine zfftf1(n, c, ch, wa, ifac)
OCTAVE_EXPORT octave_value_list etc The functions then dimension(columns)
subroutine zfftf(n, c, wsave)