src/seq_mv/vector.c
HYPRE_Int hypre_SeqVectorCopy(hypre_Vector *x, hypre_Vector *y) {
#ifdef HYPRE_PROFILE
  hypre_profile_times[HYPRE_TIMER_ID_BLAS1] -= hypre_MPI_Wtime();
#endif

  HYPRE_Int ierr = 0;

  size_t size = hypre_min(hypre_VectorSize(x), hypre_VectorSize(y)) *
                hypre_VectorNumVectors(x);

  hypre_TMemcpy(hypre_VectorData(y), hypre_VectorData(x), HYPRE_Complex, size,
                hypre_VectorMemoryLocation(y), hypre_VectorMemoryLocation(x));

#ifdef HYPRE_PROFILE
  hypre_profile_times[HYPRE_TIMER_ID_BLAS1] += hypre_MPI_Wtime();
#endif

  return ierr;
}
/*--------------------------------------------------------------------------
 * hypre_SeqVectorCopy
 * copies data from x to y
 * if size of x is larger than y only the first size_y elements of x are
 * copied to y
 *--------------------------------------------------------------------------*/
hypre_SeqVectorCopy
copies data from x to y
if size of x is larger than y only the first size_y elements of x are
copied to y
hypre_SeqVectorCopy copies data from x to y if size of x is larger than y only the first size_y elements of x are copied to y
HYPRE_Int hypre_SeqVectorCopy(hypre_Vector *x, hypre_Vector *y) {
#ifdef HYPRE_PROFILE
  hypre_profile_times[HYPRE_TIMER_ID_BLAS1] -= hypre_MPI_Wtime();
#endif
  HYPRE_Int ierr = 0;
  size_t size = hypre_min(hypre_VectorSize(x), hypre_VectorSize(y)) *
                hypre_VectorNumVectors(x);
  hypre_TMemcpy(hypre_VectorData(y), hypre_VectorData(x), HYPRE_Complex, size,
                hypre_VectorMemoryLocation(y), hypre_VectorMemoryLocation(x));
#ifdef HYPRE_PROFILE
  hypre_profile_times[HYPRE_TIMER_ID_BLAS1] += hypre_MPI_Wtime();
#endif
  return ierr;
}
HYPRE_Int hypre_SeqVectorCopy ( hypre_Vector * x , hypre_Vector * y ) { #ifdef HYPRE_PROFILE hypre_profile_times [ HYPRE_TIMER_ID_BLAS1 ] -= hypre_MPI_Wtime ( ) ; #endif HYPRE_Int ierr = 0 ; size_t size = hypre_min ( hypre_VectorSize ( x ) , hypre_VectorSize ( y ) ) * hypre_VectorNumVectors ( x ) ; hypre_TMemcpy ( hypre_VectorData ( y ) , hypre_VectorData ( x ) , HYPRE_Complex , size , hypre_VectorMemoryLocation ( y ) , hypre_VectorMemoryLocation ( x ) ) ; #ifdef HYPRE_PROFILE hypre_profile_times [ HYPRE_TIMER_ID_BLAS1 ] += hypre_MPI_Wtime ( ) ; #endif return ierr ; }
hypre_SeqVectorCopy
 copies data from x to y
 if size of x is larger than y only the first size_y elements of x are
 copied to y
hypre_SeqVectorCopy copies data from x to y if size of x is larger than y only the first size_y elements of x are copied to y