lib_vec.h File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
void	zero_vect (double *, unsigned long)
void	do_vect (double **, unsigned long)
void	zero_mat (double **, unsigned long, unsigned long)
void	cp_vect (double **, double **, unsigned long)
void	cp_vect_destroy (double **, double **, unsigned long)
void	add_scaled_vect (double *, double *, double, unsigned long)
void *	alloc_vect (unsigned int n, size_t elem_size)
void	free_vect_and_zero_ptr (void **)
void	free_mat_and_zero_ptr (void ***)

Function Documentation

add_scaled_vect()

void add_scaled_vect	(	double *	,
		double *	,
		double	,
		unsigned	long
	)

Definition at line 61 of file lib_vec.cpp.

{
  unsigned long i;
  for (i = 0; i < len; ++i)
    to_vect[i] += scalar * from_vect[i];
}

alloc_vect()

void* alloc_vect	(	unsigned int	n,
		size_t	elem_size
	)

Definition at line 71 of file lib_vec.cpp.

{
  void *pvect;

  pvect = calloc(n, elem_size);
  if (!pvect) {
    error_memory_allocation(99901, "lib_cvq");
  }
  return pvect;
};

cp_vect()

void cp_vect	(	double **	,
		double **	,
		unsigned	long
	)

Definition at line 44 of file lib_vec.cpp.

{
  memcpy(*vect1, *vect2, len * sizeof(double));
}

cp_vect_destroy()

void cp_vect_destroy	(	double **	,
		double **	,
		unsigned	long
	)

Definition at line 51 of file lib_vec.cpp.

{
  if (*pvect1)
    free(*pvect1);
  do_vect(pvect1, len);
  cp_vect(pvect1, pvect2, len);
  free_vect_and_zero_ptr((void**)pvect2);
}

do_vect()

void do_vect	(	double **	,
		unsigned	long
	)

Definition at line 32 of file lib_vec.cpp.

{
  *pvect = (double *) alloc_vect(len,  sizeof(double));
}

free_mat_and_zero_ptr()

void free_mat_and_zero_ptr

(

void ***

)

Definition at line 92 of file lib_vec.cpp.

{
  if (*pmat) {
    if (**pmat)
      free(**pmat);
    free(*pmat);
    *pmat = 0;
  }
}

free_vect_and_zero_ptr()

void free_vect_and_zero_ptr

(

void **

)

Definition at line 83 of file lib_vec.cpp.

{
  if (*pvect) {
    free(*pvect);
    *pvect = 0;
  }
}

zero_mat()

void zero_mat	(	double **	,
		unsigned	long,
		unsigned	long
	)

Definition at line 38 of file lib_vec.cpp.

{
  memset(mat[0], 0, len_i * len_j * sizeof(double));
}

zero_vect()

void zero_vect	(	double *	,
		unsigned	long
	)

Definition at line 26 of file lib_vec.cpp.

{
  memset(vect, 0, len * sizeof(double));
}