e3181f26b1
Changed MPI routines to hypre_MPI routines. Added hypre_printf, etc. routines. Added AUTOTEST tests to look for 'int' and 'MPI_' calls. Added a new approach for the Fortran interface (not implemented everywhere yet).
77 lines
2.7 KiB
C
77 lines
2.7 KiB
C
/*BHEADER**********************************************************************
|
|
* Copyright (c) 2008, Lawrence Livermore National Security, LLC.
|
|
* Produced at the Lawrence Livermore National Laboratory.
|
|
* This file is part of HYPRE. See file COPYRIGHT for details.
|
|
*
|
|
* HYPRE is free software; you can redistribute it and/or modify it under the
|
|
* terms of the GNU Lesser General Public License (as published by the Free
|
|
* Software Foundation) version 2.1 dated February 1999.
|
|
*
|
|
* $Revision$
|
|
***********************************************************************EHEADER*/
|
|
|
|
|
|
|
|
|
|
/******************************************************************************
|
|
*
|
|
* Header info for the hypre_IJMatrix structures
|
|
*
|
|
*****************************************************************************/
|
|
|
|
#ifndef hypre_IJ_VECTOR_HEADER
|
|
#define hypre_IJ_VECTOR_HEADER
|
|
|
|
/*--------------------------------------------------------------------------
|
|
* hypre_IJVector:
|
|
*--------------------------------------------------------------------------*/
|
|
|
|
typedef struct hypre_IJVector_struct
|
|
{
|
|
MPI_Comm comm;
|
|
|
|
HYPRE_Int *partitioning; /* Indicates partitioning over tasks */
|
|
|
|
HYPRE_Int object_type; /* Indicates the type of "local storage" */
|
|
|
|
void *object; /* Structure for storing local portion */
|
|
|
|
void *translator; /* Structure for storing off processor
|
|
information */
|
|
|
|
HYPRE_Int global_first_row; /* these for data items are necessary */
|
|
HYPRE_Int global_num_rows; /* to be able to avoid using the global */
|
|
/* global partition */
|
|
HYPRE_Int print_level;
|
|
|
|
|
|
|
|
} hypre_IJVector;
|
|
|
|
/*--------------------------------------------------------------------------
|
|
* Accessor macros: hypre_IJVector
|
|
*--------------------------------------------------------------------------*/
|
|
|
|
#define hypre_IJVectorComm(vector) ((vector) -> comm)
|
|
|
|
#define hypre_IJVectorPartitioning(vector) ((vector) -> partitioning)
|
|
|
|
#define hypre_IJVectorObjectType(vector) ((vector) -> object_type)
|
|
|
|
#define hypre_IJVectorObject(vector) ((vector) -> object)
|
|
|
|
#define hypre_IJVectorTranslator(vector) ((vector) -> translator)
|
|
|
|
#define hypre_IJVectorGlobalFirstRow(vector) ((vector) -> global_first_row)
|
|
|
|
#define hypre_IJVectorGlobalNumRows(vector) ((vector) -> global_num_rows)
|
|
|
|
#define hypre_IJVectorPrintLevel(vector) ((vector) -> print_level)
|
|
|
|
/*--------------------------------------------------------------------------
|
|
* prototypes for operations on local objects
|
|
*--------------------------------------------------------------------------*/
|
|
/* #include "./internal_protos.h" */
|
|
|
|
#endif
|