SOURCE1.F90

! Purpose : 共轭梯度法 ! 用于计算方程 AX=b !----------------------------------------------------- ! Input parameters : ! 1. A,b 意义即 AX=b ! 2. x0迭代初值 ! 3. N 方程的维数 ! Output parameters : ! 1. x 方程的解