kopia lustrzana https://github.com/Dsplib/libdspl-2.0
754 wiersze
43 KiB
C
754 wiersze
43 KiB
C
/*
|
|
* Copyright (c) 2015-2019 Sergey Bakhurin
|
|
* Digital Signal Processing Library [http://dsplib.org]
|
|
*
|
|
* This file is part of libdspl-2.0.
|
|
*
|
|
* is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* DSPL is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* along with Foobar. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
|
|
#ifndef DSPL_H
|
|
#define DSPL_H
|
|
|
|
|
|
|
|
#include <math.h>
|
|
|
|
|
|
/* math const definition */
|
|
#ifndef M_PI
|
|
#define M_PI 3.1415926535897932384626433832795
|
|
#endif
|
|
|
|
#ifndef M_2PI
|
|
#define M_2PI 6.283185307179586476925286766559
|
|
#endif
|
|
|
|
|
|
|
|
typedef double complex_t[2];
|
|
|
|
|
|
|
|
typedef struct
|
|
{
|
|
complex_t* w;
|
|
complex_t* t0;
|
|
complex_t* t1;
|
|
int n;
|
|
} fft_t;
|
|
|
|
|
|
|
|
typedef struct
|
|
{
|
|
void* dat;
|
|
int n;
|
|
int m;
|
|
int type;
|
|
} matrix_t;
|
|
|
|
|
|
#define RE(x) (x[0])
|
|
#define IM(x) (x[1])
|
|
|
|
|
|
#define SQR(x) ((x) * (x))
|
|
#define ABSSQR(x) ((SQR(RE(x))) + (SQR(IM(x))))
|
|
#define ABS(x) sqrt((ABSSQR(x)))
|
|
#define ARG(x) atan2(IM(x), RE(x))
|
|
|
|
#define CMRE(a,b) ((RE(a)) * (RE(b)) - (IM(a)) * (IM(b)))
|
|
#define CMIM(a,b) ((RE(a)) * (IM(b)) + (IM(a)) * (RE(b)))
|
|
|
|
#define CMCONJRE(a, b) ((RE(a)) * (RE(b)) + (IM(a)) * (IM(b)))
|
|
#define CMCONJIM(a, b) ((IM(a)) * (RE(b)) - (RE(a)) * (IM(b)))
|
|
|
|
|
|
|
|
#define RES_OK 0
|
|
|
|
/* Error codes */
|
|
/* A 0x01xxxxxx*/
|
|
/* B 0x02xxxxxx*/
|
|
/* C 0x03xxxxxx*/
|
|
/* D 0x04xxxxxx*/
|
|
#define ERROR_DAT_TYPE 0x04012020
|
|
#define ERROR_DIV_ZERO 0x04102226
|
|
/* E 0x05xxxxxx*/
|
|
#define ERROR_ELLIP_MODULE 0x05121315
|
|
/* F 0x06xxxxxx*/
|
|
#define ERROR_FFT_CREATE 0x06060318
|
|
#define ERROR_FFT_SIZE 0x06062021
|
|
#define ERROR_FILTER_A0 0x06100100
|
|
#define ERROR_FILTER_FT 0x06100620
|
|
#define ERROR_FILTER_ORD 0x06101518
|
|
#define ERROR_FILTER_RP 0x06101816
|
|
#define ERROR_FILTER_RS 0x06101819
|
|
#define ERROR_FNAME 0x06140113
|
|
#define ERROR_FOPEN 0x06151605
|
|
#define ERROR_FREAD_SIZE 0x06180501
|
|
#define ERROR_FWRITE_SIZE 0x06231820
|
|
/* G 0x07xxxxxx*/
|
|
/* H 0x08xxxxxx*/
|
|
/* I 0x09xxxxxx*/
|
|
#define ERROR_INC_SIZE 0x09140319
|
|
/* J 0x10xxxxxx*/
|
|
/* K 0x11xxxxxx*/
|
|
/* L 0x12xxxxxx*/
|
|
/* M 0x13xxxxxx*/
|
|
#define ERROR_MATRIX_SIZE 0x13011909
|
|
/* N 0x14xxxxxx*/
|
|
#define ERROR_NEGATIVE 0x14050701
|
|
/* O 0x15xxxxxx*/
|
|
/* P 0x16xxxxxx*/
|
|
#define ERROR_POLY_ORD 0x16151518
|
|
#define ERROR_PTR 0x16201800
|
|
/* Q 0x17xxxxxx*/
|
|
/* R 0x18xxxxxx*/
|
|
#define ERROR_RAND_SIGMA 0x18011909
|
|
#define ERROR_RESAMPLE_RATIO 0x18051801
|
|
#define ERROR_RESAMPLE_FRAC_DELAY 0x18050604
|
|
/* S 0x19xxxxxx*/
|
|
#define ERROR_SIZE 0x19092605
|
|
#define ERROR_SYM_TYPE 0x19251320
|
|
/* T 0x20xxxxxx*/
|
|
/* U 0x21xxxxxx*/
|
|
#define ERROR_UNWRAP 0x21142318
|
|
/* V 0x22xxxxxx*/
|
|
/* W 0x23xxxxxx*/
|
|
#define ERROR_WIN_TYPE 0x23092025
|
|
#define ERROR_WIN_SYM 0x23091925
|
|
/* X 0x24xxxxxx*/
|
|
/* Y 0x25xxxxxx*/
|
|
/* Z 0x26xxxxxx*/
|
|
|
|
#define DAT_MASK 0x00000001
|
|
#define DAT_DOUBLE 0x00000000
|
|
#define DAT_COMPLEX 0x00000001
|
|
|
|
#define DSPL_MATRIX_BLOCK 32
|
|
|
|
|
|
#define DSPL_SYMMETRIC 0x00000000
|
|
#define DSPL_PERIODIC 0x00000001
|
|
|
|
|
|
#define DSPL_FLAG_LOG 0x00000001
|
|
#define DSPL_FLAG_UNWRAP 0x00000002
|
|
|
|
#define DSPL_WIN_SYM_MASK 0x00000001
|
|
#define DSPL_WIN_MASK 0x000FFFFE
|
|
|
|
#define DSPL_WIN_SYMMETRIC DSPL_SYMMETRIC
|
|
#define DSPL_WIN_PERIODIC DSPL_PERIODIC
|
|
|
|
|
|
#define DSPL_WIN_BARTLETT 0x00000004
|
|
#define DSPL_WIN_BARTLETT_HANN 0x00000008
|
|
#define DSPL_WIN_BLACKMAN 0x00000010
|
|
#define DSPL_WIN_BLACKMAN_HARRIS 0x00000040
|
|
#define DSPL_WIN_BLACKMAN_NUTTALL 0x00000080
|
|
#define DSPL_WIN_FLAT_TOP 0x00000100
|
|
#define DSPL_WIN_GAUSSIAN 0x00000400
|
|
#define DSPL_WIN_HAMMING 0x00000800
|
|
#define DSPL_WIN_HANN 0x00001000
|
|
#define DSPL_WIN_LANCZOS 0x00004000
|
|
#define DSPL_WIN_NUTTALL 0x00008000
|
|
#define DSPL_WIN_RECT 0x00010000
|
|
#define DSPL_WIN_COS 0x00040000
|
|
|
|
|
|
#define ELLIP_ITER 16
|
|
#define ELLIP_MAX_ORD 24
|
|
|
|
#define DSPL_VERIF_FAILED 1
|
|
#define DSPL_VERIF_SUCCESS 0
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef BUILD_LIB
|
|
// Declare DSPL_API for Windows OS
|
|
#ifdef WIN_OS
|
|
#define DSPL_API __declspec(dllexport)
|
|
#endif // WIN_OS
|
|
// Declare DSPL_API for LINUX OS
|
|
#ifdef LINUX_OS
|
|
#define DSPL_API
|
|
#endif //LINUX_OS
|
|
#endif //BUILD_DLL
|
|
|
|
#define COMMA ,
|
|
|
|
|
|
#ifdef BUILD_LIB
|
|
#define DECLARE_FUNC(type, fn, param)\
|
|
type DSPL_API fn(param);
|
|
#endif
|
|
|
|
#ifndef BUILD_LIB
|
|
#define DECLARE_FUNC( type, fn, param)\
|
|
typedef type (*p_##fn)(param);\
|
|
extern p_##fn fn;
|
|
|
|
#endif
|
|
|
|
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, acos_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, asin_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, butter_ap, double
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, butter_ap_zp, int
|
|
COMMA double
|
|
COMMA complex_t*
|
|
COMMA int*
|
|
COMMA complex_t*
|
|
COMMA int*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby_poly1, double*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby_poly2, double*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby1_ap, double
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby1_ap_zp, int
|
|
COMMA double
|
|
COMMA complex_t*
|
|
COMMA int*
|
|
COMMA complex_t*
|
|
COMMA int*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby2_ap, double rs
|
|
COMMA int ord
|
|
COMMA double* b
|
|
COMMA double* a);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cheby2_ap_zp, int
|
|
COMMA double
|
|
COMMA complex_t*
|
|
COMMA int*
|
|
COMMA complex_t*
|
|
COMMA int*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cmplx2re, complex_t*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, concat, void*
|
|
COMMA size_t
|
|
COMMA void*
|
|
COMMA size_t
|
|
COMMA void*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, conv, double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, conv_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, conv_fft_cmplx, complex_t* a
|
|
COMMA int na
|
|
COMMA complex_t* b
|
|
COMMA int nb
|
|
COMMA fft_t* pfft
|
|
COMMA complex_t* c);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, cos_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, decimate, double* x
|
|
COMMA int n
|
|
COMMA int dec
|
|
COMMA double* y
|
|
COMMA int* cnt);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, decimate_cmplx, complex_t* x
|
|
COMMA int n
|
|
COMMA int dec
|
|
COMMA complex_t* y
|
|
COMMA int* cnt);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, dft, double*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, dft_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(double, dmod, double
|
|
COMMA double);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(void, dspl_info, void);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_acd, double* w
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA double* u);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_acd_cmplx, complex_t* w
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA complex_t* u);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_ap, double rp
|
|
COMMA double rs
|
|
COMMA int ord
|
|
COMMA double* b
|
|
COMMA double* a);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_ap_zp, int ord
|
|
COMMA double rp
|
|
COMMA double rs
|
|
COMMA complex_t* z
|
|
COMMA int* nz
|
|
COMMA complex_t* p
|
|
COMMA int* np);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_asn, double* w
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA double* u);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_asn_cmplx, complex_t* w
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA complex_t* u);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_cd, double* u
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA double* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_cd_cmplx, complex_t* u
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA complex_t* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_landen, double k
|
|
COMMA int n
|
|
COMMA double* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_modulareq, double rp
|
|
COMMA double rs
|
|
COMMA int ord
|
|
COMMA double* k);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_rat, double* w
|
|
COMMA int n
|
|
COMMA int ord
|
|
COMMA double k
|
|
COMMA double* u);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_sn, double* u
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA double* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ellip_sn_cmplx, complex_t* u
|
|
COMMA int n
|
|
COMMA double k
|
|
COMMA complex_t* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, idft_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ifft_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA fft_t*
|
|
COMMA complex_t* );
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, farrow_lagrange, double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double**
|
|
COMMA int*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, farrow_spline, double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double**
|
|
COMMA int*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, filter_iir, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, filter_zp2ab, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fft, double*
|
|
COMMA int
|
|
COMMA fft_t*
|
|
COMMA complex_t* );
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fft_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA fft_t*
|
|
COMMA complex_t* );
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fft_create, fft_t*
|
|
COMMA int);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(void, fft_free, fft_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fft_shift, double*
|
|
COMMA int n
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fft_shift_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, flipip, double*
|
|
COMMA int);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, flipip_cmplx, complex_t*
|
|
COMMA int);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fourier_integral_cmplx, double* t
|
|
COMMA complex_t* s
|
|
COMMA int nt
|
|
COMMA int nw
|
|
COMMA double* w
|
|
COMMA complex_t* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fourier_series_dec, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fourier_series_dec_cmplx, double* t
|
|
COMMA complex_t* s
|
|
COMMA int nt
|
|
COMMA double period
|
|
COMMA int nw
|
|
COMMA double* w
|
|
COMMA complex_t* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, fourier_series_rec, double*
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, freqs, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, freqs_cmplx, double* b
|
|
COMMA double* a
|
|
COMMA int ord
|
|
COMMA complex_t* s
|
|
COMMA int n
|
|
COMMA complex_t* h);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, freqs_resp, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, freqs2time, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA int
|
|
COMMA fft_t*
|
|
COMMA double*
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, freqz, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, goertzel, double*
|
|
COMMA int
|
|
COMMA int*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, goertzel_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA int*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, linspace, double
|
|
COMMA double
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, log_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, logspace, double
|
|
COMMA double
|
|
COMMA int
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, low2bp, double* b
|
|
COMMA double* a
|
|
COMMA int ord
|
|
COMMA double w0
|
|
COMMA double wpl
|
|
COMMA double wph
|
|
COMMA double* beta
|
|
COMMA double* alpha);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, low2high, double* b
|
|
COMMA double* a
|
|
COMMA int ord
|
|
COMMA double w0
|
|
COMMA double w1
|
|
COMMA double* beta
|
|
COMMA double* alpha);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, low2low, double* b
|
|
COMMA double* a
|
|
COMMA int ord
|
|
COMMA double w0
|
|
COMMA double w1
|
|
COMMA double* beta
|
|
COMMA double* alpha);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, matrix_create, matrix_t* a
|
|
COMMA int n
|
|
COMMA int m
|
|
COMMA int type);
|
|
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(void, matrix_free, matrix_t* a);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, matrix_print, matrix_t* a
|
|
COMMA const char* name
|
|
COMMA const char* format);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, matrix_transpose, matrix_t* a
|
|
COMMA matrix_t* b);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, matrix_transpose_hermite, matrix_t* a
|
|
COMMA matrix_t* b);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, poly_z2a_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, polyval, double*
|
|
COMMA int
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, polyval_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, randn, double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA double);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, randu, double*
|
|
COMMA int);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, ratcompos, double* b
|
|
COMMA double* a
|
|
COMMA int n
|
|
COMMA double* c
|
|
COMMA double* d
|
|
COMMA int p
|
|
COMMA double* beta
|
|
COMMA double* alpha);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, re2cmplx, double*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, readbin, char* fn
|
|
COMMA void** x
|
|
COMMA int* k
|
|
COMMA int* dtype);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, signal_pimp, double*
|
|
COMMA size_t
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, signal_saw, double* t
|
|
COMMA size_t n
|
|
COMMA double amp
|
|
COMMA double dt
|
|
COMMA double period
|
|
COMMA double* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, sin_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, sinc, double* x
|
|
COMMA int n
|
|
COMMA double a
|
|
COMMA double* y);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, sine_int, double* x
|
|
COMMA int n
|
|
COMMA double* si);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, sqrt_cmplx, complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, trapint, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA double*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, trapint_cmplx, double*
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA complex_t*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, unwrap, double*
|
|
COMMA int
|
|
COMMA double
|
|
COMMA double);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, verif, double* x
|
|
COMMA double* y
|
|
COMMA size_t n
|
|
COMMA double eps
|
|
COMMA double* err);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, verif_cmplx, complex_t* x
|
|
COMMA complex_t* y
|
|
COMMA size_t n
|
|
COMMA double eps
|
|
COMMA double* err);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writebin, void*
|
|
COMMA int
|
|
COMMA int
|
|
COMMA char*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writetxt, double*
|
|
COMMA double*
|
|
COMMA int
|
|
COMMA char*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writetxt_3d, double* x
|
|
COMMA int nx
|
|
COMMA double* y
|
|
COMMA int ny
|
|
COMMA double* z
|
|
COMMA char* fn);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writetxt_3dline, double* x
|
|
COMMA double* y
|
|
COMMA double* z
|
|
COMMA int n
|
|
COMMA char* fn);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writetxt_cmplx_im, double*
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA char*);
|
|
//------------------------------------------------------------------------------
|
|
DECLARE_FUNC(int, writetxt_cmplx_re, double*
|
|
COMMA complex_t*
|
|
COMMA int
|
|
COMMA char*);
|
|
//------------------------------------------------------------------------------
|
|
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
|
|
void* dspl_load();
|
|
void dspl_free(void* handle);
|
|
|
|
|
|
|
|
#endif //DSPL_H
|
|
|