HYPRE_Int
HYPRE_StructVectorSetValues( HYPRE_StructVector vector,
HYPRE_Int *grid_index,
double values )
{
hypre_Index new_grid_index;
HYPRE_Int d;
hypre_ClearIndex(new_grid_index);
for (d = 0; d < hypre_StructGridDim(hypre_StructVectorGrid(vector)); d++)
{
hypre_IndexD(new_grid_index, d) = grid_index[d];
}
hypre_StructVectorSetValues(vector, new_grid_index, &values, 0, -1, 0);
return hypre_error_flag;
}
int
HYPRE_StructVectorSetValues( HYPRE_StructVector vector,
int *grid_index,
double values )
{
hypre_Index new_grid_index;
int d;
int ierr = 0;
hypre_ClearIndex(new_grid_index);
for (d = 0; d < hypre_StructGridDim(hypre_StructVectorGrid(vector)); d++)
{
hypre_IndexD(new_grid_index, d) = grid_index[d];
}
ierr = hypre_StructVectorSetValues(vector, new_grid_index, values, 0);
return ierr;
}
