Home
last modified time | relevance | path

Searched refs:nfft (Results 1 – 25 of 1402) sorted by relevance

12345678910>>...57

/dports/science/octopus/octopus-10.5/src/math/
H A Dnfft.F90179 nfft%dim = dim
180 nfft%M(:) = M(:)
181 nfft%N(:) = N(:)
191 nfft%M(dim+1:3) = 1
342 FLOAT :: x1_(1:nfft%M(1)), x2_(1:nfft%M(2)), x3_(1:nfft%M(3))
343 FLOAT :: length, cc, eps, dX1(1:nfft%M(1)-1), dX2(1:nfft%M(2)-1), dX3(1:nfft%M(3)-1)
384 call oct_nfft_precompute_one_psi_2d(nfft%plan, nfft%M, x1_, x2_)
400 call oct_nfft_precompute_one_psi_1d(nfft%plan,nfft%M(1),x1_)
490 call zoct_set_f_hat(nfft%plan, nfft%dim, in(ix,iy,iz), ix, iy, iz)
500 call zoct_get_f(nfft%plan, nfft%M, nfft%dim, out(ix,iy,iz), ix, iy, iz)
[all …]
/dports/comms/wsjtz/wsjtx/map65/libm65/
H A Dtimf2.f9025 complex cx0(0:nfft-1),cx1(0:nfft-1)
26 complex cy0(0:nfft-1),cy1(0:nfft-1)
50 nh=nfft/2
51 kstep=nfft
67 if(nwindow.eq.2) cx(0:nfft-1)=w(0:nfft-1)*cx(0:nfft-1)
72 if(nwindow.eq.2) cy(0:nfft-1)=w(0:nfft-1)*cy(0:nfft-1)
89 cxt(0:nfft-1)=cx(0:nfft-1)
106 cyt(0:nfft-1)=cy(0:nfft-1)
118 ave=sum(s(0:nfft-1))/nfft
119 lstrong(0:nfft-1)=s(0:nfft-1).gt.10.0*ave
[all …]
/dports/audio/jamulus/jamulus-r3_8_1/libs/opus/celt/tests/
H A Dtest_unit_mdct.c54 for (k=0;k<nfft;++k) { in check()
55 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
58 re /= nfft/4; in check()
85 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
138 for (k=0;k<nfft;++k) { in test1d()
142 for (k=0;k<nfft/2;++k) { in test1d()
145 for (k=0;k<nfft;++k) { in test1d()
152 in[k] /= nfft; in test1d()
156 for (k=0;k<nfft;++k) in test1d()
162 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/www/chromium-legacy/chromium-88.0.4324.182/third_party/opus/src/celt/tests/
H A Dtest_unit_mdct.c54 for (k=0;k<nfft;++k) { in check()
55 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
58 re /= nfft/4; in check()
85 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
138 for (k=0;k<nfft;++k) { in test1d()
142 for (k=0;k<nfft/2;++k) { in test1d()
145 for (k=0;k<nfft;++k) { in test1d()
152 in[k] /= nfft; in test1d()
156 for (k=0;k<nfft;++k) in test1d()
162 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/audio/opus/opus-1.3.1/celt/tests/
H A Dtest_unit_mdct.c54 for (k=0;k<nfft;++k) { in check()
55 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
58 re /= nfft/4; in check()
85 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
138 for (k=0;k<nfft;++k) { in test1d()
142 for (k=0;k<nfft/2;++k) { in test1d()
145 for (k=0;k<nfft;++k) { in test1d()
152 in[k] /= nfft; in test1d()
156 for (k=0;k<nfft;++k) in test1d()
162 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/comms/wsjtz/wsjtx/lib/
H A Dchkfft2.f9031 nfft=-1
83 if(nfft.eq.-1) n2=999999
109 if(nfft.gt.NMAX) go to 900
110 a(1:nfft)=b(1:nfft) !Copy test data into a()
135 a(1:nfft)=b(1:nfft) !Copy test data into a()
148 a(1:nfft)=a(1:nfft)/nfft
153 do i=1,nfft
157 do i=1,nfft
161 rms=sqrt(sq/nfft)
163 freq=1.e-6*nfft/time
[all …]
H A Dchkfft.f9030 nfft=-1
76 if(nfft.eq.-1) n2=999999
102 if(nfft.gt.NMAX) go to 900
103 a(1:nfft)=b(1:nfft) !Copy test data into a()
112 a(1:nfft)=b(1:nfft) !Copy test data into a()
126 a(1:nfft)=a(1:nfft)/nfft
131 do i=1,nfft
135 do i=1,nfft
139 rms=sqrt(sq/nfft)
141 freq=1.e-6*nfft/time
[all …]
H A Dchkfft3.f9032 nfft=-1
84 if(nfft.eq.-1) n2=999999
110 if(nfft.gt.NMAX) go to 900
111 a(1:nfft)=b(1:nfft) !Copy test data into a()
126 a(1:nfft)=b(1:nfft) !Copy test data into a()
139 a(1:nfft)=a(1:nfft)/nfft
144 do i=1,nfft
148 do i=1,nfft
152 rms=sqrt(sq/nfft)
154 freq=1.e-6*nfft/time
[all …]
H A Dtimefft.f9026 call c_f_pointer(pa,a,[nfft])
27 call c_f_pointer(pa,ar,[nfft])
30 call c_f_pointer(pb,b,[nfft])
31 call c_f_pointer(pb,br,[nfft])
34 call c_f_pointer(pc,c,[nfft])
55 a(1:nfft)=b(1:nfft) !Copy test data into a()
108 gflops=5.0/(1.e9*time/(nfft*log(float(nfft))/log(2.0)))
109 a(1:nfft)=a(1:nfft)/nfft !Normalize the back-transformed data
114 do i=1,nfft
118 do i=1,nfft
[all …]
/dports/audio/sdl2_mixer/SDL2_mixer-2.0.4/external/opus-1.0.3/celt/tests/
H A Dtest_unit_mdct.c63 for (k=0;k<nfft;++k) {
64 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft;
67 re /= nfft/4;
94 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft;
127 for (k=0;k<nfft;++k) {
131 for (k=0;k<nfft/2;++k) {
134 for (k=0;k<nfft;++k) {
140 for (k=0;k<nfft;++k) {
141 in[k] /= nfft;
145 for (k=0;k<nfft;++k)
[all …]
/dports/devel/godot/godot-3.2.3-stable/thirdparty/opus/celt/tests/
H A Dtest_unit_mdct.c79 for (k=0;k<nfft;++k) { in check()
80 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
83 re /= nfft/4; in check()
110 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
143 for (k=0;k<nfft;++k) { in test1d()
147 for (k=0;k<nfft/2;++k) { in test1d()
150 for (k=0;k<nfft;++k) { in test1d()
157 in[k] /= nfft; in test1d()
161 for (k=0;k<nfft;++k) in test1d()
167 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/devel/godot-tools/godot-3.2.3-stable/thirdparty/opus/celt/tests/
H A Dtest_unit_mdct.c79 for (k=0;k<nfft;++k) { in check()
80 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
83 re /= nfft/4; in check()
110 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
143 for (k=0;k<nfft;++k) { in test1d()
147 for (k=0;k<nfft/2;++k) { in test1d()
150 for (k=0;k<nfft;++k) { in test1d()
157 in[k] /= nfft; in test1d()
161 for (k=0;k<nfft;++k) in test1d()
167 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/devel/godot2-tools/godot-2.1.6-stable/thirdparty/opus/celt/tests/
H A Dtest_unit_mdct.c79 for (k=0;k<nfft;++k) { in check()
80 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
83 re /= nfft/4; in check()
110 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
143 for (k=0;k<nfft;++k) { in test1d()
147 for (k=0;k<nfft/2;++k) { in test1d()
150 for (k=0;k<nfft;++k) { in test1d()
157 in[k] /= nfft; in test1d()
161 for (k=0;k<nfft;++k) in test1d()
167 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/devel/godot2/godot-2.1.6-stable/thirdparty/opus/celt/tests/
H A Dtest_unit_mdct.c79 for (k=0;k<nfft;++k) { in check()
80 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
83 re /= nfft/4; in check()
110 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
143 for (k=0;k<nfft;++k) { in test1d()
147 for (k=0;k<nfft/2;++k) { in test1d()
150 for (k=0;k<nfft;++k) { in test1d()
157 in[k] /= nfft; in test1d()
161 for (k=0;k<nfft;++k) in test1d()
167 for (k=0;k<nfft;++k) in test1d()
[all …]
/dports/audio/mumble/mumble-1.3.3/3rdparty/celt-0.11.0-src/tests/
H A Dmdct-test.c38 for (k=0;k<nfft;++k) { in check()
39 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
42 re /= nfft/4; in check()
68 for (k=0;k<nfft/2;++k) { in check_inv()
69 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
101 for (k=0;k<nfft;++k) { in test1d()
105 for (k=0;k<nfft/2;++k) { in test1d()
109 for (k=0;k<nfft;++k) { in test1d()
116 for (k=0;k<nfft;++k) { in test1d()
117 in[k] /= nfft; in test1d()
[all …]
/dports/audio/mumble/mumble-1.3.3/3rdparty/celt-0.7.0-src/tests/
H A Dmdct-test.c30 for (k=0;k<nfft;++k) { in check()
31 double phase = 2*M_PI*(k+.5+.25*nfft)*(bin+.5)/nfft; in check()
34 re /= nfft/4; in check()
60 for (k=0;k<nfft/2;++k) { in check_inv()
61 double phase = 2*M_PI*(bin+.5+.25*nfft)*(k+.5)/nfft; in check_inv()
93 for (k=0;k<nfft;++k) { in test1d()
97 for (k=0;k<nfft/2;++k) { in test1d()
101 for (k=0;k<nfft;++k) { in test1d()
108 for (k=0;k<nfft;++k) { in test1d()
109 in[k] /= nfft; in test1d()
[all …]
/dports/comms/liquid-dsp/liquid-dsp-1.3.2/sandbox/
H A Dfft_rader_prime_test.c73 unsigned int nfft = 17; in main() local
86 if ( nfft <= 2 || !is_prime(nfft)) { in main()
101 for (i=0; i<nfft; i++) { in main()
119 for (i=0; i<nfft-1; i++) in main()
126 for (i=0; i<nfft-1; i++) in main()
136 for (i=0; i<nfft-1; i++) in main()
143 for (i=0; i<nfft-1; i++) { in main()
151 for (i=0; i<nfft-1; i++) in main()
157 for (i=0; i<nfft; i++) in main()
177 for (i=0; i<nfft; i++) { in main()
[all …]
/dports/graphics/bonzomatic/Bonzomatic-2021-03-07/external/kiss_fft/test/
H A Dtwotonetest.c24 double f1 = bin1*2*M_PI/nfft; in two_tone_test()
25 double f2 = bin2*2*M_PI/nfft; in two_tone_test()
39 for (i = 0; i < nfft; i++) { in two_tone_test()
51 for (i=0;i < (nfft/2+1);++i) { in two_tone_test()
60 if (i!=0 && i!= nfft/2) in two_tone_test()
76 int nfft = 4*2*2*3*5; in main() local
77 if (argc>1) nfft = atoi(argv[1]); in main()
83 for (i=0;i<nfft/2;i+= (nfft>>4)+1) { in main()
84 for (j=i;j<nfft/2;j+=(nfft>>4)+7) { in main()
85 snr = two_tone_test(nfft,i,j); in main()
[all …]
/dports/audio/chromaprint/chromaprint-v1.5.0/vendor/kissfft/test/
H A Dtwotonetest.c10 double two_tone_test( int nfft, int bin1,int bin2) in two_tone_test() argument
17 double f1 = bin1*2*M_PI/nfft; in two_tone_test()
18 double f2 = bin2*2*M_PI/nfft; in two_tone_test()
32 for (i = 0; i < nfft; i++) { in two_tone_test()
44 for (i=0;i < (nfft/2+1);++i) { in two_tone_test()
53 if (i!=0 && i!= nfft/2) in two_tone_test()
69 int nfft = 4*2*2*3*5; in main() local
70 if (argc>1) nfft = atoi(argv[1]); in main()
76 for (i=0;i<nfft/2;i+= (nfft>>4)+1) { in main()
77 for (j=i;j<nfft/2;j+=(nfft>>4)+7) { in main()
[all …]
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/kiss_fft130/test/
H A Dtwotonetest.c10 double two_tone_test( int nfft, int bin1,int bin2) in two_tone_test() argument
17 double f1 = bin1*2*M_PI/nfft; in two_tone_test()
18 double f2 = bin2*2*M_PI/nfft; in two_tone_test()
32 for (i = 0; i < nfft; i++) { in two_tone_test()
44 for (i=0;i < (nfft/2+1);++i) { in two_tone_test()
53 if (i!=0 && i!= nfft/2) in two_tone_test()
69 int nfft = 4*2*2*3*5; in main() local
70 if (argc>1) nfft = atoi(argv[1]); in main()
76 for (i=0;i<nfft/2;i+= (nfft>>4)+1) { in main()
77 for (j=i;j<nfft/2;j+=(nfft>>4)+7) { in main()
[all …]
/dports/math/eigen3/eigen-3.3.9/unsupported/Eigen/src/FFT/
H A Dei_fftw_impl.h60 void fwd(complex_type * dst,complex_type * src,int nfft) {
70 void fwd(complex_type * dst,scalar_type * src,int nfft) {
75 void inv(scalar_type * dst,complex_type * src,int nfft) {
190 void fwd( Complex * dst,const Complex *src,int nfft)
192 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src),nfft );
197 void fwd( Complex * dst,const Scalar * src,int nfft)
199 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src) ,nfft);
211 void inv(Complex * dst,const Complex *src,int nfft)
213 get_plan(nfft,true,dst,src).inv(fftw_cast(dst), fftw_cast(src),nfft );
218 void inv( Scalar * dst,const Complex * src,int nfft)
[all …]
/dports/math/stanmath/math-4.2.0/lib/eigen_3.3.9/unsupported/Eigen/src/FFT/
H A Dei_fftw_impl.h60 void fwd(complex_type * dst,complex_type * src,int nfft) {
70 void fwd(complex_type * dst,scalar_type * src,int nfft) {
75 void inv(scalar_type * dst,complex_type * src,int nfft) {
190 void fwd( Complex * dst,const Complex *src,int nfft)
192 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src),nfft );
197 void fwd( Complex * dst,const Scalar * src,int nfft)
199 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src) ,nfft);
211 void inv(Complex * dst,const Complex *src,int nfft)
213 get_plan(nfft,true,dst,src).inv(fftw_cast(dst), fftw_cast(src),nfft );
218 void inv( Scalar * dst,const Complex * src,int nfft)
[all …]
/dports/math/R-cran-RcppEigen/RcppEigen/inst/include/unsupported/Eigen/src/FFT/
H A Dei_fftw_impl.h60 void fwd(complex_type * dst,complex_type * src,int nfft) {
70 void fwd(complex_type * dst,scalar_type * src,int nfft) {
75 void inv(scalar_type * dst,complex_type * src,int nfft) {
190 void fwd( Complex * dst,const Complex *src,int nfft)
192 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src),nfft );
197 void fwd( Complex * dst,const Scalar * src,int nfft)
199 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src) ,nfft);
211 void inv(Complex * dst,const Complex *src,int nfft)
213 get_plan(nfft,true,dst,src).inv(fftw_cast(dst), fftw_cast(src),nfft );
218 void inv( Scalar * dst,const Complex * src,int nfft)
[all …]
/dports/devel/upp/upp/uppsrc/plugin/Eigen/unsupported/Eigen/src/FFT/
H A Dei_fftw_impl.h60 void fwd(complex_type * dst,complex_type * src,int nfft) {
70 void fwd(complex_type * dst,scalar_type * src,int nfft) {
75 void inv(scalar_type * dst,complex_type * src,int nfft) {
190 void fwd( Complex * dst,const Complex *src,int nfft)
192 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src),nfft );
197 void fwd( Complex * dst,const Scalar * src,int nfft)
199 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src) ,nfft);
211 void inv(Complex * dst,const Complex *src,int nfft)
213 get_plan(nfft,true,dst,src).inv(fftw_cast(dst), fftw_cast(src),nfft );
218 void inv( Scalar * dst,const Complex * src,int nfft)
[all …]
/dports/math/libmesh/libmesh-1.6.2/contrib/eigen/3.2.9/unsupported/Eigen/src/FFT/
H A Dei_fftw_impl.h60 void fwd(complex_type * dst,complex_type * src,int nfft) {
70 void fwd(complex_type * dst,scalar_type * src,int nfft) {
75 void inv(scalar_type * dst,complex_type * src,int nfft) {
190 void fwd( Complex * dst,const Complex *src,int nfft)
192 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src),nfft );
197 void fwd( Complex * dst,const Scalar * src,int nfft)
199 get_plan(nfft,false,dst,src).fwd(fftw_cast(dst), fftw_cast(src) ,nfft);
211 void inv(Complex * dst,const Complex *src,int nfft)
213 get_plan(nfft,true,dst,src).inv(fftw_cast(dst), fftw_cast(src),nfft );
218 void inv( Scalar * dst,const Complex * src,int nfft)
[all …]

12345678910>>...57