bw / opentoonz

Clone
Source Code
GIT

Blame thirdparty/superlu/SuperLU_4.1/DOC/html/slu__util_8h-source.html

feature08b_assistants feature08f_assistants feature08g_assistants feature08h_assistants feature08j_assistants feature08k_assistants improve_tool_selection master
  1.   7d535a97dc5baf37eb1466029f9d86f0b6cf66e0
  2.   thirdparty
  3.   superlu
  4.   SuperLU_4.1
  5.   DOC
  6.   html
  7.   slu__util_8h-source.html
Blob Raw
kusano 7d535a
kusano 7d535a 
<meta content="text/html;charset=UTF-8" http-equiv="Content-Type">
kusano 7d535a 
<title>SuperLU: SRC/slu_util.h Source File</title>
kusano 7d535a 
<link href="doxygen.css" rel="stylesheet" type="text/css">
kusano 7d535a 
<link href="tabs.css" rel="stylesheet" type="text/css">
kusano 7d535a
kusano 7d535a
kusano 7d535a
kusano 7d535a
kusano 7d535a
    kusano 7d535a 
          
  • Main Page
    		•
    kusano 7d535a 
          
  • Data Structures
    		•
    kusano 7d535a 
          
  • Files
    		•
    kusano 7d535a
    kusano 7d535a
    kusano 7d535a 
    SRC/slu_util.h
    Go to the documentation of this file.
    00001
    kusano 7d535a 
    00011 #ifndef __SUPERLU_UTIL /* allow multiple inclusions */
    kusano 7d535a 
    00012 #define __SUPERLU_UTIL
    kusano 7d535a 
    00013
    kusano 7d535a 
    00014 #include <stdio.h>
    kusano 7d535a 
    00015 #include <stdlib.h>
    kusano 7d535a 
    00016 #include <string.h>
    kusano 7d535a 
    00017 /*
    kusano 7d535a 
    00018 #ifndef __STDC__
    kusano 7d535a 
    00019 #include <malloc.h>
    kusano 7d535a 
    00020 #endif
    kusano 7d535a 
    00021 */
    kusano 7d535a 
    00022 #include <assert.h>
    kusano 7d535a 
    00023 #include "superlu_enum_consts.h"
    kusano 7d535a 
    00024
    kusano 7d535a 
    00025 /***********************************************************************
    kusano 7d535a 
    00026  * Macros
    kusano 7d535a 
    00027  ***********************************************************************/
    kusano 7d535a 
    00028 #define FIRSTCOL_OF_SNODE(i)    (xsup[i])
    kusano 7d535a 
    00029 /* No of marker arrays used in the symbolic factorization,
    kusano 7d535a 
    00030    each of size n */
    kusano 7d535a 
    00031 #define NO_MARKER     3
    kusano 7d535a 
    00032 #define NUM_TEMPV(m,w,t,b)  ( SUPERLU_MAX(m, (t + b)*w) )
    kusano 7d535a 
    00033
    kusano 7d535a 
    00034 #ifndef USER_ABORT
    kusano 7d535a 
    00035 #define USER_ABORT(msg) superlu_abort_and_exit(msg)
    kusano 7d535a 
    00036 #endif
    kusano 7d535a 
    00037
    kusano 7d535a 
    00038 #define ABORT(err_msg) \
    kusano 7d535a 
    00039  { char msg[256];\
    kusano 7d535a 
    00040    sprintf(msg,"%s at line %d in file %s\n",err_msg,__LINE__, __FILE__);\
    kusano 7d535a 
    00041    USER_ABORT(msg); }
    kusano 7d535a 
    00042
    kusano 7d535a 
    00043
    kusano 7d535a 
    00044 #ifndef USER_MALLOC
    kusano 7d535a 
    00045 #if 1
    kusano 7d535a 
    00046 #define USER_MALLOC(size) superlu_malloc(size)
    kusano 7d535a 
    00047 #else
    kusano 7d535a 
    00048 /* The following may check out some uninitialized data */
    kusano 7d535a 
    00049 #define USER_MALLOC(size) memset (superlu_malloc(size), '\x0F', size)
    kusano 7d535a 
    00050 #endif
    kusano 7d535a 
    00051 #endif
    kusano 7d535a 
    00052
    kusano 7d535a 
    00053 #define SUPERLU_MALLOC(size) USER_MALLOC(size)
    kusano 7d535a 
    00054
    kusano 7d535a 
    00055 #ifndef USER_FREE
    kusano 7d535a 
    00056 #define USER_FREE(addr) superlu_free(addr)
    kusano 7d535a 
    00057 #endif
    kusano 7d535a 
    00058
    kusano 7d535a 
    00059 #define SUPERLU_FREE(addr) USER_FREE(addr)
    kusano 7d535a 
    00060
    kusano 7d535a 
    00061 #define CHECK_MALLOC(where) {                 \
    kusano 7d535a 
    00062     extern int superlu_malloc_total;        \
    kusano 7d535a 
    00063     printf("%s: malloc_total %d Bytes\n",     \
    kusano 7d535a 
    00064            where, superlu_malloc_total); \
    kusano 7d535a 
    00065 }
    kusano 7d535a 
    00066
    kusano 7d535a 
    00067 #define SUPERLU_MAX(x, y)       ( (x) > (y) ? (x) : (y) )
    kusano 7d535a 
    00068 #define SUPERLU_MIN(x, y)       ( (x) < (y) ? (x) : (y) )
    kusano 7d535a 
    00069
    kusano 7d535a 
    00070 /*********************************************************
    kusano 7d535a 
    00071  * Macros used for easy access of sparse matrix entries. *
    kusano 7d535a 
    00072  *********************************************************/
    kusano 7d535a 
    00073 #define L_SUB_START(col)     ( Lstore->rowind_colptr[col] )
    kusano 7d535a 
    00074 #define L_SUB(ptr)           ( Lstore->rowind[ptr] )
    kusano 7d535a 
    00075 #define L_NZ_START(col)      ( Lstore->nzval_colptr[col] )
    kusano 7d535a 
    00076 #define L_FST_SUPC(superno)  ( Lstore->sup_to_col[superno] )
    kusano 7d535a 
    00077 #define U_NZ_START(col)      ( Ustore->colptr[col] )
    kusano 7d535a 
    00078 #define U_SUB(ptr)           ( Ustore->rowind[ptr] )
    kusano 7d535a 
    00079
    kusano 7d535a 
    00080
    kusano 7d535a 
    00081 /***********************************************************************
    kusano 7d535a 
    00082  * Constants
    kusano 7d535a 
    00083  ***********************************************************************/
    kusano 7d535a 
    00084 #define EMPTY   (-1)
    kusano 7d535a 
    00085 /*#define NO    (-1)*/
    kusano 7d535a 
    00086 #define FALSE   0
    kusano 7d535a 
    00087 #define TRUE    1
    kusano 7d535a 
    00088
    kusano 7d535a 
    00089 #define NO_MEMTYPE  4      /* 0: lusup;
    kusano 7d535a 
    00090                               1: ucol;
    kusano 7d535a 
    00091                               2: lsub;
    kusano 7d535a 
    00092                               3: usub */
    kusano 7d535a 
    00093
    kusano 7d535a 
    00094 #define GluIntArray(n)   (5 * (n) + 5)
    kusano 7d535a 
    00095
    kusano 7d535a 
    00096 /* Dropping rules */
    kusano 7d535a 
    00097 #define  NODROP         ( 0x0000 )
    kusano 7d535a 
    00098 #define  DROP_BASIC     ( 0x0001 )  /* ILU(tau) */
    kusano 7d535a 
    00099 #define  DROP_PROWS     ( 0x0002 )  /* ILUTP: keep p maximum rows */
    kusano 7d535a 
    00100 #define  DROP_COLUMN    ( 0x0004 )  /* ILUTP: for j-th column,
    kusano 7d535a 
    00101                                               p = gamma * nnz(A(:,j)) */
    kusano 7d535a 
    00102 #define  DROP_AREA      ( 0x0008 )  /* ILUTP: for j-th column, use
    kusano 7d535a 
    00103                                               nnz(F(:,1:j)) / nnz(A(:,1:j))
    kusano 7d535a 
    00104                                               to limit memory growth  */
    kusano 7d535a 
    00105 #define  DROP_SECONDARY ( 0x000E )  /* PROWS | COLUMN | AREA */
    kusano 7d535a 
    00106 #define  DROP_DYNAMIC   ( 0x0010 )  /* adaptive tau */
    kusano 7d535a 
    00107 #define  DROP_INTERP    ( 0x0100 )  /* use interpolation */
    kusano 7d535a 
    00108
    kusano 7d535a 
    00109
    kusano 7d535a 
    00110 #if 1
    kusano 7d535a 
    00111 #define MILU_ALPHA (1.0e-2) /* multiple of drop_sum to be added to diagonal */
    kusano 7d535a 
    00112 #else
    kusano 7d535a 
    00113 #define MILU_ALPHA  1.0 /* multiple of drop_sum to be added to diagonal */
    kusano 7d535a 
    00114 #endif
    kusano 7d535a 
    00115
    kusano 7d535a 
    00116
    kusano 7d535a 
    00117 /***********************************************************************
    kusano 7d535a 
    00118  * Type definitions
    kusano 7d535a 
    00119  ***********************************************************************/
    kusano 7d535a 
    00120 typedef float    flops_t;
    kusano 7d535a 
    00121 typedef unsigned char Logical;
    kusano 7d535a 
    00122
    kusano 7d535a 
    00123 /*
    kusano 7d535a 
    00124  *-- This contains the options used to control the solution process.
    kusano 7d535a 
    00125  *
    kusano 7d535a 
    00126  * Fact   (fact_t)
    kusano 7d535a 
    00127  *        Specifies whether or not the factored form of the matrix
    kusano 7d535a 
    00128  *        A is supplied on entry, and if not, how the matrix A should
    kusano 7d535a 
    00129  *        be factorizaed.
    kusano 7d535a 
    00130  *        = DOFACT: The matrix A will be factorized from scratch, and the
    kusano 7d535a 
    00131  *             factors will be stored in L and U.
    kusano 7d535a 
    00132  *        = SamePattern: The matrix A will be factorized assuming
    kusano 7d535a 
    00133  *             that a factorization of a matrix with the same sparsity
    kusano 7d535a 
    00134  *             pattern was performed prior to this one. Therefore, this
    kusano 7d535a 
    00135  *             factorization will reuse column permutation vector
    kusano 7d535a 
    00136  *             ScalePermstruct->perm_c and the column elimination tree
    kusano 7d535a 
    00137  *             LUstruct->etree.
    kusano 7d535a 
    00138  *        = SamePattern_SameRowPerm: The matrix A will be factorized
    kusano 7d535a 
    00139  *             assuming that a factorization of a matrix with the same
    kusano 7d535a 
    00140  *             sparsity pattern and similar numerical values was performed
    kusano 7d535a 
    00141  *             prior to this one. Therefore, this factorization will reuse
    kusano 7d535a 
    00142  *             both row and column scaling factors R and C, both row and
    kusano 7d535a 
    00143  *             column permutation vectors perm_r and perm_c, and the
    kusano 7d535a 
    00144  *             data structure set up from the previous symbolic factorization.
    kusano 7d535a 
    00145  *        = FACTORED: On entry, L, U, perm_r and perm_c contain the
    kusano 7d535a 
    00146  *              factored form of A. If DiagScale is not NOEQUIL, the matrix
    kusano 7d535a 
    00147  *              A has been equilibrated with scaling factors R and C.
    kusano 7d535a 
    00148  *
    kusano 7d535a 
    00149  * Equil  (yes_no_t)
    kusano 7d535a 
    00150  *        Specifies whether to equilibrate the system (scale A's row and
    kusano 7d535a 
    00151  *        columns to have unit norm).
    kusano 7d535a 
    00152  *
    kusano 7d535a 
    00153  * ColPerm (colperm_t)
    kusano 7d535a 
    00154  *        Specifies what type of column permutation to use to reduce fill.
    kusano 7d535a 
    00155  *        = NATURAL: use the natural ordering
    kusano 7d535a 
    00156  *        = MMD_ATA: use minimum degree ordering on structure of A'*A
    kusano 7d535a 
    00157  *        = MMD_AT_PLUS_A: use minimum degree ordering on structure of A'+A
    kusano 7d535a 
    00158  *        = COLAMD: use approximate minimum degree column ordering
    kusano 7d535a 
    00159  *        = MY_PERMC: use the ordering specified by the user
    kusano 7d535a 
    00160  *
    kusano 7d535a 
    00161  * Trans  (trans_t)
    kusano 7d535a 
    00162  *        Specifies the form of the system of equations:
    kusano 7d535a 
    00163  *        = NOTRANS: A * X = B        (No transpose)
    kusano 7d535a 
    00164  *        = TRANS:   A**T * X = B     (Transpose)
    kusano 7d535a 
    00165  *        = CONJ:    A**H * X = B     (Transpose)
    kusano 7d535a 
    00166  *
    kusano 7d535a 
    00167  * IterRefine (IterRefine_t)
    kusano 7d535a 
    00168  *        Specifies whether to perform iterative refinement.
    kusano 7d535a 
    00169  *        = NO: no iterative refinement
    kusano 7d535a 
    00170  *        = SINGLE: perform iterative refinement in single precision
    kusano 7d535a 
    00171  *        = DOUBLE: perform iterative refinement in double precision
    kusano 7d535a 
    00172  *        = EXTRA: perform iterative refinement in extra precision
    kusano 7d535a 
    00173  *
    kusano 7d535a 
    00174  * DiagPivotThresh (double, in [0.0, 1.0]) (only for sequential SuperLU)
    kusano 7d535a 
    00175  *        Specifies the threshold used for a diagonal entry to be an
    kusano 7d535a 
    00176  *        acceptable pivot.
    kusano 7d535a 
    00177  *
    kusano 7d535a 
    00178  * SymmetricMode (yest_no_t)
    kusano 7d535a 
    00179  *        Specifies whether to use symmetric mode. Symmetric mode gives
    kusano 7d535a 
    00180  *        preference to diagonal pivots, and uses an (A'+A)-based column
    kusano 7d535a 
    00181  *        permutation algorithm.
    kusano 7d535a 
    00182  *
    kusano 7d535a 
    00183  * PivotGrowth (yes_no_t)
    kusano 7d535a 
    00184  *        Specifies whether to compute the reciprocal pivot growth.
    kusano 7d535a 
    00185  *
    kusano 7d535a 
    00186  * ConditionNumber (ues_no_t)
    kusano 7d535a 
    00187  *        Specifies whether to compute the reciprocal condition number.
    kusano 7d535a 
    00188  *
    kusano 7d535a 
    00189  * RowPerm (rowperm_t) (only for SuperLU_DIST or ILU)
    kusano 7d535a 
    00190  *        Specifies whether to permute rows of the original matrix.
    kusano 7d535a 
    00191  *        = NO: not to permute the rows
    kusano 7d535a 
    00192  *        = LargeDiag: make the diagonal large relative to the off-diagonal
    kusano 7d535a 
    00193  *        = MY_PERMR: use the permutation given by the user
    kusano 7d535a 
    00194  *
    kusano 7d535a 
    00195  * ILU_DropRule (int)
    kusano 7d535a 
    00196  *        Specifies the dropping rule:
    kusano 7d535a 
    00197  *        = DROP_BASIC:   Basic dropping rule, supernodal based ILUTP(tau).
    kusano 7d535a 
    00198  *        = DROP_PROWS:   Supernodal based ILUTP(p,tau), p = gamma * nnz(A)/n.
    kusano 7d535a 
    00199  *        = DROP_COLUMN:  Variant of ILUTP(p,tau), for j-th column,
    kusano 7d535a 
    00200  *                            p = gamma * nnz(A(:,j)).
    kusano 7d535a 
    00201  *        = DROP_AREA:    Variation of ILUTP, for j-th column, use
    kusano 7d535a 
    00202  *                            nnz(F(:,1:j)) / nnz(A(:,1:j)) to control memory.
    kusano 7d535a 
    00203  *        = DROP_DYNAMIC: Modify the threshold tau during factorizaion:
    kusano 7d535a 
    00204  *                        If nnz(L(:,1:j)) / nnz(A(:,1:j)) > gamma
    kusano 7d535a 
    00205  *                                tau_L(j) := MIN(tau_0, tau_L(j-1) * 2);
    kusano 7d535a 
    00206  *                        Otherwise
    kusano 7d535a 
    00207  *                                tau_L(j) := MAX(tau_0, tau_L(j-1) / 2);
    kusano 7d535a 
    00208  *                        tau_U(j) uses the similar rule.
    kusano 7d535a 
    00209  *                        NOTE: the thresholds used by L and U are separate.
    kusano 7d535a 
    00210  *        = DROP_INTERP:  Compute the second dropping threshold by
    kusano 7d535a 
    00211  *                        interpolation instead of sorting (default).
    kusano 7d535a 
    00212  *                        In this case, the actual fill ratio is not
    kusano 7d535a 
    00213  *                        guaranteed to be smaller than gamma.
    kusano 7d535a 
    00214  *        Note: DROP_PROWS, DROP_COLUMN and DROP_AREA are mutually exclusive.
    kusano 7d535a 
    00215  *        ( Default: DROP_BASIC | DROP_AREA )
    kusano 7d535a 
    00216  *
    kusano 7d535a 
    00217  * ILU_DropTol (double)
    kusano 7d535a 
    00218  *        numerical threshold for dropping.
    kusano 7d535a 
    00219  *
    kusano 7d535a 
    00220  * ILU_FillFactor (double)
    kusano 7d535a 
    00221  *        Gamma in the secondary dropping.
    kusano 7d535a 
    00222  *
    kusano 7d535a 
    00223  * ILU_Norm (norm_t)
    kusano 7d535a 
    00224  *        Specify which norm to use to measure the row size in a
    kusano 7d535a 
    00225  *        supernode: infinity-norm, 1-norm, or 2-norm.
    kusano 7d535a 
    00226  *
    kusano 7d535a 
    00227  * ILU_FillTol (double)
    kusano 7d535a 
    00228  *        numerical threshold for zero pivot perturbation.
    kusano 7d535a 
    00229  *
    kusano 7d535a 
    00230  * ILU_MILU (milu_t)
    kusano 7d535a 
    00231  *        Specifies which version of MILU to use.
    kusano 7d535a 
    00232  *
    kusano 7d535a 
    00233  * ILU_MILU_Dim (double)
    kusano 7d535a 
    00234  *        Dimension of the PDE if available.
    kusano 7d535a 
    00235  *
    kusano 7d535a 
    00236  * ReplaceTinyPivot (yes_no_t) (only for SuperLU_DIST)
    kusano 7d535a 
    00237  *        Specifies whether to replace the tiny diagonals by
    kusano 7d535a 
    00238  *        sqrt(epsilon)*||A|| during LU factorization.
    kusano 7d535a 
    00239  *
    kusano 7d535a 
    00240  * SolveInitialized (yes_no_t) (only for SuperLU_DIST)
    kusano 7d535a 
    00241  *        Specifies whether the initialization has been performed to the
    kusano 7d535a 
    00242  *        triangular solve.
    kusano 7d535a 
    00243  *
    kusano 7d535a 
    00244  * RefineInitialized (yes_no_t) (only for SuperLU_DIST)
    kusano 7d535a 
    00245  *        Specifies whether the initialization has been performed to the
    kusano 7d535a 
    00246  *        sparse matrix-vector multiplication routine needed in iterative
    kusano 7d535a 
    00247  *        refinement.
    kusano 7d535a 
    00248  *
    kusano 7d535a 
    00249  * PrintStat (yes_no_t)
    kusano 7d535a 
    00250  *        Specifies whether to print the solver's statistics.
    kusano 7d535a 
    00251  */
    kusano 7d535a 
    00252 typedef struct {
    kusano 7d535a 
    00253     fact_t        Fact;
    kusano 7d535a 
    00254     yes_no_t      Equil;
    kusano 7d535a 
    00255     colperm_t     ColPerm;
    kusano 7d535a 
    00256     trans_t       Trans;
    kusano 7d535a 
    00257     IterRefine_t  IterRefine;
    kusano 7d535a 
    00258     double        DiagPivotThresh;
    kusano 7d535a 
    00259     yes_no_t      SymmetricMode;
    kusano 7d535a 
    00260     yes_no_t      PivotGrowth;
    kusano 7d535a 
    00261     yes_no_t      ConditionNumber;
    kusano 7d535a 
    00262     rowperm_t     RowPerm;
    kusano 7d535a 
    00263     int           ILU_DropRule;
    kusano 7d535a 
    00264     double        ILU_DropTol;    /* threshold for dropping */
    kusano 7d535a 
    00265     double        ILU_FillFactor; /* gamma in the secondary dropping */
    kusano 7d535a 
    00266     norm_t        ILU_Norm;       /* infinity-norm, 1-norm, or 2-norm */
    kusano 7d535a 
    00267     double        ILU_FillTol;    /* threshold for zero pivot perturbation */
    kusano 7d535a 
    00268     milu_t        ILU_MILU;
    kusano 7d535a 
    00269     double        ILU_MILU_Dim;   /* Dimension of PDE (if available) */
    kusano 7d535a 
    00270     yes_no_t      ParSymbFact;
    kusano 7d535a 
    00271     yes_no_t      ReplaceTinyPivot; /* used in SuperLU_DIST */
    kusano 7d535a 
    00272     yes_no_t      SolveInitialized;
    kusano 7d535a 
    00273     yes_no_t      RefineInitialized;
    kusano 7d535a 
    00274     yes_no_t      PrintStat;
    kusano 7d535a 
    00275 } superlu_options_t;
    kusano 7d535a 
    00276
    kusano 7d535a 
    00278 typedef struct e_node {
    kusano 7d535a 
    00279     int size;      /* length of the memory that has been used */
    kusano 7d535a 
    00280     void *mem;     /* pointer to the new malloc'd store */
    kusano 7d535a 
    00281 } ExpHeader;
    kusano 7d535a 
    00282
    kusano 7d535a 
    00283 typedef struct {
    kusano 7d535a 
    00284     int  size;
    kusano 7d535a 
    00285     int  used;
    kusano 7d535a 
    00286     int  top1;  /* grow upward, relative to &array[0] */
    kusano 7d535a 
    00287     int  top2;  /* grow downward */
    kusano 7d535a 
    00288     void *array;
    kusano 7d535a 
    00289 } LU_stack_t;
    kusano 7d535a 
    00290
    kusano 7d535a 
    00291 typedef struct {
    kusano 7d535a 
    00292     int     *panel_histo; /* histogram of panel size distribution */
    kusano 7d535a 
    00293     double  *utime;       /* running time at various phases */
    kusano 7d535a 
    00294     flops_t *ops;         /* operation count at various phases */
    kusano 7d535a 
    00295     int     TinyPivots;   /* number of tiny pivots */
    kusano 7d535a 
    00296     int     RefineSteps;  /* number of iterative refinement steps */
    kusano 7d535a 
    00297     int     expansions;   /* number of memory expansions */
    kusano 7d535a 
    00298 } SuperLUStat_t;
    kusano 7d535a 
    00299
    kusano 7d535a 
    00300 typedef struct {
    kusano 7d535a 
    00301     float for_lu;
    kusano 7d535a 
    00302     float total_needed;
    kusano 7d535a 
    00303 } mem_usage_t;
    kusano 7d535a 
    00304
    kusano 7d535a 
    00305
    kusano 7d535a 
    00306 /***********************************************************************
    kusano 7d535a 
    00307  * Prototypes
    kusano 7d535a 
    00308  ***********************************************************************/
    kusano 7d535a 
    00309 #ifdef __cplusplus
    kusano 7d535a 
    00310 extern "C" {
    kusano 7d535a 
    00311 #endif
    kusano 7d535a 
    00312
    kusano 7d535a 
    00313 extern void    Destroy_SuperMatrix_Store(SuperMatrix *);
    kusano 7d535a 
    00314 extern void    Destroy_CompCol_Matrix(SuperMatrix *);
    kusano 7d535a 
    00315 extern void    Destroy_CompRow_Matrix(SuperMatrix *);
    kusano 7d535a 
    00316 extern void    Destroy_SuperNode_Matrix(SuperMatrix *);
    kusano 7d535a 
    00317 extern void    Destroy_CompCol_Permuted(SuperMatrix *);
    kusano 7d535a 
    00318 extern void    Destroy_Dense_Matrix(SuperMatrix *);
    kusano 7d535a 
    00319 extern void    get_perm_c(int, SuperMatrix *, int *);
    kusano 7d535a 
    00320 extern void    set_default_options(superlu_options_t *options);
    kusano 7d535a 
    00321 extern void    ilu_set_default_options(superlu_options_t *options);
    kusano 7d535a 
    00322 extern void    sp_preorder (superlu_options_t *, SuperMatrix*, int*, int*,
    kusano 7d535a 
    00323                             SuperMatrix*);
    kusano 7d535a 
    00324 extern void    superlu_abort_and_exit(char*);
    kusano 7d535a 
    00325 extern void    *superlu_malloc (size_t);
    kusano 7d535a 
    00326 extern int     *intMalloc (int);
    kusano 7d535a 
    00327 extern int     *intCalloc (int);
    kusano 7d535a 
    00328 extern void    superlu_free (void*);
    kusano 7d535a 
    00329 extern void    SetIWork (int, int, int, int *, int **, int **, int **,
    kusano 7d535a 
    00330                          int **, int **, int **, int **);
    kusano 7d535a 
    00331 extern int     sp_coletree (int *, int *, int *, int, int, int *);
    kusano 7d535a 
    00332 extern void    relax_snode (const int, int *, const int, int *, int *);
    kusano 7d535a 
    00333 extern void    heap_relax_snode (const int, int *, const int, int *, int *);
    kusano 7d535a 
    00334 extern int     mark_relax(int, int *, int *, int *, int *, int *, int *);
    kusano 7d535a 
    00335 extern void    ilu_relax_snode (const int, int *, const int, int *,
    kusano 7d535a 
    00336                                 int *, int *);
    kusano 7d535a 
    00337 extern void    ilu_heap_relax_snode (const int, int *, const int, int *,
    kusano 7d535a 
    00338                                      int *, int*);
    kusano 7d535a 
    00339 extern void    resetrep_col (const int, const int *, int *);
    kusano 7d535a 
    00340 extern int     spcoletree (int *, int *, int *, int, int, int *);
    kusano 7d535a 
    00341 extern int     *TreePostorder (int, int *);
    kusano 7d535a 
    00342 extern double  SuperLU_timer_ ();
    kusano 7d535a 
    00343 extern int     sp_ienv (int);
    kusano 7d535a 
    00344 extern int     lsame_ (char *, char *);
    kusano 7d535a 
    00345 extern int     xerbla_ (char *, int *);
    kusano 7d535a 
    00346 extern void    ifill (int *, int, int);
    kusano 7d535a 
    00347 extern void    snode_profile (int, int *);
    kusano 7d535a 
    00348 extern void    super_stats (int, int *);
    kusano 7d535a 
    00349 extern void    check_repfnz(int, int, int, int *);
    kusano 7d535a 
    00350 extern void    PrintSumm (char *, int, int, int);
    kusano 7d535a 
    00351 extern void    StatInit(SuperLUStat_t *);
    kusano 7d535a 
    00352 extern void    StatPrint (SuperLUStat_t *);
    kusano 7d535a 
    00353 extern void    StatFree(SuperLUStat_t *);
    kusano 7d535a 
    00354 extern void    print_panel_seg(int, int, int, int, int *, int *);
    kusano 7d535a 
    00355 extern int     print_int_vec(char *,int, int *);
    kusano 7d535a 
    00356 extern int     slu_PrintInt10(char *, int, int *);
    kusano 7d535a 
    00357
    kusano 7d535a 
    00358 #ifdef __cplusplus
    kusano 7d535a 
    00359   }
    kusano 7d535a 
    00360 #endif
    kusano 7d535a 
    00361
    kusano 7d535a 
    00362 #endif /* __SUPERLU_UTIL */
    kusano 7d535a
    kusano 7d535a 
    <address style="text-align: right;"><small>Generated on Mon Nov 22 10:23:47 2010 for SuperLU by </small></address>
    kusano 7d535a
    kusano 7d535a 
    doxygen 1.5.5
    kusano 7d535a
    kusano 7d535a

    Powered by Pagure 5.7.4

    SSH Hostkey/Fingerprint | Documentation | About

    © 2014-2019 Red Hat, Inc. and others.

    Logo by Pavel Lashutin