supermatrix.h

Go to the documentation of this file.

 
#ifndef __SUPERLU_SUPERMATRIX /* allow multiple inclusions */
#define __SUPERLU_SUPERMATRIX
 
 
/********************************************
 * The matrix types are defined as follows. *
 ********************************************/
typedef enum {
    SLU_NC,    /* column-wise, no supernode */
    SLU_NCP,   /* column-wise, column-permuted, no supernode 
                  (The consecutive columns of nonzeros, after permutation,
                   may not be stored  contiguously.) */
    SLU_NR,    /* row-wize, no supernode */
    SLU_SC,    /* column-wise, supernode */
    SLU_SCP,   /* supernode, column-wise, permuted */    
    SLU_SR,    /* row-wise, supernode */
    SLU_DN,     /* Fortran style column-wise storage for dense matrix */
    SLU_NR_loc  /* distributed compressed row format  */ 
} Stype_t;
 
typedef enum {
    SLU_S,     /* single */
    SLU_D,     /* double */
    SLU_C,     /* single complex */
    SLU_Z      /* double complex */
} Dtype_t;
 
typedef enum {
    SLU_GE,    /* general */
    SLU_TRLU,  /* lower triangular, unit diagonal */
    SLU_TRUU,  /* upper triangular, unit diagonal */
    SLU_TRL,   /* lower triangular */
    SLU_TRU,   /* upper triangular */
    SLU_SYL,   /* symmetric, store lower half */
    SLU_SYU,   /* symmetric, store upper half */
    SLU_HEL,   /* Hermitian, store lower half */
    SLU_HEU    /* Hermitian, store upper half */
} Mtype_t;
 
typedef struct {
        Stype_t Stype; /* Storage type: interprets the storage structure 
                          pointed to by *Store. */
        Dtype_t Dtype; /* Data type. */
        Mtype_t Mtype; /* Matrix type: describes the mathematical property of 
                          the matrix. */
        int_t  nrow;   /* number of rows */
        int_t  ncol;   /* number of columns */
        void *Store;   /* pointer to the actual storage of the matrix */
} SuperMatrix;
 
/***********************************************
 * The storage schemes are defined as follows. *
 ***********************************************/
 
/* Stype == SLU_NC (Also known as Harwell-Boeing sparse matrix format) */
typedef struct {
    int_t  nnz;     /* number of nonzeros in the matrix */
    void *nzval;    /* pointer to array of nonzero values, packed by column */
    int_t  *rowind; /* pointer to array of row indices of the nonzeros */
    int_t  *colptr; /* pointer to array of beginning of columns in nzval[] 
                       and rowind[]  */
                    /* Note:
                       Zero-based indexing is used;
                       colptr[] has ncol+1 entries, the last one pointing
                       beyond the last column, so that colptr[ncol] = nnz. */
} NCformat;
 
/* Stype == SLU_NR */
typedef struct {
    int_t  nnz;     /* number of nonzeros in the matrix */
    void *nzval;    /* pointer to array of nonzero values, packed by raw */
    int_t  *colind; /* pointer to array of columns indices of the nonzeros */
    int_t  *rowptr; /* pointer to array of beginning of rows in nzval[] 
                       and colind[]  */
                    /* Note:
                       Zero-based indexing is used;
                       rowptr[] has nrow+1 entries, the last one pointing
                       beyond the last row, so that rowptr[nrow] = nnz. */
} NRformat;
 
/* Stype == SLU_SC */
typedef struct {
  int_t  nnz;        /* number of nonzeros in the matrix */
  int_t  nsuper;     /* number of supernodes, minus 1 */
  void *nzval;       /* pointer to array of nonzero values, packed by column */
  int_t *nzval_colptr;/* pointer to array of beginning of columns in nzval[] */
  int_t *rowind;     /* pointer to array of compressed row indices of 
                        rectangular supernodes */
  int_t *rowind_colptr;/* pointer to array of beginning of columns in rowind[] */
  int   *col_to_sup;   /* col_to_sup[j] is the supernode number to which column 
                        j belongs; mapping from column to supernode number. */
  int   *sup_to_col;   /* sup_to_col[s] points to the start of the s-th 
                        supernode; mapping from supernode number to column.
                        e.g.: col_to_sup: 0 1 2 2 3 3 3 4 4 4 4 4 4 (ncol=12)
                              sup_to_col: 0 1 2 4 7 12           (nsuper=4) */
                     /* Note:
                        Zero-based indexing is used;
                        nzval_colptr[], rowind_colptr[], col_to_sup and
                        sup_to_col[] have ncol+1 entries, the last one
                        pointing beyond the last column.
                        For col_to_sup[], only the first ncol entries are
                        defined. For sup_to_col[], only the first nsuper+2
                        entries are defined. */
} SCformat;
 
