94 lines
2.0 KiB
C
94 lines
2.0 KiB
C
/* lmath.h
|
|
|
|
This file is part of a program that implements a Software-Defined Radio.
|
|
|
|
Copyright (C) 2015, 2023 Warren Pratt, NR0V
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either version 2
|
|
of the License, or (at your option) any later version.
|
|
|
|
This program 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 General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
|
|
The author can be reached by email at
|
|
|
|
warren@wpratt.com
|
|
|
|
*/
|
|
|
|
extern void dR (int n, double* r, double* y, double* z);
|
|
|
|
extern void trI (
|
|
int n,
|
|
double* r,
|
|
double* B,
|
|
double* y,
|
|
double* v,
|
|
double* dR_z
|
|
);
|
|
|
|
extern void asolve(int xsize, int asize, double* x, double* a, double* r, double* z);
|
|
|
|
extern void median(int n, double* a, double* med);
|
|
|
|
#ifndef _bldr_h
|
|
#define _bldr_h
|
|
|
|
typedef struct _bldr
|
|
{
|
|
double* catxy;
|
|
double* sx;
|
|
double* sy;
|
|
double* h;
|
|
int* p;
|
|
int* np;
|
|
double* taa;
|
|
double* tab;
|
|
double* tag;
|
|
double* tad;
|
|
double* tbb;
|
|
double* tbg;
|
|
double* tbd;
|
|
double* tgg;
|
|
double* tgd;
|
|
double* tdd;
|
|
double* A;
|
|
double* B;
|
|
double* C;
|
|
double* D;
|
|
double* E;
|
|
double* F;
|
|
double* G;
|
|
double* MAT;
|
|
double* RHS;
|
|
double* SLN;
|
|
double* z;
|
|
double* zp;
|
|
double* wrk;
|
|
int* ipiv;
|
|
} bldr, *BLDR;
|
|
|
|
extern BLDR create_builder(int points, int ints);
|
|
|
|
extern void destroy_builder(BLDR a);
|
|
|
|
extern void flush_builder(BLDR a, int points, int ints);
|
|
|
|
extern void xbuilder(BLDR a, int points, double* x, double* y, int ints, double* t, int* info, double* c, double ptol);
|
|
|
|
extern int fcompare(const void* a, const void* b);
|
|
|
|
extern void decomp(int n, double* a, int* piv, int* info, double* wrk);
|
|
|
|
extern void dsolve(int n, double* a, int* piv, double* b, double* x);
|
|
|
|
#endif
|