﻿功能:稀疏矩阵方程组求解(采用张绍良先生提出的GPBICG算法求解)
 
格式:
 
[x,Effect]=SolveSparseGPBICG(A,B,x0,Loop,Error,m,l)
[x,Effect]=SolveSparseGPBICG(A,B,x0,Loop,Error,m)
[x,Effect]=SolveSparseGPBICG(A,B,x0,Loop,Error)
[x,Effect]=SolveSparseGPBICG(A,B,x0,Loop)
[x,Effect]=SolveSparseGPBICG(A,B,x0)
[x,Effect]=SolveSparseGPBICG(A,B)
 
A:列数为3的矩阵变量(稀疏矩阵存储格式,第1列为元素值,第2列为行索引值,第3列为列索引值),其中A代表的稀疏矩阵必须是方阵
B:一个列数为1的矩阵变量
x0:初始迭代值
Loop:迭代循环总次数,默认为1000
Error:循环跳出的控制误差,默认1E-16
m:整数变量,控制算法,默认为1
l:整数变量,控制算法,默认为1
 
x:求得的解
Effect:返回的一个1*3的矩阵变量,第一个参数为求解的残差平方和,第二个参数表示程序最大迭代次数,第三个参数表示迭代到最优值的迭代次数
 
说明:本程序求解的格式为A*x=B这种问题,其中A不要求为对称矩阵.
 
参考:朱圣鑫.并行GPBiCG(m,l)算法与预处理技术[M]:Page 17
 
例子:
 
a =
[ 4.00000000000000    1.00000000000000    0.00000000000000    0.00000000000000
  0.00000000000000    5.60000000000000    1.00000000000000    0.00000000000000
  1.00000000000000    0.00000000000000    3.00000000000000    0.00000000000000
  2.00000000000000    2.00000000000000    0.00000000000000    6.00000000000000 ]
b =
[ 4.00000000000000
  5.00000000000000
  6.00000000000000
  7.00000000000000 ]
//上面给两个变量来示意
 
c={SparseCreate<矩阵运算\SparseCreate>}(a)//先得到稀疏矩阵格式数据
c =
[ 4.00000000000000    1.00000000000000    1.00000000000000
  1.00000000000000    1.00000000000000    2.00000000000000
  5.60000000000000    2.00000000000000    2.00000000000000
  1.00000000000000    2.00000000000000    3.00000000000000
  1.00000000000000    3.00000000000000    1.00000000000000
  3.00000000000000    3.00000000000000    3.00000000000000
  2.00000000000000    4.00000000000000    1.00000000000000
  2.00000000000000    4.00000000000000    2.00000000000000
  6.00000000000000    4.00000000000000    4.00000000000000 ]
 
[x,ef]=SolveSparseGPBICG(c,b)//回车后得到如下结果
x =
[ 0.85337243401759
  0.58651026392961
  1.71554252199414
  0.68670576735093 ]
ef =
[ 2.4588794415E-27    3.00000000000000    3.00000000000000 ]