File: sparse_solvers.cpp

package info (click to toggle)
cgal 4.9-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 85,584 kB
  • sloc: cpp: 640,841; ansic: 140,696; sh: 708; fortran: 131; makefile: 114; python: 92
file content (49 lines) | stat: -rw-r--r-- 1,089 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
#include <CGAL/Eigen_solver_traits.h>
#include <CGAL/Eigen_matrix.h>


typedef CGAL::Eigen_solver_traits<> Eigen_solver;
typedef Eigen_solver::NT FT;
typedef Eigen_solver::Matrix Eigen_matrix;
typedef Eigen_solver::Vector Eigen_vector;


int main(void)
{
  srand (static_cast<unsigned int>(time (NULL)));
  std::size_t degree = 3000;
  std::size_t nb_nonzero_coef = 100;
  
  Eigen_vector B (degree); // Zero vector
  Eigen_matrix A (degree);

  Eigen_vector diag (degree);

  // Randomly make some coefficients of the matrix non-zero
  for (std::size_t i = 0; i < nb_nonzero_coef; ++ i)
    {
      int x = rand () % degree;
      int y = rand () % degree;

      FT value = rand () / (FT)RAND_MAX;
	
      A.add_coef (x, y, value);
      A.add_coef (y, x, value);
    }

  // Create sparse matrix
  A.assemble_matrix();
  
  Eigen_vector X (degree);
  FT d;

  Eigen_solver solver;
  if (!(solver.linear_solver (A, B, X, d)))
    {
      std::cerr << "Error: linear solver failed" << std::endl;
      return -1;
    }

  std::cerr << "Linear solve succeeded" << std::endl;
  return 0;
}