pdscvector.h

/*
 * pdscvector.h
 * 
 * Copyright 2011 Fernando Pujaico Rivera <fernando.pujaico.rivera@gmail.com>
 * 
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
 * MA 02110-1301, USA.
 * 
 */

#ifndef __PDSCVECTOR_H__
#define __PDSCVECTOR_H__

#ifdef __cplusplus
extern "C" {
#endif 


#ifndef TRUE
        #define TRUE 1
#endif

#ifndef FALSE
        #define FALSE 0
#endif

#include <stdio.h>
#include <pds/pdscaglobal.h>
#include <pds/pdscn.h>
#include <pds/pdsra.h>

typedef struct 
{
        PdsComplex *V;
        PdsCaNatural Nel;
}PdsCVector;

PdsCVector *pds_cvector_new(PdsCaNatural Nel);


PdsCVector *pds_cvector_new_cvector(const PdsCVector *VecSrc);


PdsCVector *pds_cvector_new_vector(const PdsVector *VecSrc);



int pds_cvector_init_complex(PdsCVector *Vector,PdsComplex Val);


int pds_cvector_init_real(PdsCVector *Vector,PdsCaReal Val);


int pds_cvector_init_imag(PdsCVector *Vector,PdsCaReal Val);


int pds_cvector_init_cvector(PdsCVector *Vector,const PdsCVector *VecSrc);


int pds_cvector_init_rvector(PdsCVector *Vector,const PdsVector *VecSrc);


int pds_cvector_init_ivector(PdsCVector *Vector,const PdsVector *VecSrc);




int pds_cvector_printf(const PdsCVector *Vector);


int pds_cvector_fprintf(const PdsCVector *Vector,FILE *fd);


int pds_cvector_get_complex(const PdsCVector *Vector, PdsCaNatural x, PdsComplex *m);



int pds_cvector_set_complex(PdsCVector *Vector, PdsCaNatural x, PdsComplex m);


int pds_cvector_set_real(PdsCVector *Vector, PdsCaNatural x, PdsCaReal m);


int pds_cvector_set_imag(PdsCVector *Vector, PdsCaNatural x, PdsCaReal m);



int pds_cvector_conjugate(PdsCVector *Vector);


int pds_cvector_conjugate_cvector(const PdsCVector *Vector,PdsCVector *VecDest);


int pds_cvector_modulus(const PdsCVector *Vector,PdsVector *VecDest);


int pds_cvector_modulus2(const PdsCVector *Vector,PdsVector *VecDest);


int pds_cvector_phase(const PdsCVector *Vector,PdsVector *VecDest);


void pds_cvector_free(PdsCVector *Vector);


void pds_cvector_destroy(PdsCVector **Vector);


#ifdef __cplusplus
}
#endif 

#endif  /* __PDSCVECTOR_H__ */