public static int gerfs(LapackLayout Layout, LapackTranspose Transpose,
int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv,
double[] b, int ldb, double[] x, int ldx, out double[] fErr, out double[] bErr)
{
fErr = new double[nrhs > 1 ? nrhs : 1];
bErr = new double[nrhs > 1 ? nrhs : 1];
return(gerfs(Layout, Transpose, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, fErr, bErr));
}
public static int geequb(LapackLayout Layout,
int m, int n, double[] a, int lda,
out double[] r, out double[] c,
out double rowCnd, out double colCnd, out double aMax)
{
r = new double[m];
c = new double[n];
return(geequb(Layout, m, n, a, lda, r, c, out rowCnd, out colCnd, out aMax));
}
public static int geequb(LapackLayout Layout,
int m, int n, float[] a, int lda,
out float[] r, out float[] c,
out float rowCnd, out float colCnd, out float aMax)
{
r = new float[m];
c = new float[n];
return(geequb(Layout, m, n, a, lda, r, c, out rowCnd, out colCnd, out aMax));
}
public static int gerfsx(LapackLayout Layout, LapackTranspose Transpose, LapackEquil Equed,
int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv,
double[] r, double[] c, double[] b, int ldb, double[] x, int ldx,
out double rCond, out double[] bErr,
int nErrBnds, out double[] errBndsNorm, out double[] errBndsConp,
int nParams, double[] Params)
{
bErr = new double[nrhs > 1 ? nrhs : 1];
errBndsNorm = new double[nrhs * nErrBnds];
errBndsConp = new double[nrhs * nErrBnds];
return(gerfsx(Layout, Transpose, Equed,
n, nrhs, a, lda, af, ldaf, ipiv,
r, c, b, ldb, x, ldx, out rCond, bErr,
nErrBnds, errBndsNorm, errBndsConp, nParams, Params));
}
public static extern int geequb(LapackLayout Layout,
int m, int n, double[] a, int lda,
double[] r, double[] c,
out double rowCnd, out double colCnd, out double aMax);
public static extern int getrf(LapackLayout Layout, int m, int n, float[] a, int lda, int[] ipiv);
public static extern int geequb(LapackLayout Layout,
int m, int n, float[] a, int lda,
float[] r, float[] c,
out float rowCnd, out float colCnd, out float aMax);
public static extern int getrs(LapackLayout Layout, LapackTranspose Trans,
int n, int nrhs, double[] a, int lda, int[] ipiv,
double[] b, int ldb);
public static int getrf(LapackLayout Layout, int m, int n, double[] a, int lda, out int[] ipiv)
{
ipiv = new int[Max(1, Min(m, n))];
return(getrf(Layout, m, n, a, lda, ipiv));
}
public static extern int getri(LapackLayout Layout, int n, double[] a, int lda);
public static extern int getri(LapackLayout Layout, int n, float[] a, int lda);
public static extern int gerfsx(LapackLayout Layout, LapackTranspose Transpose, LapackEquil Equed,
int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv,
double[] r, double[] c, double[] b, int ldb, double[] x, int ldx,
out double rCond, double[] bErr,
int nErrBnds, double[] errBndsNorm, double[] errBndsConp,
int nParams, double[] Params);
public static extern int gerfs(LapackLayout Layout, LapackTranspose Transpose,
int n, int nrhs, double[] a, int lda, double[] af, int ldaf, int[] ipiv,
double[] b, int ldb, double[] x, int ldx, double[] fErr, double[] bErr);
public static extern int gecon(LapackLayout Layout, LapackNorm Norm,
int n, double[] a, int lda, double aNorm, ref double rCond);
public static extern int gecon(LapackLayout Layout, LapackNorm Norm,
int n, float[] a, int lda, float aNorm, ref float rCond);
