hypre/struct_mv/HYPRE_struct_grid.c

/*BHEADER**********************************************************************
 * (c) 1997   The Regents of the University of California
 *
 * See the file COPYRIGHT_and_DISCLAIMER for a complete copyright
 * notice, contact person, and disclaimer.
 *
 * $Revision$
 *********************************************************************EHEADER*/
/******************************************************************************
 *
 * HYPRE_StructGrid interface
 *
 *****************************************************************************/
#include "headers.h"

/*--------------------------------------------------------------------------
 * HYPRE_NewStructGrid
 *--------------------------------------------------------------------------*/

int
HYPRE_NewStructGrid( MPI_Comm          comm,
                     int               dim,
                     HYPRE_StructGrid *grid )
{
   *grid = ( (HYPRE_StructGrid) hypre_NewStructGrid( comm, dim ) );

   return 0;
}

/*--------------------------------------------------------------------------
 * HYPRE_FreeStructGrid
 *--------------------------------------------------------------------------*/

int
HYPRE_FreeStructGrid( HYPRE_StructGrid grid )
{
   return ( hypre_FreeStructGrid( (hypre_StructGrid *) grid ) );
}

/*--------------------------------------------------------------------------
 * HYPRE_SetStructGridExtents
 *--------------------------------------------------------------------------*/

int
HYPRE_SetStructGridExtents( HYPRE_StructGrid  grid,
                            int              *ilower,
                            int              *iupper )
{
   hypre_Index  new_ilower;
   hypre_Index  new_iupper;

   int          d;

   hypre_ClearIndex(new_ilower);
   hypre_ClearIndex(new_iupper);
   for (d = 0; d < hypre_StructGridDim((hypre_StructGrid *) grid); d++)
   {
      hypre_IndexD(new_ilower, d) = ilower[d];
      hypre_IndexD(new_iupper, d) = iupper[d];
   }

   return ( hypre_SetStructGridExtents( (hypre_StructGrid *) grid,
                                        new_ilower, new_iupper ) );
}

/*--------------------------------------------------------------------------
 * HYPRE_AssembleStructGrid
 *--------------------------------------------------------------------------*/

int
HYPRE_AssembleStructGrid( HYPRE_StructGrid grid )
{
   return ( hypre_AssembleStructGrid( (hypre_StructGrid *) grid ) );
}