mirror of
https://github.com/MarlinFirmware/Marlin.git
synced 2024-11-24 12:35:51 +00:00
cc2925b705
The code for the LSQ solver (qr_solve) is copyrighted by John Burkardt and released under LGPL here: http://people.sc.fsu.edu/~%20jburkardt/c_src/qr_solve/qr_solve.html (see qr_solve.cpp for further copyright information)
23 lines
1.1 KiB
C
23 lines
1.1 KiB
C
#include "Configuration.h"
|
|
|
|
#ifdef ACCURATE_BED_LEVELING
|
|
|
|
void daxpy ( int n, double da, double dx[], int incx, double dy[], int incy );
|
|
double ddot ( int n, double dx[], int incx, double dy[], int incy );
|
|
double dnrm2 ( int n, double x[], int incx );
|
|
void dqrank ( double a[], int lda, int m, int n, double tol, int *kr,
|
|
int jpvt[], double qraux[] );
|
|
void dqrdc ( double a[], int lda, int n, int p, double qraux[], int jpvt[],
|
|
double work[], int job );
|
|
int dqrls ( double a[], int lda, int m, int n, double tol, int *kr, double b[],
|
|
double x[], double rsd[], int jpvt[], double qraux[], int itask );
|
|
void dqrlss ( double a[], int lda, int m, int n, int kr, double b[], double x[],
|
|
double rsd[], int jpvt[], double qraux[] );
|
|
int dqrsl ( double a[], int lda, int n, int k, double qraux[], double y[],
|
|
double qy[], double qty[], double b[], double rsd[], double ab[], int job );
|
|
void dscal ( int n, double sa, double x[], int incx );
|
|
void dswap ( int n, double x[], int incx, double y[], int incy );
|
|
double *qr_solve ( int m, int n, double a[], double b[] );
|
|
|
|
#endif
|