/* Stype == SLU_SCP */
typedef struct {
  int_t  nnz;        /* number of nonzeros in the matrix */
  int_t  nsuper;     /* number of supernodes */
  void *nzval;       /* pointer to array of nonzero values, packed by column */
  int_t  *nzval_colbeg;/* nzval_colbeg[j] points to beginning of column j
                          in nzval[] */
  int_t  *nzval_colend;/* nzval_colend[j] points to one past the last element
                          of column j in nzval[] */
  int_t  *rowind;      /* pointer to array of compressed row indices of 
                          rectangular supernodes */
  int_t *rowind_colbeg;/* rowind_colbeg[j] points to beginning of column j
                          in rowind[] */
  int_t *rowind_colend;/* rowind_colend[j] points to one past the last element
                          of column j in rowind[] */
  int   *col_to_sup;   /* col_to_sup[j] is the supernode number to which column
                          j belongs; mapping from column to supernode. */
  int   *sup_to_colbeg; /* sup_to_colbeg[s] points to the start of the s-th 
                           supernode; mapping from supernode to column.*/
  int   *sup_to_colend; /* sup_to_colend[s] points to one past the end of the
                           s-th supernode; mapping from supernode number to
                           column.
                        e.g.: col_to_sup: 0 1 2 2 3 3 3 4 4 4 4 4 4 (ncol=12)
                              sup_to_colbeg: 0 1 2 4 7              (nsuper=4)
                              sup_to_colend: 1 2 4 7 12                    */
                     /* Note:
                        Zero-based indexing is used;
                        nzval_colptr[], rowind_colptr[], col_to_sup and
                        sup_to_col[] have ncol+1 entries, the last one
                        pointing beyond the last column.         */
} SCPformat;
 
/* Stype == SLU_NCP */
typedef struct {
    int_t nnz;    /* number of nonzeros in the matrix */
    void *nzval;  /* pointer to array of nonzero values, packed by column */
    int_t *rowind;/* pointer to array of row indices of the nonzeros */
                  /* Note: nzval[]/rowind[] always have the same length */
    int_t *colbeg;/* colbeg[j] points to the beginning of column j in nzval[] 
                     and rowind[]  */
    int_t *colend;/* colend[j] points to one past the last element of column
                     j in nzval[] and rowind[]  */
                  /* Note:
                     Zero-based indexing is used;
                     The consecutive columns of the nonzeros may not be 
                     contiguous in storage, because the matrix has been 
                     postmultiplied by a column permutation matrix. */
} NCPformat;
 
/* Stype == SLU_DN */
typedef struct {
    int_t lda;    /* leading dimension */
    void *nzval;  /* array of size lda*ncol to represent a dense matrix */
} DNformat;
 
/* Stype == SLU_NR_loc (Distributed Compressed Row Format) */
typedef struct {
    int_t nnz_loc;   /* number of nonzeros in the local submatrix */
    int_t m_loc;     /* number of rows local to this processor */
    int_t fst_row;   /* global index of the first row */
    void  *nzval;    /* pointer to array of nonzero values, packed by row */
    int_t *rowptr;   /* pointer to array of beginning of rows in nzval[] 
                        and colind[]  */
    int_t *colind;   /* pointer to array of column indices of the nonzeros */
                     /* Note:
                        Zero-based indexing is used;
                        rowptr[] has n_loc + 1 entries, the last one pointing
                        beyond the last row, so that rowptr[n_loc] = nnz_loc.*/
} NRformat_loc;
 
 
/* Data structure for storing 3D matrix on layer 0 of the 2D process grid
   Only grid-0 has meanful values of these data structures.   */
typedef struct NRformat_loc3d
{
    NRformat_loc *A_nfmt; // Gathered A matrix on 2D grid-0 
    void *B3d;  // on the entire 3D process grid
    int  ldb;   // relative to 3D process grid
    int nrhs;
    int m_loc;  // relative to 3D process grid
    void *B2d;  // on 2D process layer grid-0
 
    int *row_counts_int; // these counts are stored on 2D layer grid-0,
    int *row_disp;       // but count the number of {A, B} rows along Z-dimension
    int *nnz_counts_int; 
    int *nnz_disp;
    int *b_counts_int;
    int *b_disp;
 
    /* The following 4 structures are used for scattering
       solution X from 2D grid-0 back to 3D processes */
    int num_procs_to_send;  
    int *procs_to_send_list;
    int *send_count_list;
    int num_procs_to_recv;
    int *procs_recv_from_list;
    int *recv_count_list;
} NRformat_loc3d;
 
 
#endif  /* __SUPERLU_SUPERMATRIX */