KmlDssSymSet?I(D/S)
设置与handle关联的实数型值。
接口定义
C Interface:
int KmlDssSymSetSIS(KmlSolverTask **pHandle, enum KmlSolverParam param, float *value, int nvalue);
int KmlDssSymSetDID(KmlSolverTask **pHandle, enum KmlSolverParam param, double *value, int nvalue);
int KmlDssSymSetCIS(KmlSolverTask **pHandle, enum KmlSolverParam param, float *value, int nvalue);
int KmlDssSymSetZID(KmlSolverTask **pHandle, enum KmlSolverParam param, double *value, int nvalue);
参数
参数名 |
类型 |
描述 |
输入/输出 |
---|---|---|---|
pHandle |
KmlSolverTask ** |
求解器句柄,pHandle不可为空指针。 |
输入 |
param |
enum KmlSolverParam |
|
输入 |
value |
double或float |
直接求解相关参数数组。 |
输入 |
nvalue |
int |
value数组元素个数。 |
输入 |
返回值
返回值 |
类型 |
描述 |
---|---|---|
KMLSS_NO_ERROR |
int |
正常执行。 |
KMLSS_BAD_SELECTOR |
int |
用户的KML_SOLVER_PARAM输入当前不支持,或在求解过程中不存在。 |
依赖
#include "kml_dss.h"或#include "kml_solver.h"
示例
C Interface:
int n = 8; int ia[9] = {0, 2, 4, 6, 7, 8, 9, 10, 11}; int ja[11] = {0, 7, 1, 6, 2, 5, 3, 4, 5, 6, 7}; double a[11] = {1.0, 2.0, -2.0, 3.0, 3.0, 4.0, -4.0, 5.0, -6.0, 7.0, 8.0}; double b[8] = {3.0, 1.0, 7.0, -4.0, 5.0, -2.0, 10.0, 10.0}; double x[8]; int nrhs = 1; int ldx = n, ldb = n; KmlSolverTask *handle; int ierr = KmlDssSymInitDI(&handle, n, a, ja, ia); if (ierr != 0) { printf("\nERROR in KmlDssSymInitDI: %d", ierr); } ierr = KmlDssSymAnalyzeDI(&handle); if (ierr != 0) { printf("\nERROR in KmlDssSymAnalyzeDI: %d", ierr); } ierr = KmlDssSymFactorizeDI(&handle); if (ierr != 0) { printf("\nERROR in KmlDssSymFactorizeDI: %d", ierr); } double tolerance = 1.e-12; ierr = KmlDssSymSetDID(&handle, KMLSS_REFINEMENT_TOLERANCE_LEVEL, &tolerance, 1); if (ierr != 0) { printf("\nERROR in KmlDssSymSetDID: %d", ierr); } int nsteps = 2; ierr = KmlDssSymSetDII(&handle, KMLSS_REFINEMENT_MAX_STEPS, &nsteps, 1); if (ierr != 0) { printf("\nERROR in KmlDssSymSetDII: %d", ierr); } ierr = KmlDssSymSolveDI(&handle, nrhs, x, ldx, b, ldb); if (ierr != 0) { printf("\nERROR in KmlDssSymSolveDI: %d", ierr); } int nstep; ierr = KmlDssSymGetDII(&handle, KMLSS_REFINEMENT_STEPS, &nstep, 1); printf("REFINEMENT_STEP = %d\n", nstep); double res; ierr = KmlDssSymGetDID(&handle, KMLSS_REFINEMENT_RESIDUAL, &res, 1); printf("REFINEMENT_RESIDUAL = %f\n", res);
运行结果:
REFINEMENT_STEP = 1 REFINEMENT_RESIDUAL = 0.000000
父主题: LDLT