/******************** add_wvec.c (in su3.a) ******************** * *void add_wilson_vector(wilson_vector *src1,*src2,*dest) * add two Wilson vectors * dest <- src1 + src2 */ #include "complex.h" #include "su3.h" void add_wilson_vector(src1,src2,dest) wilson_vector *src1,*src2,*dest; { register int i; for(i=0;i<4;i++)add_su3_vector( &(src1->d[i]), &(src2->d[i]), &(dest->d[i])); }