Initial version of StructIJ{Matrix,Vector} interface.
This commit is contained in:
ribbens
parent
6cd5f45253
commit
692fe2e990
32
structIJ_matrix_vector/HYPRE_structIJ_mv.h
Normal file
32
structIJ_matrix_vector/HYPRE_structIJ_mv.h
Normal file
@ -0,0 +1,32 @@
|
||||
#include "../struct_matrix_vector/struct_matrix_vector.h"
|
||||
|
||||
#ifndef HYPRE_structIJ_MV_HEADER
|
||||
#define HYPRE_structIJ_MV_HEADER
|
||||
|
||||
typedef struct {int opaque;} *HYPRE_StructIJMatrix;
|
||||
typedef struct {int opaque;} *HYPRE_StructIJVector;
|
||||
|
||||
# define P(s) s
|
||||
|
||||
|
||||
/* HYPRE_structIJ_matrix.c */
|
||||
int HYPRE_StructIJMatrixCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJMatrix *matrix ));
|
||||
int HYPRE_StructIJMatrixDestroy P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixInitialize P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixAssemble P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixSetBoxValues P((HYPRE_StructIJMatrix matrix , int *lower_grid_index , int *upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int HYPRE_StructIJMatrixSetSymmetric P((HYPRE_StructIJMatrix matrix , int symmetric ));
|
||||
void *HYPRE_StructIJMatrixGetLocalStorage P((HYPRE_StructIJMatrix matrix ));
|
||||
|
||||
/* HYPRE_structIJ_vector.c */
|
||||
int HYPRE_StructIJVectorCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJVector *vector ));
|
||||
int HYPRE_StructIJVectorDestroy P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorInitialize P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorAssemble P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorSetBoxValues P((HYPRE_StructIJVector vector , int *lower_grid_index , int *upper_grid_index , double *coeffs ));
|
||||
void *HYPRE_StructIJVectorGetLocalStorage P((HYPRE_StructIJVector in_vector ));
|
||||
int HYPRE_StructIJVectorSetPartitioning P((HYPRE_StructIJVector vector , const int *partitioning ));
|
||||
|
||||
#undef P
|
||||
|
||||
#endif
|
||||
42
structIJ_matrix_vector/Makefile
Normal file
42
structIJ_matrix_vector/Makefile
Normal file
@ -0,0 +1,42 @@
|
||||
CC= mpicc
|
||||
|
||||
CDEFS =
|
||||
|
||||
INCLUDEDIRS = \
|
||||
-I../hypre/include
|
||||
|
||||
CFLAGS = -g ${INCLUDEDIRS} ${CDEFS}
|
||||
|
||||
.c.o:
|
||||
${CC} -o $@ -c ${CFLAGS} $<
|
||||
|
||||
OBJS = \
|
||||
HYPRE_structIJ_matrix.o \
|
||||
HYPRE_structIJ_vector.o \
|
||||
structIJ_matrix.o \
|
||||
structIJ_vector.o
|
||||
|
||||
MPILIBFLAGS =
|
||||
LIBFLAGS = -lm
|
||||
LDLIBFLAGS =
|
||||
BLASLIBFLAGS = -lsunperf -L/opt/SUNWspro/lib -R /opt/SUNWspro/lib -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/SC4.2/lib -L/opt/SUNWspro/lib -L/usr/local/mpi/mpich-1.1.1/lib/solaris/ch_p4 -lpmpich -lmpich -lsocket -lnsl -lpthread -laio /opt/SUNWspro/SC4.2/lib/libM77.a -lF77 -lsunmath -lm -lSUNWPro_lic
|
||||
|
||||
LFLAGS =\
|
||||
-L../hypre/lib\
|
||||
-L../CI_struct_matrix_vector\
|
||||
-lHYPRE_CI_mv \
|
||||
-lHYPRE_ls\
|
||||
-lHYPRE_mv\
|
||||
-lHYPRE_parcsr_ls\
|
||||
-lHYPRE_ParaSails \
|
||||
-lHYPRE_MatrixMatrix \
|
||||
-lHYPRE_DistributedMatrix \
|
||||
-lHYPRE_IJ_mv\
|
||||
-lHYPRE_parcsr_mv\
|
||||
-lHYPRE_seq_mv\
|
||||
-lHYPRE_utilities\
|
||||
${BLASLIBFLAGS} \
|
||||
${MPILIBFLAGS} ${LIBFLAGS} ${LDLIBFLAGS}
|
||||
|
||||
a.out: driver.o ${OBJS}
|
||||
${CC} driver.o ${OBJS} ${LFLAGS}
|
||||
5
structIJ_matrix_vector/headers.h
Normal file
5
structIJ_matrix_vector/headers.h
Normal file
@ -0,0 +1,5 @@
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <math.h>
|
||||
|
||||
#include "structIJ_matrix_vector.h"
|
||||
117
structIJ_matrix_vector/structIJ_matrix_vector.h
Normal file
117
structIJ_matrix_vector/structIJ_matrix_vector.h
Normal file
@ -0,0 +1,117 @@
|
||||
#include "HYPRE_structIJ_mv.h"
|
||||
#include "HYPRE_IJ_mv.h"
|
||||
#include "../IJ_matrix_vector/IJ_matrix_vector.h"
|
||||
#include "../CI_struct_matrix_vector/CI_struct_matrix_vector.h"
|
||||
#include "utilities.h"
|
||||
|
||||
#ifndef hypre_structIJ_MV_HEADER
|
||||
#define hypre_structIJ_MV_HEADER
|
||||
|
||||
#include "HYPRE.h"
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* Header info for the hypre_StructIJMatrix structures
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* hypre_StructIJMatrix:
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
typedef struct
|
||||
{
|
||||
MPI_Comm comm;
|
||||
hypre_StructGrid *grid;
|
||||
hypre_StructStencil *stencil;
|
||||
int symmetric;
|
||||
void *translator; /* holds GridToCoord table */
|
||||
HYPRE_IJMatrix IJmatrix;
|
||||
int ref_count;
|
||||
|
||||
} hypre_StructIJMatrix;
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* Accessor macros: hypre_StructIJMatrix
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
#define hypre_StructIJMatrixComm(matrix) ((matrix) -> comm)
|
||||
#define hypre_StructIJMatrixGrid(matrix) ((matrix) -> grid)
|
||||
#define hypre_StructIJMatrixStencil(matrix) ((matrix) -> stencil)
|
||||
#define hypre_StructIJMatrixSymmetric(matrix) ((matrix) -> symmetric)
|
||||
#define hypre_StructIJMatrixTranslator(matrix) ((matrix) -> translator)
|
||||
#define hypre_StructIJMatrixIJMatrix(matrix) ((matrix) -> IJmatrix)
|
||||
#define hypre_StructIJMatrixRefCount(matrix) ((matrix) -> ref_count)
|
||||
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* Header info for the hypre_StructIJVector structures
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* hypre_StructIJVector:
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
typedef struct
|
||||
{
|
||||
MPI_Comm comm;
|
||||
hypre_StructGrid *grid;
|
||||
hypre_StructStencil *stencil;
|
||||
HYPRE_IJVector IJvector;
|
||||
void *translator; /* holds GridToCoord table */
|
||||
int ref_count;
|
||||
|
||||
} hypre_StructIJVector;
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* Accessor macros: hypre_StructIJVector
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
#define hypre_StructIJVectorComm(vector) ((vector) -> comm)
|
||||
#define hypre_StructIJVectorGrid(vector) ((vector) -> grid)
|
||||
#define hypre_StructIJVectorStencil(vector) ((vector) -> stencil)
|
||||
#define hypre_StructIJVectorIJVector(vector) ((vector) -> IJvector)
|
||||
#define hypre_StructIJVectorTranslator(vector) ((vector) -> translator)
|
||||
#define hypre_StructIJVectorRefCount(vector) ((vector) -> ref_count)
|
||||
|
||||
# define P(s) ()
|
||||
|
||||
/* HYPRE_structIJ_matrix.c */
|
||||
int HYPRE_StructIJMatrixCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJMatrix *matrix ));
|
||||
int HYPRE_StructIJMatrixDestroy P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixInitialize P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixAssemble P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixSetBoxValues P((HYPRE_StructIJMatrix matrix , int *lower_grid_index , int *upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int HYPRE_StructIJMatrixSetSymmetric P((HYPRE_StructIJMatrix matrix , int symmetric ));
|
||||
void *HYPRE_StructIJMatrixGetLocalStorage P((HYPRE_StructIJMatrix matrix ));
|
||||
|
||||
/* HYPRE_structIJ_vector.c */
|
||||
int HYPRE_StructIJVectorCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJVector *vector ));
|
||||
int HYPRE_StructIJVectorDestroy P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorInitialize P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorAssemble P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorSetBoxValues P((HYPRE_StructIJVector vector , int *lower_grid_index , int *upper_grid_index , double *coeffs ));
|
||||
void *HYPRE_StructIJVectorGetLocalStorage P((HYPRE_StructIJVector in_vector ));
|
||||
int HYPRE_StructIJVectorSetPartitioning P((HYPRE_StructIJVector vector , const int *partitioning ));
|
||||
|
||||
/* structIJ_matrix.c */
|
||||
hypre_StructIJMatrix *hypre_StructIJMatrixCreate P((MPI_Comm comm , hypre_StructGrid *grid , hypre_StructStencil *stencil ));
|
||||
int hypre_StructIJMatrixDestroy P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixInitialize P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixAssemble P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixSetBoxValues P((hypre_StructIJMatrix *matrix , hypre_Index lower_grid_index , hypre_Index upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int hypre_StructIJMatrixSetValues P((hypre_StructIJMatrix *matrix , hypre_Index index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
|
||||
/* structIJ_vector.c */
|
||||
hypre_StructIJVector *hypre_StructIJVectorCreate P((MPI_Comm comm , hypre_StructGrid *grid , hypre_StructStencil *stencil ));
|
||||
int hypre_StructIJVectorDestroy P((hypre_StructIJVector *vector ));
|
||||
int hypre_StructIJVectorInitialize P((hypre_StructIJVector *vector ));
|
||||
int hypre_StructIJVectorSetBoxValues P((hypre_StructIJVector *vector , hypre_Index lower_grid_index , hypre_Index upper_grid_index , double *coeffs ));
|
||||
int hypre_StructIJVectorSetValue P((hypre_StructIJVector *vector , hypre_Index index , double value ));
|
||||
int hypre_StructIJVectorAssemble P((hypre_StructIJVector *vector ));
|
||||
|
||||
#undef P
|
||||
|
||||
#endif
|
||||
32
structIJ_mv/HYPRE_structIJ_mv.h
Normal file
32
structIJ_mv/HYPRE_structIJ_mv.h
Normal file
@ -0,0 +1,32 @@
|
||||
#include "../struct_matrix_vector/struct_matrix_vector.h"
|
||||
|
||||
#ifndef HYPRE_structIJ_MV_HEADER
|
||||
#define HYPRE_structIJ_MV_HEADER
|
||||
|
||||
typedef struct {int opaque;} *HYPRE_StructIJMatrix;
|
||||
typedef struct {int opaque;} *HYPRE_StructIJVector;
|
||||
|
||||
# define P(s) s
|
||||
|
||||
|
||||
/* HYPRE_structIJ_matrix.c */
|
||||
int HYPRE_StructIJMatrixCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJMatrix *matrix ));
|
||||
int HYPRE_StructIJMatrixDestroy P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixInitialize P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixAssemble P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixSetBoxValues P((HYPRE_StructIJMatrix matrix , int *lower_grid_index , int *upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int HYPRE_StructIJMatrixSetSymmetric P((HYPRE_StructIJMatrix matrix , int symmetric ));
|
||||
void *HYPRE_StructIJMatrixGetLocalStorage P((HYPRE_StructIJMatrix matrix ));
|
||||
|
||||
/* HYPRE_structIJ_vector.c */
|
||||
int HYPRE_StructIJVectorCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJVector *vector ));
|
||||
int HYPRE_StructIJVectorDestroy P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorInitialize P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorAssemble P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorSetBoxValues P((HYPRE_StructIJVector vector , int *lower_grid_index , int *upper_grid_index , double *coeffs ));
|
||||
void *HYPRE_StructIJVectorGetLocalStorage P((HYPRE_StructIJVector in_vector ));
|
||||
int HYPRE_StructIJVectorSetPartitioning P((HYPRE_StructIJVector vector , const int *partitioning ));
|
||||
|
||||
#undef P
|
||||
|
||||
#endif
|
||||
42
structIJ_mv/Makefile
Normal file
42
structIJ_mv/Makefile
Normal file
@ -0,0 +1,42 @@
|
||||
CC= mpicc
|
||||
|
||||
CDEFS =
|
||||
|
||||
INCLUDEDIRS = \
|
||||
-I../hypre/include
|
||||
|
||||
CFLAGS = -g ${INCLUDEDIRS} ${CDEFS}
|
||||
|
||||
.c.o:
|
||||
${CC} -o $@ -c ${CFLAGS} $<
|
||||
|
||||
OBJS = \
|
||||
HYPRE_structIJ_matrix.o \
|
||||
HYPRE_structIJ_vector.o \
|
||||
structIJ_matrix.o \
|
||||
structIJ_vector.o
|
||||
|
||||
MPILIBFLAGS =
|
||||
LIBFLAGS = -lm
|
||||
LDLIBFLAGS =
|
||||
BLASLIBFLAGS = -lsunperf -L/opt/SUNWspro/lib -R /opt/SUNWspro/lib -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/SC4.2/lib -L/opt/SUNWspro/lib -L/usr/local/mpi/mpich-1.1.1/lib/solaris/ch_p4 -lpmpich -lmpich -lsocket -lnsl -lpthread -laio /opt/SUNWspro/SC4.2/lib/libM77.a -lF77 -lsunmath -lm -lSUNWPro_lic
|
||||
|
||||
LFLAGS =\
|
||||
-L../hypre/lib\
|
||||
-L../CI_struct_matrix_vector\
|
||||
-lHYPRE_CI_mv \
|
||||
-lHYPRE_ls\
|
||||
-lHYPRE_mv\
|
||||
-lHYPRE_parcsr_ls\
|
||||
-lHYPRE_ParaSails \
|
||||
-lHYPRE_MatrixMatrix \
|
||||
-lHYPRE_DistributedMatrix \
|
||||
-lHYPRE_IJ_mv\
|
||||
-lHYPRE_parcsr_mv\
|
||||
-lHYPRE_seq_mv\
|
||||
-lHYPRE_utilities\
|
||||
${BLASLIBFLAGS} \
|
||||
${MPILIBFLAGS} ${LIBFLAGS} ${LDLIBFLAGS}
|
||||
|
||||
a.out: driver.o ${OBJS}
|
||||
${CC} driver.o ${OBJS} ${LFLAGS}
|
||||
5
structIJ_mv/headers.h
Normal file
5
structIJ_mv/headers.h
Normal file
@ -0,0 +1,5 @@
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <math.h>
|
||||
|
||||
#include "structIJ_matrix_vector.h"
|
||||
117
structIJ_mv/structIJ_mv.h
Normal file
117
structIJ_mv/structIJ_mv.h
Normal file
@ -0,0 +1,117 @@
|
||||
#include "HYPRE_structIJ_mv.h"
|
||||
#include "HYPRE_IJ_mv.h"
|
||||
#include "../IJ_matrix_vector/IJ_matrix_vector.h"
|
||||
#include "../CI_struct_matrix_vector/CI_struct_matrix_vector.h"
|
||||
#include "utilities.h"
|
||||
|
||||
#ifndef hypre_structIJ_MV_HEADER
|
||||
#define hypre_structIJ_MV_HEADER
|
||||
|
||||
#include "HYPRE.h"
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* Header info for the hypre_StructIJMatrix structures
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* hypre_StructIJMatrix:
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
typedef struct
|
||||
{
|
||||
MPI_Comm comm;
|
||||
hypre_StructGrid *grid;
|
||||
hypre_StructStencil *stencil;
|
||||
int symmetric;
|
||||
void *translator; /* holds GridToCoord table */
|
||||
HYPRE_IJMatrix IJmatrix;
|
||||
int ref_count;
|
||||
|
||||
} hypre_StructIJMatrix;
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* Accessor macros: hypre_StructIJMatrix
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
#define hypre_StructIJMatrixComm(matrix) ((matrix) -> comm)
|
||||
#define hypre_StructIJMatrixGrid(matrix) ((matrix) -> grid)
|
||||
#define hypre_StructIJMatrixStencil(matrix) ((matrix) -> stencil)
|
||||
#define hypre_StructIJMatrixSymmetric(matrix) ((matrix) -> symmetric)
|
||||
#define hypre_StructIJMatrixTranslator(matrix) ((matrix) -> translator)
|
||||
#define hypre_StructIJMatrixIJMatrix(matrix) ((matrix) -> IJmatrix)
|
||||
#define hypre_StructIJMatrixRefCount(matrix) ((matrix) -> ref_count)
|
||||
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* Header info for the hypre_StructIJVector structures
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* hypre_StructIJVector:
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
typedef struct
|
||||
{
|
||||
MPI_Comm comm;
|
||||
hypre_StructGrid *grid;
|
||||
hypre_StructStencil *stencil;
|
||||
HYPRE_IJVector IJvector;
|
||||
void *translator; /* holds GridToCoord table */
|
||||
int ref_count;
|
||||
|
||||
} hypre_StructIJVector;
|
||||
|
||||
/*--------------------------------------------------------------------------
|
||||
* Accessor macros: hypre_StructIJVector
|
||||
*--------------------------------------------------------------------------*/
|
||||
|
||||
#define hypre_StructIJVectorComm(vector) ((vector) -> comm)
|
||||
#define hypre_StructIJVectorGrid(vector) ((vector) -> grid)
|
||||
#define hypre_StructIJVectorStencil(vector) ((vector) -> stencil)
|
||||
#define hypre_StructIJVectorIJVector(vector) ((vector) -> IJvector)
|
||||
#define hypre_StructIJVectorTranslator(vector) ((vector) -> translator)
|
||||
#define hypre_StructIJVectorRefCount(vector) ((vector) -> ref_count)
|
||||
|
||||
# define P(s) ()
|
||||
|
||||
/* HYPRE_structIJ_matrix.c */
|
||||
int HYPRE_StructIJMatrixCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJMatrix *matrix ));
|
||||
int HYPRE_StructIJMatrixDestroy P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixInitialize P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixAssemble P((HYPRE_StructIJMatrix matrix ));
|
||||
int HYPRE_StructIJMatrixSetBoxValues P((HYPRE_StructIJMatrix matrix , int *lower_grid_index , int *upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int HYPRE_StructIJMatrixSetSymmetric P((HYPRE_StructIJMatrix matrix , int symmetric ));
|
||||
void *HYPRE_StructIJMatrixGetLocalStorage P((HYPRE_StructIJMatrix matrix ));
|
||||
|
||||
/* HYPRE_structIJ_vector.c */
|
||||
int HYPRE_StructIJVectorCreate P((MPI_Comm comm , HYPRE_StructGrid grid , HYPRE_StructStencil stencil , HYPRE_StructIJVector *vector ));
|
||||
int HYPRE_StructIJVectorDestroy P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorInitialize P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorAssemble P((HYPRE_StructIJVector vector ));
|
||||
int HYPRE_StructIJVectorSetBoxValues P((HYPRE_StructIJVector vector , int *lower_grid_index , int *upper_grid_index , double *coeffs ));
|
||||
void *HYPRE_StructIJVectorGetLocalStorage P((HYPRE_StructIJVector in_vector ));
|
||||
int HYPRE_StructIJVectorSetPartitioning P((HYPRE_StructIJVector vector , const int *partitioning ));
|
||||
|
||||
/* structIJ_matrix.c */
|
||||
hypre_StructIJMatrix *hypre_StructIJMatrixCreate P((MPI_Comm comm , hypre_StructGrid *grid , hypre_StructStencil *stencil ));
|
||||
int hypre_StructIJMatrixDestroy P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixInitialize P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixAssemble P((hypre_StructIJMatrix *matrix ));
|
||||
int hypre_StructIJMatrixSetBoxValues P((hypre_StructIJMatrix *matrix , hypre_Index lower_grid_index , hypre_Index upper_grid_index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
int hypre_StructIJMatrixSetValues P((hypre_StructIJMatrix *matrix , hypre_Index index , int num_stencil_indices , int *stencil_indices , double *coeffs ));
|
||||
|
||||
/* structIJ_vector.c */
|
||||
hypre_StructIJVector *hypre_StructIJVectorCreate P((MPI_Comm comm , hypre_StructGrid *grid , hypre_StructStencil *stencil ));
|
||||
int hypre_StructIJVectorDestroy P((hypre_StructIJVector *vector ));
|
||||
int hypre_StructIJVectorInitialize P((hypre_StructIJVector *vector ));
|
||||
int hypre_StructIJVectorSetBoxValues P((hypre_StructIJVector *vector , hypre_Index lower_grid_index , hypre_Index upper_grid_index , double *coeffs ));
|
||||
int hypre_StructIJVectorSetValue P((hypre_StructIJVector *vector , hypre_Index index , double value ));
|
||||
int hypre_StructIJVectorAssemble P((hypre_StructIJVector *vector ));
|
||||
|
||||
#undef P
|
||||
|
||||
#endif
|
||||
Loading…
Reference in New Issue
Block a user